Citar
For Each dgvr As DataGridViewRow In Me.Dgview2.Rows
dgvr.Cells(0).Value = 0
DIM I AS INTEGER
FOR I = 1 TO Dgview2.ColumnCount - 1
If not dgvr.Cells(i).Value Is Nothing Then
''' no es vacio '''
dgvr.Cells(0).Value + =1
End If
NEXT
Next
dgvr.Cells(0).Value = 0
DIM I AS INTEGER
FOR I = 1 TO Dgview2.ColumnCount - 1
If not dgvr.Cells(i).Value Is Nothing Then
''' no es vacio '''
dgvr.Cells(0).Value + =1
End If
NEXT
Next