- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
2 运行错误VB在运行代码时指令代码执行了一非法操作引起的误指。例如,除法时分母为零,被操作的驱动器未准备好或磁盘读写有错。或数组下标超界、数据溢出等。运行出错也将弹出一个子窗口,提示出错信息。15.2 VB6.0系统调试工具15.2.1 设置自动语法检测在VB集成开发环 境中,选择“工具”菜单的“选项”命令,再在打开的“选项”对话框中选“编辑器”标签,15.2.2 VB调试工具Visual Basic 的调试包括:断点、中断表达式、监视表达式、通过代码一次经过一个语句或一个过程、显示变 量和属性的值。1、 调试工具栏15.3 调试和排错方法VB的三种工作模式设计模式、运行模式和中断模式控制程序的运行启动对象及控制程序的运行逐语句运行逐过程运行从过程中跳出2. 设置断点15.3.3 程序调试窗口有三个调试窗口,它们是:“立即”窗口、“监视”窗口、和“本地”窗口。可单击视图菜单中的对应命令打开这些窗口。(1)“立即”窗口显示代码中正在调试的语句所产生的信息,或直接往窗口中键入的命令所请求的信息。(2)在中断模式下,可自动显示出所有在当前过程中的变量声明及变量值。(单击调试工具栏上的“本地窗口”按扭或选择“视图”菜单的“本地窗口”显示),如图15-8所示。(3) “监视”窗口显示当前的监视表达式,在代码运行过程中可决定是否监控这些表达式的值。例15.1、调试第六章例6.4传值、传址例题,观察变量的虚实结合过程。15.4 出错处理所谓错误处理,就是允许编写的应用程序对错误进行响应。当一个错误发生了,程序能捕捉到这一错误,并可按程序设计者事先设计的方法来处理这一错误。常规下通过以下步骤在应用程序中增加指令捕捉和处理运行错误:1、设置错误陷阱在程序适当的地方加入一些语句来捕捉错误,一旦错误发生,程序的运行将转移到错误处理程序,根据所捕获到的错误代码告诉应用程序应当怎样操作。2、编写错误处理程序当程序中出现运行错误时,程序的运行将转到错误处理程序,错误处理程序根据可预知的错误类型决定采取何种措施。1. 设置错误陷阱使用On Error语句可设置陷阱,捕捉错误。On Error语句有如下形式:On Error Resume Next发生错误时,忽略错误行,继续执行下一语句。On Error GoTo 语句标号发生错误时,使程序转跳到语句标号所指示的程序块。On Error GoTo 0表示当发生错误时,不使用错误处理程序块。2.编写错误处理程序编写错误处理程序一般要使用到Err 对象,它是一个系统对象,可以通过Err对象来获取错误的消息。当出现VB错误时,有关错误的信息存储在Err对象中。Err对象每次只维护一个错误的信息。当出现新的错误时,Err对象将更新为新的错误信息。Err 对象的缺省属性是Number属性。当运行时错误发生时, Err对象的属性被填入明确识别错误的信息以及处理这个错误所使用的信息。当On Error捕捉到错误后,Err对象的属性Number指示对应错误号。在错误处理程序块中可使用“Select Case Err.Number”或“If Err.Number = ”语句编写出错处理。例如,下面的Test过程是Number 属性在错误处理过程中的典型用法。Private Sub test() On Error GoTo out Dim x, yx = 1 / y 引发一个“除以零”的错误 Exit Subout:MsgBox Err.Number MsgBox Err.Description 检查是否发生“除以零”的错误 If Err.Number = 11 Theny = y + 1 End If ResumeEnd Sub3.退出错误处理在错误处理程序中,当遇到 Exit Sub、Exit Function、 End Sub、End Function等语句时,将退出错误捕获。在错误处理程序结束后,要恢复原有的运行。可用Resume语句。语法:Resume 重新执行产生错误的语句Resume Next重新执行产生错误的语句的下一语句Resume 语句标号 从语句标号初恢复执行一般来说,一些可以修正的错误,可使用Resume,而在错误处理程序不能修正错误时使用Resume Next或 Resume 语句标号。例15.2 编写一个判断一个给定的文件是否存在的函数,并能处理无效驱动器或软盘驱动器没有磁盘等设备出错问题。例15.3 编写简单的错误处理程序。处理当在文本中输入数据超过整型数的最大值32767时给出错误提示,并可重新输入。15.5 生成执行文件和制作安装程序15.5.1 生成执行文件从“文件”菜单中选取“生成projectname.exe”,将打开“生成工程”对话框,如图15-17所示。这里 “project
原创力文档


文档评论(0)