[VB] Variable an Namen von Textboxen anhängen

[Hotwave]

Mein Problem ist, dass ich mit einer For-Schleife arbeite und das i gerne an den Dateinamen anhängen möchte, ich aber schon ewig gesucht habe, und keine Lösung finde. Bisher sieht's so aus:

Dim sDateiinhalt As String
Dim iKanalNr As Integer

For i = 1 To 8
    iKanalNr = FreeFile()
    Open "\Fächer\Montag_Std_" & i & ".txt" For Input As iKanalNr
        Input #iKanalNr, sDateiinhalt
    Close iKanalNr
    Debug.Print sDateiinhalt
txtMo[B]i[/B] = sDateiinhalt 'Hier soll statt dem i der Wert für das i stehen
Next

Hab's jetzt unschön erstmal umgangen indem ich das jedes mal hingeschrieben hab ^^ Würde mich trotzdem sehr über 'ne Lösung freuen

 

[theHacker]

Me.Controls("txtMo"+CStr(foo)).Value="bar"

edit:
Ein Array von Textfeldern wäre in deinem Fall wohl passender.

 

[LasMiranda]

oder nen Array würde sicherlich sogar besser aussehen