21-11-17, 08:36 AM
الله يعطيك العافية والله تعجز اللسان عن التعبير والشكر لك اخي الكريم
تمام لاكن بعد هذا الكود
If e.KeyChar = ChrW(Keys.Enter) Then
dgv_data.ClearSelection()
Dim dgvRow As DataGridViewRow = (From x In Me.dgv_data.Rows Where x.Cells(0).Value = sender.Text).SingleOrDefault
If Not IsNothing(dgvRow) Then
dgv_data.FirstDisplayedScrollingRowIndex = dgvRow.Index
dgv_data.Rows(dgvRow.Index).Selected = True
End If
End If
اذا ضغطنا على زر Delete احتاج منه حذف السطر كامل
تمام لاكن بعد هذا الكود
If e.KeyChar = ChrW(Keys.Enter) Then
dgv_data.ClearSelection()
Dim dgvRow As DataGridViewRow = (From x In Me.dgv_data.Rows Where x.Cells(0).Value = sender.Text).SingleOrDefault
If Not IsNothing(dgvRow) Then
dgv_data.FirstDisplayedScrollingRowIndex = dgvRow.Index
dgv_data.Rows(dgvRow.Index).Selected = True
End If
End If
اذا ضغطنا على زر Delete احتاج منه حذف السطر كامل

