从零开始掌握VB6，手把手教你优雅处理程序错误

VB的错误处理

在程序的编写过程中难免会遇到各种各样的错误，我们只有把这些错误处理掉才能保证程序畅通无阻的运行。

VB提供的错误处理语句可以中断程序运行中的错误，并且对这些错误语句进行处理，然后继续运行，但是VB只能对“可捕获错误”进行处理。

On Error Resume Next 屏蔽错误

用这条语句的时候，当程序发现错误并不会处理，而是跳过错误来继续执行下面的代码，这样并不是一个好的处理方案，虽然程序不会报错，但是可能会对程序功能的实现有影响。

比如说，下面这个程序，程序的目的是两个文本框相除并把结果显示在窗体的标题上。

请看代码和运行效果：

运行后，文本框里面有非数字，数据类型不匹配，所以程序弹出“数据类型不匹配”接着程序奔溃退出。如果我们加上On Error Resume Next

再看看效果：

加上这条语句以后，程序不会报错了，但是也没有达到程序的要求，窗体的标题也没更改，所以，On Error Resume Next并不是完美的处理方法，除非这些错误可以不用处理。

"On Error GoTo 标签" 处理错误信息

用这个语句来处理的时候 后边要跟着一个标签，遇到错误的时候程序会自动转到标签所指示的代码进行处理。

还拿上一个程序来举例子，我们运行的时候发现如果文本框里面不是数字的话会产生类型不匹配的错误，它的错误号是：13

然后我们就可以这样处理：

这样一来，程序遇到类型不匹配的错误就不会崩溃了，而是跳到错误标签(Cuowu：)执行代码，给出提示或者作出相应的处理。

还有一种情况，当除数为0的时候程序也会报错。

我们在错误处理的时候加上判断错误代码就可以了。