Private Sub DataGridView1_CellContentClick(ByVal sender As System.Object, _
      ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles _
      DataGridView1.CellContentClick
 
        If e.RowIndex >= 0 Then
            Dim row As DataGridViewRow
            row = Me.DataGridView1.Rows(e.RowIndex)
            TextBox1.Text = row.Cells("id").Value.ToString
            TextBox2.Text = row.Cells("id").Value.ToString
            TextBox3.Text = row.Cells("id").Value.ToString
        End If
    End Sub
End Class