主题：隔行保存？

Dim tbl As Table = e.Form.Controls("Table3").Table

Dim r As Row

For intA as integer = tbl.rows.count-1 to 0 step -1

    dim r as row = tbl.rows(intA)

    Dim isnull As Boolean = True

    For Each c As Col In tbl.Cols

        If r.IsNull(c.name) = False  Then

            isNull = False

            Exit For

        End If

    Next

    If isnull Then

        r.Delete

    End If

Next

tbl.DataTable.Save

tbl.DataTable.RemoveFor("")