VB程序设计第十三章.pptVIP

13.3实训指导 13.3.1技能训练目的 ☆ 熟练掌握进入Visual Basic程序三种模式的的常用方法。 ☆ 掌握Visual Basic调试工具的使用方法。 ☆ 熟练掌握断点与逐语句相结合的调试方法。 ☆ 掌握利用On Error语句、Resume语句和Err对象进行错误捕捉与处理的方法。 13.3.2技能训练内容 【实训8.1】编写简单除法运算程序，要求程序具备错误处理功能。 窗体设计：在窗体上添加三个文本框（Text1、Text2和Text3）、三个标签（其中两个分别将其Caption属性设置为“+”号和“=”号）；再添加一个命令按钮（Button1）。各个控件的相关属性设置如图13-1所示。 图13-1 程序代码如下： Private Sub Form_Load() Text1.Text = Text2.Text = Text3.Text = Text3.Visible = False End Sub Private Sub Command1_Click() Dim Msg1 As String, Msg2 As String Msg2 = 除法的运行错误处理 Text3.Text = Text3.Visible = True 错误捕获语句 如果出现错误转到错误处理例程 On Error GoTo errHandle Text3.Text = (Text1.Text) / (Text2.Text) 退出 Exit Sub 错误处理例程开始 errHandle: Select Case Err.Number 0作除数 Case 11 Msg1 = 0作除数: MsgBox Msg1, 48, Msg2 按“确定”后忽略错误 Resume Next 除数或被除数为非数字 Case 13 Msg1 = 出现非数字: MsgBox Msg1, 48, Msg2 按“确定”后忽略错误 Resume Next 出现意外错误 Case Else Msg1 = 没有预料到的错误 Chr$(13) Chr$(10) _ 错误代码为 Err.Number Chr$(13) Chr$(10) _ 错误性质为 Err.Description MsgBox Msg1, 48, Msg2 按“确定”后忽略错误 Resume Next End Select End Sub 启动程序运行时的界面如图15-13所示。如果文本框1中输入一非零实数，而在文本框2中输入了数字“0”，点击命令按钮后，则会出现如图15-14所示的消息提示框；如果在文本框1或文本框2中至少输入了一个非数字字符，点击命令按钮后，则会出现图15-15所示的消息提示框； 若文本框1和文本框2中均输入了数字“0”，点击命令按钮后，会出现如图15-16所示的消息提示框；若在两个文本框中均输入了实数，且文本框2中的数字非零，则可正确地计算出两个数的除法，如图15-17所示。 图13-2 图13-3 图13-4 图13-5 图13-6 第13章程序调试与错误处理 13.1 知识要点 13.2 习题与解答 13.3 实训指导 13.4 测验题 1、程序错误概述 （1）程序错误类型 ①编译错误 笼统地说，编译错误是指程序在编译过程中出现的错误。编译错误的产生原因是在程序代码中出现了不正确的代码。 Visual Basic具有功能强大的智能编辑功能，程序中的语法错误在代码编辑阶段就会被自动检测和识别。 13.1知识要点 ②运行错误 运行错误是指程序顺利通过编译后（即已经没有编译错误），在运行期间由于执行了程序中的某些非法操作或力图执行一个操作失败时所发生的错误。 ③逻辑错误 逻辑错是指程序在没有编译错误和运行错误的前提下，顺利运行程序，但是却得不到预期的结果。Visual Basic不会针对逻辑错误给出错误提示，而且逻辑错误本身又具有隐蔽性，所以这种错误的发现和排除难度较大。 （2）程序减少错误的方法 ①在程序中加上Option Explicit语句，避免由于变量名的误用而产生的错误。 ②声明变量时，尽可能说明变量的具体类型，少用Variant类型。 ③加入适当的注释，提高程序的易读性。 ④整个程序中使用统一的变量名、过程名和对象名命名规则。 ⑤为每一个事件过程和普通过程指定一个特定的、明确的目标。 ⑥对于预感会出现错误的地方，合理添加错误捕捉与处理程序。 2、中断模式 （1）程序运行模式 Visual Basic有设计模式、运行模式和中断模式三种不同的工作模式。 ①设计模式 在设计模式下，用户可以完成建立应用程序的所有步骤，在这个模式下