Mfg, lighty

---------------------------------------------------
Schaut mal hier:
http://www.reset.ch/index.html

(die Links sind ungef?hrlich )

Ps.: F?r jeden, der wie ich, zu oft vorm Rechner sitzt

Dim Text1, Text2, Text3, Text4 As String
 
For k As Integer = 1 To 4
 
      Text(k) = "irgendeintext"
 
Next

Dim Texts(3) As String
 
For k As Integer = 0 To 3
 
      Texts(k) = "irgendeintext"
 
Next

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist