主题：[求助]判断为空，如何不增加行

If Tables("表A").Current IsNot Nothing Then
    If Tables("表A").Current.IsNull("姓名") Then
        e.DataRow.Reject()
        MessageBox.Show("请先在<表A>中录入姓名!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Else
        e.DataRow("姓名") = Tables("表A").Current("姓名")
    End If
End If