si scusa, ho perso un po la traccia di quello che effettivamente era il programma, non scrive all'interno di tante textbox, ho copiato quanto scritto da tas che non era correttissimo......correggo:

"finto testo" ipoteticamente contenuto della textbox:
---------------------------
wdiwerfjernfòjernfref+
erfergftrgtr gtrg trgtr gtr g56 g56g
56g56 g56 g56 g56 g56 g56gy5h 76
56h67 h76 hy76 hu76u j 7878
---------------------------

quello che devo fare è mettere in un array le varie righe lette nella text ma per sapere quando il programma si deve fermare prima le deve contare

perchè in questo modo non sa quando deve uscire dal ciclo e lo dovrebbe fare dinamicamente


Dim s() As String
Dim i As Integer
s = Split(Text1.Text, vbCrLf)

Do While (quale condizione?)

mioarray(i) = s(i)
i=i+1

Loop

ecco, così è corretto, ma quale condizione va messa nel while rimane un mistero