جرب الكود دة
Private Sub DataGridView1_DoubleClick(sender As System.Object, e As System.EventArgs) Handles DataGridView1.DoubleClick
'تعبئة الخلايا بمحتويات الصف المحدد
On Error Resume Next
Me.TextBox1.Text = DataGridView1.Item(0, DataGridView1.CurrentCellAddress.Y).Value
Me.ComboBox1.SelectedValue = DataGridView1.Item(1, DataGridView1.CurrentCellAddress.Y).Value
End Sub
وممكن دة كمان
Private Sub DataGridView1_CellEnter(sender As System.Object, e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEnter
On Error Resume Next
Me.TextBox1.Text = DataGridView1.Item(0, DataGridView1.CurrentCellAddress.Y).Value
Me.ComboBox1.SelectedValue = DataGridView1.Item(1, DataGridView1.CurrentCellAddress.Y).Value
End Sub
Private Sub DataGridView1_DoubleClick(sender As System.Object, e As System.EventArgs) Handles DataGridView1.DoubleClick
'تعبئة الخلايا بمحتويات الصف المحدد
On Error Resume Next
Me.TextBox1.Text = DataGridView1.Item(0, DataGridView1.CurrentCellAddress.Y).Value
Me.ComboBox1.SelectedValue = DataGridView1.Item(1, DataGridView1.CurrentCellAddress.Y).Value
End Sub
وممكن دة كمان
Private Sub DataGridView1_CellEnter(sender As System.Object, e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEnter
On Error Resume Next
Me.TextBox1.Text = DataGridView1.Item(0, DataGridView1.CurrentCellAddress.Y).Value
Me.ComboBox1.SelectedValue = DataGridView1.Item(1, DataGridView1.CurrentCellAddress.Y).Value
End Sub
