Dim t As Table = e.Form.Controls("Table1").Table
Try
t.DataTable.DeleteFor("dwmc is null")
MessageBox.Show(1)
t.AllowAddNew=False
t.AllowEdit=False
t.AllowDelete=False
MessageBox.Show(2)
t.DataTable.Save
MessageBox.Show(3)
e.Form.Controls("txtZt").Text="查看状态"
MessageBox.Show(4)
Functions.Execute("ButtonZt")
MessageBox.Show(5)
Catch ex As Exception
MessageBox.Show("关键字重复或空值,不能保存!")
End Try
在2后出错,问题就在 t.DataTable.Save 执行后,没有跳到catch
[此贴子已经被作者于2014-2-28 10:57:41编辑过]