Hallo,
ich habe da mal wieder einige Fragen an euch.
Ich bin gerade dabei mit so etwas wie ein Notepad (Editor) zu programmieren.
In diesen Project habe ich eine Function die ich an mehren Stellen nutzen will, weiss aber nicht so recht wie ich ein Argumenten übergebe.
PHP
Private Sub Schrift_Groesse()
'ändern der schriftgröße der textbox in der form1
Select Case lboSchriftArt.SelectedItem
Case "8"
Form1.txtEingabe.Font = New Font("Arial", 8, FontStyle.Regular)
Case "9"
Form1.txtEingabe.Font = New Font("Arial", 9, FontStyle.Regular)
Case "10"
Form1.txtEingabe.Font = New Font("Arial", 10, FontStyle.Regular)
Case "11"
Form1.txtEingabe.Font = New Font("Arial", 11, FontStyle.Regular)
Case "12"
Form1.txtEingabe.Font = New Font("Arial", 12, FontStyle.Regular)
Case "14"
Form1.txtEingabe.Font = New Font("Arial", 14, FontStyle.Regular)
Case "16"
Form1.txtEingabe.Font = New Font("Arial", 16, FontStyle.Regular)
Case "18"
Form1.txtEingabe.Font = New Font("Arial", 18, FontStyle.Regular)
Case "20"
Form1.txtEingabe.Font = New Font("Arial", 20, FontStyle.Regular)
Case "22"
Form1.txtEingabe.Font = New Font("Arial", 22, FontStyle.Regular)
Case "24"
Form1.txtEingabe.Font = New Font("Arial", 24, FontStyle.Regular)
Case "26"
Form1.txtEingabe.Font = New Font("Arial", 26, FontStyle.Regular)
Case "28"
Form1.txtEingabe.Font = New Font("Arial", 28, FontStyle.Regular)
Case "36"
Form1.txtEingabe.Font = New Font("Arial", 36, FontStyle.Regular)
Case "48"
Form1.txtEingabe.Font = New Font("Arial", 48, FontStyle.Regular)
Case "72"
Form1.txtEingabe.Font = New Font("Arial", 72, FontStyle.Regular)
End Select
End SubMittels einer Listbox kann man die Schriftgröße wählen und die eingabe wird dann in der Private Sub Schrift_Groesse() verarbeitet.
Nun möchte ich aber das sich das nicht nur auf Form1.txtEingabe.Font bezieht sonder auch z.b. auf ein Label.
Was muss ich dafür in der () von Private Sub Schrift_Groesse() angeben?
So wie ich es bis jetzt habe kann man nur den gesammten Text in der Textbox ändern. Wie bekomme ich es hin das das auch auf, mit der Maus, markierten Text klappt?
MFG Matthias