0

これは、null の場合に現在のセルを知るコードです。

If dgv.CurrentCell.Value Is Nothing Then
    MsgBox("Cell is empty")
Else
    MsgBox("Cell contains a value")
End If

今私が欲しいのは、ボタンを 1 回クリックするだけで、すべてのセルに null があるかどうかをどのように知ることができるかということです。たとえば、5 の列と 25 の行があります。

ありがとうございました

4

4 に答える 4

4

最後に、私は実用的なコードを作成しました。これは次のとおりです。

For r = 0 To dgv.RowCount - 1
        If IsDBNull(dgv.Rows(r).Cells.Item(0).Value) _
      Or IsDBNull(dgv.Rows(r).Cells.Item(1).Value) _
      Or IsDBNull(dgv.Rows(r).Cells.Item(2).Value) _
      Or IsDBNull(dgv.Rows(r).Cells.Item(3).Value) _
      Or IsDBNull(dgv.Rows(r).Cells.Item(4).Value) _
      Then
            MsgBox("Blank fields are note allowed" + Environment.NewLine + "Please enter a number")
    Next
于 2013-09-05T09:11:44.933 に答える
1

これを試して ..

For y As Integer = 0 to dgv.Rows.Count - 1
  For x As Integer = 0 to dgv.ColumnCount - 1
    If IsDBNull(dgv.Rows(y).Cells(x).Value) Then
        MsgBox("Cell is empty")
    Else
        MsgBox("Cell contains a value")
    End If
  Next
Next
于 2013-09-05T09:05:49.660 に答える
0

これを試して:

For r As Integer = 0 To dgv.RowCount - 1
    Dim r As DataGridViewRow = dgv.Rows(r)
    For c As Integer = 0 To dgv.ColumnCount - 1 
        If dgv.Rows(r).Cells(c).Value Is Nothing Then
            MsgBox("Cell is empty")
        Else
            MsgBox("Cell contains a value")
        End If
    Next
Next
于 2013-09-05T08:46:41.520 に答える