VB怎样才能获得数据库中的报错

Question

例如我在数据库中的表T1中的NAME中设置了唯一约束,这表明了NAME中不能重复,但如果我在界面中操作后,怎样才能在VB界面提示错误"姓名不能重复",或者,怎样才能在界面的窗口里显示数据库里的报错?

Answer 1

在函数开始处，写on error goto dberr
在exit function后
写dberr:
然后再写msgbox err.Description 

Answer 2

sub test()
on error goto err_test    '启动一个错误处理程序，发生错误中转到err_test处理
    '你的正常操作代码
　　　
    exit sub   '操作正常到此终止
err_test：
    msgbox Err.Description  '显示信息
end sub 

Answer 3

一般的方法是先检索，如果存在就报错，不存在就执行写入但一涉及多用户或大规模访问的话，就必须进行错误捕获，然后判读err.number进行相应的错误处理