Dim i As Integer
Dim s As String
s = ""
For i = 0 To DataGridView1.CurrentRow.Cells.Count - 1
s &= DataGridView1.CurrentRow.Cells(i).Value
Next
TextBox1.Text = s
Dim i As Integer
Dim s As String
s = ""
For i = 0 To DataGridView1.CurrentRow.Cells.Count - 1
s &= DataGridView1.CurrentRow.Cells(i).Value
Next
TextBox1.Text = s