Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'MDataSet.table1' table. You can move, or remove it, as needed.
Me.Table1TableAdapter.Fill(Me.MDataSet.table1)
Table1DataGridView.MultiSelect = False
Table1DataGridView.SelectionMode = DataGridViewSelectionMode.FullRowSelect
End Sub
Private Sub Table1DataGridView_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles Table1DataGridView.CellContentClick
If e.ColumnIndex = 3 Then
Dim i As Integer = Table1DataGridView.CurrentRow.Index
Form2.Table1BindingSource.Filter = "id_name=" & Table1DataGridView.CurrentRow.Cells(0).Value
Form2.ShowDialog()
Me.Table1TableAdapter.Fill(Me.MDataSet.table1)
Table1DataGridView.Rows(i).Cells(3).Selected = True
End If
End Sub
End Class