如何忽略 datagridview 上的 NULL 条目

Question

我有一段代码从datagridview 中读取整数和日期值。一些k 值中有空条目，我试图让应用程序忽略这些单元格，但我没有任何运气。在线弹出错误 j = datediff....

我尝试过使用 if 语句

If DataGridView1.Rows(e.RowIndex).Cells(k).Value IsNot Nothing Then 但它仍然会产生一个错误，告诉我它无法将DBNull 条目转换为date。

我看不出我做错了什么，因此我们将不胜感激。

    For k = 8 To 52 Step 2

        Dim j As Integer

        If DataGridView1.Rows(e.RowIndex).Cells(k).Value IsNot Nothing Then

            j = DateDiff(DateInterval.Day, DataGridView1.Rows(e.RowIndex).Cells(k).Value, DataGridView1.Rows(e.RowIndex).Cells(k - 2).Value)

            If DataGridView1.Rows(e.RowIndex).Cells(k + 1).Value = 0 Then

                If j > 7 Then
                    DataGridView1.Rows(e.RowIndex).Cells(k - 1).Value = 6
                Else
                End If
            Else
            End If
        End If

    Next k

Answer 1

如果您想在识别编译时可能出现的错误方面获得更多帮助，请在您的项目或文件中设置Option Strict On。

• Nothing 和 DbNull 不一样。
• Nothing 是类型的默认值
• DbNullus 类型，代表数据库NULL 值。
• 只有 DbNull.Value 具有可比性。

For k = 8 To 52 Step 2
    Dim row As DataGridViewRow = DataGridView1.Rows(e.RowIndex)
    If row.Cells(k).Value Is DBNull.Value Or row.Cells(k).Value Is Nothing Then Continue For

    Dim firstDate As Date = DirectCast(row.Cells(k).Value, Date)
    Dim secondDate As Date = DirectCast(row.Cells(k - 2).Value, Date)
    Dim difference As TimeSpan = firstDate - secondData

    If difference.Days > 7 AndAlso row.Cells(k + 1).Value = 0 Then
        row.Cells(k - 1).Value = 6
    End If

Next