主题：关于捕获异常错误

Try
    DataTables("cpcbsj").Save
Catch ex As Exception
   
    MessageBox.Show("保存过程出现问题!当前表中还有新增的产品标配编号及产品标配名称是空白的!请按规范输入标配编号及名称!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Question)
   
End Try

在窗口中有个按钮控件,单击的事件代码如上面所示,目的是当保存当前表的数据时,如果发现保存代码有异常错误就能提示MessageBox.Show中的信息,但我测试时不能按目的提示,系统却提示如下的错误信息,请问为什么会这样?

查看了,不过对在这个事件中设置还不是很明白如何做,请问像我这个情况要在这个事件中设定的话,应该如何才能达到目的呢?能否详细一点说明?

我如果直接设置 e.Cancel=tru,是不会提示那个错误了,但如何提示我想要的信息呢?也试过设置想返回e.Event的内容,比如代码如下(Dim s As String =e.Event
MessageBox.Show(s))但都不成功，返回的是空白的，真的不知这个事件是如何使用的.

问题是系统里有那么多的事件，可能每个事件都会有机会出错的，我要如何去判定是哪一个事件出错，然后弹出具体的错误？

我现在就是e.Event 返回空白，那请问这个事件就不能实现我所想目的了？

Dim s As String =e.Event
If s = "" Then
 MessageBox.Show(e.Message2)
    If e.Message2.Contains("INSERT 失败.") Then
        MessageBox.Show("保存失败!产品标配编号及产品标配名称不能为空!请按规范输入标配编号及名称!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Question)
   End If
End If

现在，我用这样的代码也没有提我要的信息，不知是什么原因？

此主题相关图片如下：qq截图20130909153813.jpg

这是我现在用MessageBox.Show(e.Message2)提示的信息的,而原来那张图是系统本来提示的.

经测试无论如何去做都行不通，难道这是FB的BUG？

真搞不明，那代码应该如何写才能捕捉呢？难道要捕捉一个错误都这么的嘛烦？

我现在这样写也行不通：

Dim s As String =e.Event
If s = "" Then
 MessageBox.Show(e.Message1)
    If e.Message1.Contains("INSERT 失败.") Then
        MessageBox.Show("保存失败!产品标配编号及产品标配名称不能为空!请按规范输入标配编号及名称!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Question)
   End If
End If