Question

我有下面的代码可以正常工作，尽管我希望它仅在整个行为空时才删除该行。目前，如果第一列中没有文本，即使其他列中可能有文本，它也会删除该行。

也要修剪文本，因为有时列中有空格而没有文本。这样可以确保删除空白行。

非常感谢您的帮助。

谢谢

For i As Integer = dt.Rows.Count - 1 To 0 Step -1
Dim row As DataRow = dt.Rows(i)
If row.Item(0) Is Nothing Then
   dt.Rows.Remove(row)
ElseIf row.Item(0).ToString.Trim = "" Then
   dt.Rows.Remove(row)
End If

下一步

Answer 1

您仅从数据表而不是从数据库中删除行。下面的代码可以帮助您。

Dim valuesarr As String = String.Empty
For i As Integer = 0 To dt.Rows.Count - 1
    Dim lst As New List(Of Object)(dt.Rows(i).ItemArray)
    For Each s As Object In lst
        valuesarr &= s.ToString 'can use trim here if you want to delete spaces
    Next
    If String.IsNullOrEmpty(valuesarr) Then
        'Remove row here, this row do not have any value
        dt.Rows(i).Remove()
    End If
Next

VB.net从DT删除行

1 个答案: