textBox(i).value ? inkrementieren

David Laumen

Hallo zusammen,

ich weiss mein Problem ist eher ein Syntax-Problem (ich komme aus dem C-Bereich) und habe nicht so super viel Ahnung von .net und vba - aber konnte bisher alle Probleme selber lösen mit etwas Literatur-Recherche.

Diesmal habe ich aber ein Problem, das ich nicht so schnell lösen kann. Vielleicht kann mir ein alter Hase einen Tip geben:

Ich habe 7 textboxen, in jede Textbox soll nur ein Zeichen des Strings ausgegeben werden.
Bevor ich natürlich eine (später) riesige Case-Anweisung schreibe, wollte ich mir gerne das Leben etwas vereinfachen:

For i As Integer = 1 To 7
Dim zeichen As String
zeichen = Mid(advancedDataBand1("BusinessPartnerDetails.AddID"),i,1)

textbox(i).value = zeichen :bang:
Next i

Das Inkrementieren der Textbox (durch i) funktioniert leider nicht. In C wäre das alles etwas einfacher für mich, weil ich ganz simpel die Pointer inkrementieren würde.

David Laumen

hab die Lösung gefunden :D
nur so zur Info wer es noch gebrauchen könnte:


For i As Integer = 1 To 7
zeichen = Mid(advancedDataBand1("BusinessPartnerDetails.AddID"),i,1)

_textBox = header1.ControlByName("textBox" & i)
_textBox.Value = zeichen

Next i