使用场景,自定义录入界面四中。点击新增客户按钮后,打开客户录入窗体。这个时候不做录入操作,直接关闭窗口。
代码:
e.Form.DropDownBox.CloseDropdown(False)
Dim r As Row = Tables("Tb_CusInfo").AddNew()
Forms("客户资料").Open()
Try
MessageBox.Show("1")
r.Save()
MessageBox.Show("2")
Dim tbl As Table = Tables("客户筛选_tbCus")
Catch ex As Exception
MessageBox.Show("3")
End Try
由于字段不能为空的约束导致r.Save()中插入异常。
理论上输出为:1,3(r.Save()后面的代码不能执行)
实际上输出为:1,2(r.Save()后面代码执行了)
也就是说,Try Catch 没有起作用。
在论坛上也看到过类似问题的帖子,但是没有明确解答。
请问,对于r.Save这种保存,Try Catch如何使用?
以上,谢谢。