Namen von TextBoxen zusammensetzen

[sati99]

Hallo Ihr Profis,

Folgende Frage:
Habe ein Form und hierauf 9 TextBoxen.
Ich möchte nun in einer IF oder Case Schleife (1-9) in den entsprechend zugeordneten Textboxen (T_OnOffline_1 bis T_OnOffline_9) Texte ausgeben.
Wie kann ich in der Schleife den Namen der TextBox so zusammensetzen, dass sich eben die letzte Stelle des TextBoxNamens ändert.
Ersuche um eure dringende Unterstützung.

Danke!

 

[DevHB]

Hi,

dafür verwendet man ein Feld auf Textboxen.
Zieh eine auf die Form, benenne sie und kopiere die so oft wie Du brauchst.
Die 1. Frage beantwortest Du mit "Ja" beim Kopieren.

Dann gehts mit einer Schleife und dem Index

Private Sub LeseTextFelder()
     Dim i As Long
     ' oder
     ' For i = LBound(txtFelder) To UBound(txtFelder)
     For i = 0 To 9
         txtFelder(i).Text = "Ich bin Textfeld " & i
    Next i
End Sub

 

[sati99]

Hallo DevHB,

Sorry für meine späte Antwort, war unterwegs.

ZU:
dafür verwendet man ein Feld auf Textboxen.
Zieh eine auf die Form, benenne sie und kopiere die so oft wie Du brauchst.
Die 1. Frage beantwortest Du mit "Ja" beim Kopieren.

folge Info:
verwende VB2005, ziehe die erste TextBox auf die Form, sie bekommt automatisch den Namen TextBox1 - OK
wenn ich nun diese kopiere kommt bei mir keine Frage die mit JA zu beantworten ist.
Stattdessen bekommt die neue TextBox automatisch den Namen TextBox2!

Was nun...

 

[wincnc]

Hallo, bei VB.NET funktioniert das etwas anders.
Schau mal hier nach, da ist beschrieben wie man Control Arrays erstellt.

Control-Arrays mit VB.NET erzeugen

Das Beispiel zeigt Dir das mit Buttons, kannst Du aber leicht umschreiben für TextBoxen.

 

[sati99]

Hallo wincnc,

alles was neu ist muss nicht unbedingt einfacher sein.
Werde mein Programm jetzt etwas umschreiben müssen.

Danke!