solucionado ...estoy muy oxidado .... muchas gracias por mostrarme el camino maestro
Cita: For Y = 0 To xx - 1
Me.DataGridView2.CurrentCell = Me.DataGridView2(2, Y)
TEXTO = TEXTO + " " + Me.DataGridView2(2, Y).Value.ToString
Me.DataGridView2.CurrentCell = Me.DataGridView2(2, Y + 1)
Next
Me.RichTextBox1.Text = TEXTO