[عمار عيثاوي]

السلام عليكم كيف استطيع التنقل داخل الداتا كريد عن طريق زر الانتر ويكون التنقل افقي
واني جدا ممنون

[vbnet]

السلام عليكم كيف استطيع التنقل داخل الداتا كريد عن طريق زر الانتر ويكون التنقل افقي
واني جدا ممنون

منقول

نضع الكود التالي في Class جديد ثم نذهب إلى القائمة Build ونختار Build المشروع وبعدها نجد أداة جديدة في أعلى الأدوات إسمها DataGridViewEX

كود :

Public Class DataGridViewEX
    Inherits System.Windows.Forms.DataGridView

    Protected Overrides Function ProcessDialogKey(ByVal keyData As Keys) As Boolean
        Dim key As Keys = (keyData And Keys.KeyCode)
        If key = Keys.Enter Then
            If Me.CurrentCell.ColumnIndex = Me.Columns.Count - 1 Then
                Me.CurrentCell = Me.Item(0, Me.CurrentRow.Index)
                Return Me.ProcessDownKey(keyData)
            Else
                Return Me.ProcessRightKey(keyData)
            End If
        End If
        Return MyBase.ProcessDialogKey(keyData)
    End Function

    Protected Overrides Function ProcessDataGridViewKey(ByVal e As KeyEventArgs) As Boolean
        If e.KeyCode = Keys.Enter Then
            If Me.CurrentCell.ColumnIndex = Me.Columns.Count - 1 Then
                Me.CurrentCell = Me.Item(0, Me.CurrentRow.Index)
                Return Me.ProcessDownKey(e.KeyData)
            Else
                Return Me.ProcessRightKey(e.KeyData)
            End If
        End If
        Return MyBase.ProcessDataGridViewKey(e)
    End Function

End Class

[عمار عيثاوي]

بارك الله فيك اخي الكريم
جاري التجربة

[عمار عيثاوي]

اخي الكريم الكود لا يعمل معي
ممكن توضيح اكثر لان انا مبرمج مبتداء
جزاك الله خيرا

[a_almisery]

* - قم باضافه كلاس

من نافذه المشروع اضغط بزر الايمن واختر new ثم class
ثم افتح الكلاس وانسخ في الكود الذي اعطاك الاخ vb.net

[vbnet]

...الكود لا يعمل معي
ممكن توضيح اكثر لان انا مبرمج مبتداء
...

.....

---> من القائمة Project واختر ...Add Class واكتب الاسم DataGridViewEX



---> في نافذة كود DataGridViewEX الجديدة الصق الكود السابق



---> من القائمة Build اختر Build WindowsApplication1 (يجب أن لا يحتوي برنامجك على أي أخطاء لتتم هذه العملية بنجاح)



---> أظهر النموذج في وضع التصميم واذهب لأعلى الأدوات وأضف الأداة الجديدة DataGridViewEX إلى النموذج واستخدمها بدلا من DataGridView القديمة

[عمار عيثاوي]

عاشت ايدك وبارك الله فيك
الهم اجعل هذا العمل في ميزان حسناتك وجعل اجره لك ولوالديك