主题：如何捕获 .AllowAddNew =False 引发的系统错误提示？

请教狐狸爸爸及各位大侠：

根据帮助文档：

希望只能在"产品.订单"这个关联表中编辑数据，而不能在订单主表中编辑数据，只需：

Tables("订单").AllowEdit = False
Tables("产品.订单").AllowEdit = True

类似的，我修改了 .AllowAddNew 属性

然后，在订单表的 BeforeAddDataRow 事件中，尝试捕获系统提示是错误（终端用户不喜欢这类提示）

‘－－ 不成功代码1

If CurrentTable.AllowAddNew = False
  messagebox.Show("我们强烈建议您在产品所对应的项目名下增加新记录 ^_^","温馨提示")
'  Return
End If

‘－－ 不成功代码2

Try
   '
Catch ex As Exception
   messagebox.Show("我们强烈建议您在产品所对应的项目名下增加新记录 ^_^","温馨提示")
End Try