Ciao Adrix,
in un controllo RTB quando termina la riga e và a capo è inserito il carattere di ritorno cioè Chr$(10) (anche se non lo vedi), quindi se fosse una matrice di controlli di RTB
For ix = FrmProva.RTBtx1.LBound To FrmProva.RTBtx1.UBound
st = 1
pt = 1
Do
pt = InStr(st, FrmProva.RTBtx1(ix).Text, Chr$(10) )
If pt > 0 Then
strSint00 = Mid$(FrmProva.RTBtx1(ix).Text, st, pt)
... ... ...
in questo modo nella variabile strSint00 acquisiresti la prima riga di ciascun controllo RTB.
Questo è solo un esempio ... per farti capire.