主题：[求助]

如果是全部为空，要这样写

For i As Integer = Tables("表A").Rows.Count - 1 To 0 Step -1
    Dim r As Row = Tables("表A").Rows(i)
    If r.IsNull("第一列") AndAlso r.IsNull("第二列") Then
        r.Delete
    Else
        r.Save
    End If
Next

试了试，还是不行啊，老师，换了代码后，点一下，所有的行全部删除了，

 不可能。看10楼、11楼啊

 例子上传上来。