12-05-18, 05:31 PM
الصفحات : 1 2
12-05-18, 06:27 PM
إذا كان الإنتقال عموديا ..
كود :
Protected Overrides Function ProcessCmdKey(ByRef msg As System.Windows.Forms.Message, keyData As System.Windows.Forms.Keys) As Boolean
If keyData = Keys.Enter AndAlso Me.DataGridView1.IsCurrentCellInEditMode Then
Me.DataGridView1.EndEdit()
DataGridView1.CurrentCell = DataGridView1.CurrentRow.Cells(DataGridView1.CurrentCell.ColumnIndex + 1)
Return True
Else
Return MyBase.ProcessCmdKey(msg, keyData)
End If
End Function12-05-18, 06:42 PM
اشكرك اخى الكريم على الرد ولكن انا اريد الانتقال من الخلية (0) الى الخلية (4) للتعديل فيها
12-05-18, 06:57 PM
(12-05-18, 06:42 PM)atef_020 كتب : [ -> ]اشكرك اخى الكريم على الرد ولكن انا اريد الانتقال من الخلية (0) الى الخلية (4) للتعديل فيها
لم توضّح هذا أخي الكريم بمشاركتك
12-05-18, 07:23 PM
12-05-18, 08:15 PM
تفضل قم باستخدام الكود التالى
بالتوفيق
كود :
Private Sub DataGridView1_KeyDown(sender As Object, e As KeyEventArgs) Handles DataGridView1.KeyDown
If e.KeyCode = Keys.Enter Then
SendKeys.Send("{up}")
SendKeys.Send("{right}")
End If
End Sub
Private Sub DataGridView1_CellEndEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
SendKeys.Send("{up}")
SendKeys.Send("{right}")
End Subبالتوفيق
12-05-18, 11:07 PM
(12-05-18, 08:15 PM)elgokr كتب : [ -> ]تفضل قم باستخدام الكود التالىاشكرك اخى الكريم بس للاسف لم ينتقل الى اى خانة
كود :
Private Sub DataGridView1_KeyDown(sender As Object, e As KeyEventArgs) Handles DataGridView1.KeyDown
If e.KeyCode = Keys.Enter Then
SendKeys.Send("{up}")
SendKeys.Send("{right}")
End If
End Sub
Private Sub DataGridView1_CellEndEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
SendKeys.Send("{up}")
SendKeys.Send("{right}")
End Sub
بالتوفيق
12-05-18, 11:14 PM
اظن فيه موضوع طويل حول هذا لكن لا اذكر رقم الموضوع.
12-05-18, 11:30 PM
(12-05-18, 11:14 PM)سعود كتب : [ -> ]اظن فيه موضوع طويل حول هذا لكن لا اذكر رقم الموضوع.
ياريت اخى لو تساعدنى فى هذا . جزاك الله خيرا
12-05-18, 11:46 PM
(12-05-18, 11:07 PM)atef_020 كتب : [ -> ](12-05-18, 08:15 PM)elgokr كتب : [ -> ]تفضل قم باستخدام الكود التالىاشكرك اخى الكريم بس للاسف لم ينتقل الى اى خانة
كود :
Private Sub DataGridView1_KeyDown(sender As Object, e As KeyEventArgs) Handles DataGridView1.KeyDown
If e.KeyCode = Keys.Enter Then
SendKeys.Send("{up}")
SendKeys.Send("{right}")
End If
End Sub
Private Sub DataGridView1_CellEndEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
SendKeys.Send("{up}")
SendKeys.Send("{right}")
End Sub
بالتوفيق
تاكد فقط بان الاداء DataGridView
باسم DataGridView1 كما فى الكود
او قم بتغيير الاسم فى الكود للاسم الخاص بالاداء لديك
وسيعمل معك تمام بدون اى مشكلة
الصفحات : 1 2