Grazie Vinsent!

Qualcosa comincia a funzionare!
Il problema è che la funzione mi fa ottenere sempre e solo l'ultima linea della RichTextBox e non tutte. Quindi posso modificare solo l'ultima linea...

Ho fatto in questo modo:

Public Sub ViewMyTextBoxContents()
Dim counter As Integer
'Create a string array and store the contents of the Lines property.
Dim tempArray() As String
tempArray = TextBox1.Lines

'Loop through the array and send the contents of the array to debug window.
For counter = 0 To tempArray.GetUpperBound(0)
'System.Diagnostics.Debug.WriteLine(tempArray(coun ter))
TextBox2.Text = "test" & tempArray(counter)
Next

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ViewMyTextBoxContents()
End Sub

La funzione è quella del sito microsoft... ma misa che ho compreso male.