vb.net 数据表中的空白数据导致循环退出，不填充列表视图

Question

我正在使用以下代码从使用访问数据库中的查询检索到的数据集中填充列表视图中的列：

    For Each field As DataRow In dt.Rows()
        If field Is Nothing Then
            MsgBox("there's nothing here")
        End If

        ListViewBatchResults.Items.Add(field(3))

    Next

问题是，一旦遇到空白字段，循环就会退出并且列表视图尚未完成填充，因此遇到的第一个空白字段之后的任何数据都不会显示。

我该如何解决这个问题？

Answer 1

在添加之前尝试检查值是否为null，例如：

 If (Not IsDBNull(field(3))) Then
     Dim lvwItem As ListViewItem = ListView1.Items.Add(field(3).ToString())
     lvwItem.SubItems.Add(field(4).ToString())
 End If

您也可以尝试检查它是null 还是empty，例如：

 If (Not IsDBNull(field(3))) Then
    If (Not String.IsNullOrEmpty(field(3))) Then
       Dim lvwItem As ListViewItem = ListView1.Items.Add(field(3).ToString())
       lvwItem.SubItems.Add(field(4).ToString())
    End If
 End If