[silverlight]

السلام عليكم ورحمة الله وبركاته

كتابة الاكواد علي شكل مكتبات بها دوال و روتينات يساعد المبرمج كثيرا في عدم كتابة الكود اكثر من مرة
بالطبع هذا الأمر يعود الي كيفية تفكير كل مبرمح

الكود التالي يوضح كيفية اختيار صف واحد من الداتا حريد فيو  و أيضا يستخدم لإختيار جميع الصفوف

PHP كود :

   Friend Function SelectRows(ByVal grid As DataGridView) As Boolean

        ' Method 1
        'For j As Integer = 0 To grid.Rows.Count - 1
        '    Dim row As DataGridViewRow = grid.Rows(j)
        '    Me.SelectRow(grid, row.Index)
        'Next

        ' Method 2
        For Each r As DataGridViewRow In grid.Rows
            Me.SelectRow(grid, r.Index)
        Next

        Return False
    End Function

    Friend Function SelectRow(ByVal grid As DataGridView, ByVal row As Integer) As Boolean
        If (row >= grid.RowCount) Then
            row = (grid.RowCount - 1)
        End If
        If (row >= 0) Then
            grid.CurrentCell = grid.Rows.Item(row).Cells.Item(0)
            grid.Rows.Item(row).Selected = True
            Return True
        End If
        Return False
    End Function 


الكود أعلاه يستخدم بتمرير الداتا جريد فيو الي الدالة فيتم اختيار جميع الصفوف الموجودة في الدات جريد  فيو
أو يتم تمرير الداتا جريد فيو مع رقم الصف الي الدالة و ب التبعية اختيار هذا الصف

PHP كود :

       ' select allRows
        SelectRows(Me.DataGridView1)

        ' or select singlRow based on its index
        Dim index As Integer = 2
        SelectRow(Me.DataGridView1, index)