急！在线等待。on error goto语句的问题

Question

在VB中能不能定义一个公用的on error goto语句，当某个sub运行出错时就自动跳转，而不用在每个sub里定义。

Answer 1

可以做一个全局(在模块中声明为Public)的错误处理函数~

Answer 2

viena(维也纳nn-实心木头人石欠RUKYO) 
说的对，这样也就实现了统一错误处理，不过最麻烦的就是在很多过程头要写On Error Goto ErrLine
和过程底写
Exit sub
ErrLine:
 call handleErr()真够麻烦的~~~

Answer 3

如果在一个sub中发生了错误，并且这个sub没有错误处理的话，会自动的由上一层sub的错误处理来处理，如果上一层sub也没有错误处理的话，就继续向上一层转发错误......如果都找不到错误处理，程序就会异常退出。

Answer 4

可以在模块中定义一个public的过程，然后再其他的过程中调用，做软件的时候用过，虽然要在各个过程中写on error goto之类的语句，但总体效果还是很好用的。可以自己定义错误信息，然后检测。
如case 1:
    msgbox "no load database!"
  case 2:
    msgbox "data error!" 等等。
提示一下，如果想把错误处理作好，最好自己在写一个中央错误处理程序，把每一次的error都记录下来，形成错误报告，我做过，效果很不错的，比系统调试要好很多！！！