[طالب برمجة]

الاول
ضع رقم العمود بدل الصفر

PHP كود :

Dim allChecked As Boolean = True
For Each r As DataGridViewRow In DataGridView1.Rows
    If Not r.IsNewRow Then
        If r.Cells(0).Value = False Then
            allChecked = False
            Exit For
        End If
    End If
Next
If allChecked Then MsgBox("") 


الثاني
ضع رقم العمود بدل الصفر

PHP كود :

Dim lst As New List(Of Double)
For Each r As DataGridViewRow In DataGridView1.Rows
    lst.Add(r.Cells(0).Value)
Next
MsgBox(lst.ToArray.Max)