请教老师,如何增加判断,若某单元格为空,则无法存盘,并有提示信息
BeforeSaveDataRow事件
If e.DataRow.isnull("某列") Then '判断是否不符合验证要求
MessageBox.Show("某列不能为空","存盘失败",MessageBoxButtons.OK,MessageBoxIcon.Exclamation) '提示用户
e.Cancel = True '取消存盘
End If
已经在datarowadded 中设置了增加行后保存,能否改成关闭系统前提示
能不能为空,提示后不能关闭项目,必须不为空才能关闭项目
BeforeCloseProject事件
If DataTables("表B").Find("[状态] Is Null") Isnot Nothing Then
Messagebox.Show("存在状态列为空的记录,不能关闭项目?","提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
e.Cancel = True '取消关闭项目
End If