VB软件开发中的错误捕获及处理技术
出处：网络

    在VB软件开发中，错误信息的捕获及处理是非常重要的部分。有些错误在编译时即可发现、排除。但还有一些错误是在软件运行时由于用户错误的输入等方面的原因而产生的，这就需要软件开发者在软件设计和开发时注意处理这方面的错误。VB在捕获及处理错误信息方面有两个重要的函数。一个是ERROR，该函数捕获错误信息。另一个是ERR,该函数捕获、返回错误信息代码。当捕获到错误信息代码后，软件开发者就可以根据错误代码来判断、决定程序是退出运行（exit sub）、是继续执行(resume next)、还是进行错其他处理(goto语句标号)。VB还有一个重要的语句ON ERROR，该语句当VB程序运行产生错误时触发。开发者可用该语句结合ERR和ERROR函数来该用户提供错误信息、并决定程序下一步工作。也可作成有用户独自选择下一步工作。笔者开发了一个捕获、显示错误信息的过程show error()。发生错误时调用该过程即可，下面是过程源代码及调用例子：

Sub showerror ()

Dim s As String

Dim crlf As String

crlf = Chr(13) + Chr(10)

s = "运行时发生下列错误:" + crlf

注释：add the error string

s = s + Error$ + crlf

注释：add the error number

s = s + "错误码为: " + CStr(Err)

Beep 注释：beep and show the error

X= MsgBox (s，2)
End Sub
调用例子：
sub abc()
onerror goto 1’发生错误时转到 1
程序体
exit sub

1

showerror

if err=… then
错误处理部分
endif
exit sub

end sub

[返回]

首页 | 设为首页 | 加入收藏 | 关于本站 | 友情链接 | 版权声明