预览加载中,请您耐心等待几秒...
1/10
2/10
3/10
4/10
5/10
6/10
7/10
8/10
9/10
10/10

亲,该文档总共25页,到这已经超出免费预览范围,如果喜欢就直接下载吧~

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

第 9 章程序调试的主要任务:查找程序的错误和排除错误 本章主要内容 VB程序中的错误类型 程序工作模式 程序调试 错误处理三类错误类型:编译错误,逻辑错误和运行错误 1.编译错误编译错误是指在程序编译过程中出现的错误。通常是由于不正确书写代码而产生的。 例如:关键字写错,遗漏标点符号,括号不匹配等。较为容易排除。VB提供了自动语法检查功能,能指出并显示这些错误,帮助用户纠正语法错误。 例子:Foort=1To1002.运行错误运行时的错误是指应用程序在运行期间执行了非法操作所发生的错误。 例如,除法运算中除数为零,访问文件时文件夹或文件找不到等。这种错误只有在程序运行时才能被发现。 举例(“下标越界”): PrivateSubForm_Load()DimD(20)AsInteger,kAsIntegerFork=1To30D(k)=k*KNextkEndSub3.逻辑错误逻辑错误使程序运行时得不到预期的结果。这种程序没有语法错误,也能运行,但却得不到正确的结果。 例如,在一个算术表达式中,把乘号“*”写成了加号“+”,条件语句的条件写错,循环次数计算错误等 例如,要求10!,若采用:PrivateSubForm_Load()DimtAsIntegerFori=1To10t=t*iNextiShow:PrinttEndSub运行程序时输出的结果是0 通常,调试程序过程中所花的大部分时间和精力都在逻辑错误上三种工作模式:设计模式、运行模式和中断模式 1.设计模式在设计模式下,可以建立应用程序的用户界面,设置控件的属性,编写程序代码等 2.运行模式在运行模式下,可以测试程序的运行结果,可以与应用程序对话,还可以查看程序代码,但不能修改程序 3.中断模式在中断模式下,可以利用各种调试手段检查或更改某些变量或表达式的值,或者在断点附近单步执行程序,以便发现错误或改正错误进入中断模式的方法:(1)在代码中插入Stop语句; (2)在代码窗口中设置断点(用菜单命令);(3)在代码窗口中设置断点(鼠标操作); (4)在程序运行时强制“中断”; (5)当程序运行出现错误。当检查调试通过后,需要清除断点程序调试一般包括静态检查和动态检查 9.3.1静态检查与动态检查 静态检查程序的基本方法是逐行逐句地读程序,弄清楚每条语句的作用,预见每条语句和模块的执行结果,判断是否与预期结果相一致,这就是静态检查,也称人工检查。 静态检查无误后,就可以进行更有效的动态检查。通过上机调试来发现错误称为动态检查。动态检查的基本方法是输入一组典型的数据来运行程序。程序对这些数据处理结果应是已知的,通过运行后实际结果和预想结果相比较,可以判断程序的正确性例如,为了检验求解一元二次方程ax2+bx+c=0的程序(见第四章例4.14)是否正确,我们可以输入以下四组a,b,c的数值:  第一组:0,1,1预期结果:显示“不是二次方程”第二组:1,-2,1预期结果:x1=1,x2=1(两个相等实根)第三组:1,1,-2预期结果:x1=1,x2=-2(两个不等实根)第四组:1,2,2预期结果:x1=-1+i,x2=-1-i(两个共轭复根) 动态检查中,通常在一些敏感点处设置断点,检查一些变量或表达式的值。使用“调试”菜单或“调试”工具栏 1.切换断点“切换断点”按钮用来设置断点 2.逐语句VB允许逐条语句执行程序,每执行一条语句后就返回中断模式。如果执行的是过程调用的代码(如Call),“逐语句”操作也会跟踪到被调过程中继续一条语句一条语句的执行 3.逐过程 逐过程执行是以整个函数或过程为一个整体,一次执行。逐过程与逐语句一样,能够一条语句一条语句地执行代码。把被调用的函数或过程当作一个语句来看待例9.1运行以下的窗体装载事件过程: PrivateSubForm_Load() Dima% a%=5:a=5.4 c=1/(a-a%) EndSub 运行时出错,消息框提示发生“除数为零”的错误。 单击消息框中的“调试”按钮,即可进入中断模式,VB在代码窗口中用箭头指示发生错误的语句“C=1/(a-a%)”。 在立即窗口中键入以下命令来检查变量的值: ?a,a%´?是Print的简写 出错前变量a的当前值为整数5,而不是5.4,故发生了“除数为零”的错误编写的程序代码如下: PrivateSubForm_Load() Show DimtAsSingle,iAsSingle t=0 Fori=0.1To1Step0.1 t=t+i Nexti Print"总和:";t EndSub 运行结果为:总和:4.5 这不是正确的答案,正确结果应是5.5利用调试工具来查找出错原因,操作步骤如下: (1)在代码窗