主题：隐藏行

这样？

If e.DataCol.Name = "已付"
    If e.DataRow("已付") = True
        e.DataRow("是否结清") = "已结清"
        Syscmd.Row.HideSelectedRows()
    Else
        e.DataRow("是否结清") = Nothing
    End If
End If