DerStauner
Erfahrenes Mitglied
Hallo,
ich möchte folgendes verwirklichen:
ich hätte gerne ein Sub, das die Text Eigenschaft aller Controls auf "" setzt, die in der Argliste des Subs stehen. Und dazu möchte ich keine TextBox Arrays benutzen, weil es kann sein, dass ich z. B. nur 2 von 10 TextBoxes den Text ändern möchte, oder nur einem ComboBox.
ich habe es mir so vorgestellt:
Im Code dann z. B.
wobei text1, text2 und combo1 die Namen der einzelnen Objekte sind.
Wie würde das gehen?
ich möchte folgendes verwirklichen:
ich hätte gerne ein Sub, das die Text Eigenschaft aller Controls auf "" setzt, die in der Argliste des Subs stehen. Und dazu möchte ich keine TextBox Arrays benutzen, weil es kann sein, dass ich z. B. nur 2 von 10 TextBoxes den Text ändern möchte, oder nur einem ComboBox.
ich habe es mir so vorgestellt:
Code:
Public Sub SetTextEmpty (ParamArray controls() As Variant)
For i=0 to UBound(controls)
controls(i).Text=""
Next i
End Sub
Im Code dann z. B.
Code:
SetTextEmpty "text1","text2","combo1"
wobei text1, text2 und combo1 die Namen der einzelnen Objekte sind.
Wie würde das gehen?