منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم

لدي datagridview1 و datagridview2 يحتويان على نفس العمود الاول الذي هو code

اريد عند تحديد صف من datagridview1 يتحدد نفس صف datagridview2

بارك الله فيكم

ملاحظة : datagridview1 و datagridview2 يوجدان في نفس الفورم

هل من مساعد ؟

PHP كود :

   Private Sub DataGridView1_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        DataGridView2.SelectionMode = DataGridViewSelectionMode.FullRowSelect
        DataGridView2.ClearSelection()
        For i = 0 To DataGridView2.Rows.Count - 1
            If DataGridView1.CurrentRow.Cells(0).Value = DataGridView2.Rows(i).Cells(0).Value Then
                DataGridView2.Rows(i).Selected = True
            End If
        Next
    End Sub 

(16-11-19, 06:46 PM)asemshahen5 كتب : [ -> ]
PHP كود :

Private Sub DataGridView1_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellClick DataGridView2.SelectionMode = DataGridViewSelectionMode.FullRowSelect DataGridView2.ClearSelection() For i = 0 To DataGridView2.Rows.Count - 1 If DataGridView1.CurrentRow.Cells(0).Value = DataGridView2.Rows(i).Cells(0).Value Then DataGridView2.Rows(i).Selected = True End If Next End Sub

جاري التجريب

(16-11-19, 07:28 PM)sofiane-phy كتب : [ -> ]
(16-11-19, 06:46 PM)asemshahen5 كتب : [ -> ]
PHP كود :

Private Sub DataGridView1_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellClick DataGridView2.SelectionMode = DataGridViewSelectionMode.FullRowSelect DataGridView2.ClearSelection() For i = 0 To DataGridView2.Rows.Count - 1 If DataGridView1.CurrentRow.Cells(0).Value = DataGridView2.Rows(i).Cells(0).Value Then DataGridView2.Rows(i).Selected = True End If Next End Sub

جاري التجريب

بارك الله فيك ، هل من الممكن المؤشر الموجود قبل الصف (لا تضحك علي) ايضا ينتقل مع التحديد لاحظ الصورة

تفضل هذا الكود كاملا و الكمال الله عز وجل :

PHP كود :

   Private Sub DataGridView1_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        DataGridView2.SelectionMode = DataGridViewSelectionMode.FullRowSelect
        DataGridView2.ClearSelection()
        For i = 0 To DataGridView2.Rows.Count - 1
            If DataGridView1.CurrentRow.Cells(0).Value = DataGridView2.Rows(i).Cells(0).Value Then
                DataGridView2.Rows(i).Selected = True
                DataGridView2.CurrentCell = DataGridView2.Rows(i).Cells(0)
            End If
        Next
        MsgBox(DataGridView2.CurrentRow.Cells(1).Value)
    End Sub 

بارك الله فيك أخي [b]asemshahen5[/b] عمل ممتاز

الحمد الله و الشكر الله رب العالمين ...