错误处理与调试

学习vb这么长的时间了，也遇到很多错误，这周总结一下自己以前学习中遇到的错误，以及处理方法。这篇博客分为三部分来写。

（一）错误类型

配对结构不完整举例： 变量未定义举例：

Dim i as integer Dim j as integer

Dim j as integer For i=1 to 10

For i=1 to 10 For j=1 to 10

For j=1 to 10 Next

Next Next

(二)错误处理

1.On error resume next:用来将错误屏蔽掉，当程序出现错误时跳过错误执行下面的语句。例如：

Private sub command1_click()

Activecontrol.text=”active control”

Activecontrol.caption=”active control”

Activecontrol.min=0

Activecontrol.max=100

End sub（这样的方法容易忽略所有可能的错误）

2.on error goto xxx：用来处理可捕获错误的基础语句，程序会自动跳到指定的语句执行。例如：

Private sub command1_click()

On error goto fileError

With commandialog1

Showopen

Open.filename for unput as #1

Text1.text=input$(lof(1),#1)

Close #1

End with

feleError:

msgbox”file not exit”

End sub

3.On error goto 0:用来关闭错误陷阱。

例如：在这里我们打开错误陷阱来捕获用户单击common dialog控件中的font对话框中的cancel按钮时出现错误，但是如果用户单击cancel按钮时，就应该关闭错误陷阱，将其的cancelerror属性设置为true。

（三）调试功能 调试工具

设置断点;

添加调试监视窗口：这样可以随时看到变量的变化

立即窗口：可以看到变量或表达式的当前值。可以再立即窗口中输入表达式进行求值，这需要输入的表达式前面前面添加一个问号，然后回车。例如：

除此之外还有很多处理的方法，例如，清除所有调试点，程序移动至光标处等等，