在VB6中,可以使用如下语句处理程序错误,以避免程序突然中途退出。
1
On
Error
goto
errHandler:
2
'
Input your code here
3
Exit
Sub
4
5
errHandler:
6
MsgBox
Err.Description, vbCritical,
"
Error:
"

2


3

4

5

6
