[asemshahen5]

ضع هذا الكود في مديول :

PHP كود :

   Public Sub DgvValue(Dgv As DataGridView, btn As Button)
        Dim i As Integer = 0
        Dim x As Integer = 0
        Dim bool As Boolean = Dgv.AllowUserToAddRows
        If Dgv.AllowUserToAddRows = True Then
            Dgv.AllowUserToAddRows = False
        End If
        If Dgv.Rows.Count > 0 Then
            For Each Col As DataGridViewColumn In Dgv.Columns
                For Each row As DataGridViewRow In Dgv.Rows
                    If row.Cells(Col.Name).Value.ToString.Length = 0 Then
                        i += 1
                    ElseIf Not row.Cells(Col.Name).Value.ToString.Length = 0 Then
                        x += 1
                    End If
                Next
            Next
            If i > 0 Then
                btn.Visible = False
                MsgBox("عدد الخلايا الفارغة : " & i)
            ElseIf i = 0 Then
                btn.Visible = True
                MsgBox("عدد الخلايا الممتلئة : " & x)
            End If
        End If
        Dgv.AllowUserToAddRows = bool
    End Sub 


و هذا كود الاستخدام :

PHP كود :

DgvValue(DataGridView1, Button2)