收藏 分享(赏)

VB_实验1.ppt

上传人:fmgc7290 文档编号:4496921 上传时间:2018-12-31 格式:PPT 页数:27 大小:298.50KB
下载 相关 举报
VB_实验1.ppt_第1页
第1页 / 共27页
VB_实验1.ppt_第2页
第2页 / 共27页
VB_实验1.ppt_第3页
第3页 / 共27页
VB_实验1.ppt_第4页
第4页 / 共27页
VB_实验1.ppt_第5页
第5页 / 共27页
点击查看更多>>
资源描述

1、1,程序调试,1. 错误类型 (1)编辑错误 在编辑代码时,VB会对键入的代码直接进行语法检查。当发现代码存在打字错误,遗漏关键字或标点符等语法错误,VB在Form窗口中弹出一个子窗口,提示出错信息,出错的那一行变成红色。,2,这时,用户必须单击“确定”按钮,关闭出错提示窗,然后对出错行进行修改。,3,(2)编译错误编译错误指按了“启动”按钮,VB开始运行程序前,先编译执行的程序段时,产生的错误。此类错误由于用户未定义变量、遗漏关键字等原因产生。这时,Visual Basic也弹出一个子窗口,提示出错信息,出错的那一行被高亮度显示。,4,编译错误,Visual Basic也弹出一个子窗口,提示

2、出错信息,出错的那一行被高亮度显示。,5,(3) 运行错误运行时错误指VB在编译通过后,运行代码时发生的错误。这类错误往往是指令代码执行了一非法操作引起的。例如类型不匹配、试图打开一个不存在的文件等。,6,运行错误指指令代码执行了一非法操作引起的。例如类型不匹配、试图打开一个不存在的文件等。,7,(4) 逻辑错误程序运行后,得不到所期望的结果,这说明程序存在逻辑错误。这类错误往往是程序存在逻辑上的缺陷所引起。例如,运算符使用不正确、语句的次序不对、循环语句的起始、终值不正确等。通常,逻辑错误不会产生错误提示信息,故错误较难排除,需要程序员仔细地阅读分析程序以及调试。,8,程序设计中的错误包括下

3、面几类: (1)语法上的错误,例如:Dom i as Integer (2)逻辑上的错误,例如:求1*2*3*4*5 的积。intMult=0 求积之前,intMult=0错了 for I=1 to 5intMult=intMult*Inext (3)运行时间错误。这类错误通常是因为一些考虑不周的指令或者硬件所引起的,例如,要把文件输出到一个软盘时,目标盘没有插入到驱动器中等。当程序不在中断模式下执行时是不可以通过监视窗口看到要监视的内容的。,程序设计中的错误包括哪几类?分别举例。,9,为了捕获运行时间错误,可以使用哪些语句?,答:可以使用以下语句:(1)On Error Goto Line

4、语句(2)On Error Resume Next 语句(3) On Error Goto 0 语句,10,编写一个程序,如何使用On Error Resume Next 语句来捕获和处理运行时间错误,答:Private Sub Command1_Click()On Error Resume NextFileCopy App.Path + “text1.txt“, “a:abc.txt“End Sub运行后,如果没有把软盘放入软驱,系统不会提示错误。如果去掉On Error Resume Next后,重新运行程序,系统将出现下图:,11,程序调试VB提供的调试工具包括断点、临时表达式、单步运行

5、等。打开VB的“调试”菜单,或“视图”菜单的“工 具栏/调试”菜单项,可将“调试”工具栏调出。调试功能简述:,12,(1) VB的三种模式设计模式设计进行程序的界面设计、属性设置、代码编写等。运行模式运行执行“运行/启动”命令,可以查看程序代码,但不能修改。中断模式中断当在运行模式,按了“中断”命令或当程序出现运行时错误时进入中断模式。可以查看代码、修改代码、检查数据。,13,(2) VB的调试窗口有三个调试窗口,它们是:立即窗口、监视窗口、本地窗口。可单击视图菜单中的对应命令打开这些窗口。立即窗口的功能:该窗口可以显示由Debug. Print语句所输出的变量或表达式的值。当处于单步执行状态

6、时,还可以在立即窗口中直接键入表达式进行计算和检查结果,可以修改变量的值等。,14,监视窗口的功能:在中断模式执行程序的状态下,通过在监视窗口中添加需要监视的变量或表达式,当程序执行到变量或表达式所声明的范围内时,监视窗口中就会显示它们的值。,15,本地窗口的功能:在中断模式执行程序的状态下,使用本地窗口命令可以查看当前正在执行的过程或函数中所有局部变量的值以及当前模块中相关的对象的属性和模块级变量的值。,16,比较三个调试窗口:立即窗口要用 Debug. Print语句输出的变量或表达式的值,或单步执行时输入表达式来看表达式的值 。故它适合查看多个变量之间的运算的情况,或者全速运行到最后看结

7、果。本地窗口和监视窗口都需要在中断模式执行程序的状态下操作,但监视窗口的功能更加强大。相关的对象的属性和模块级变量的值。,17,(3)设置断点和逐语句跟踪断点是告诉VB挂起程序执行的一个标记,当程序执行到断点处即暂停程序的运行,进入中断模式。设置或删除断点的步骤:中断模式下,直接查看某个变量的值,只要把鼠标指向所关心的变量处,稍停一下,就在鼠标下方显示该变量的值。,断点标记,当前行,18,常见错误 1. 使用中文标点符号系统产生“无效字符”,以红色显示 2. 字母和数字形状相似小写字母“l”和数字“1”形式相同、小写字母“o”与数字“0”。 3. 对象名称(Name)属性写错Text1、Tex

8、t2、Command1txtInput、txtOutput、cmdOk,19,4.对象的属性名、方法名、标准函数名写错尽量使用自动列出成员功能。正确的系统按规定的大小写表示。 5. 无意形成控件数组建立控件时小心使用“复制”、“粘贴”按钮 6. 打开工程时找不到对应的文件保存文件时先保存窗体.frm文件、再保存.vbp文件,注意路径。,20,实验1 简单的VB应用程序本实验要求基本掌握以下几点: 引用对象的属性的格式: 对象名属性 = 新值引用方法的格式: 方法名方法,21,引用对象的属性的格式对象名属性 = 新值例如: Text1.FontName = “幼圆“Text1.FontSize

9、= 18,22,引用方法的格式 方法名方法例如:方法Circle可画出圆形、圆弧和椭圆Circle的用法的格式为: Object. Circle(x,y),radiusForm1. Circle (2048,1024),800 表示在窗体上画一个以(2048,1024)为圆心,以800为半径的圆。Form1. Cls 方法Cls用于清除窗体上的内容Text1.Move 0, 0 用Move方法移动文本框到屏幕的左上角坐标。一般对象左上角为坐标原点(0,0)。,23,Sy01-01 实验1-1 建立应用程序sy01-01(以其作为窗体和工程文件名保存),要求如下:窗体中包含一个标签一个文本框和三

10、个按钮,要求标签文本内容为“中国名山:”、字体字号为隶书,二号。三个按钮分别为“东部”、 “西部”,和“退出”。按“东部”按钮,在文本框中显示“泰山”; 按“西部”按钮,在文本框中显示“华山”, 文本框中显示字体字号为仿宋体、一号、红色,按“退出”按钮程序终止。,24,程序代码: Private Sub Form_Load()Text1.Text = “Text1.FontName = “仿宋_GB2312“Text1.FontSize = 38Text1.ForeColor = vbRed End SubPrivate Sub Command1_Click()Text1.Text = “泰山

11、“ End Sub,25,Sy01-02 实验1-2 建立应用程序sy01-02(以其作为窗体和工程文件名保存),要求如下:修改范例1-3应用程序,窗体有一个文本框和四个命令按钮。窗体及按钮的大小设置同本实验的表1-3。该程序要求: 运行程序是首先在窗体中央显示“VB6.0”,字号大小20。 单击“左上角”按钮,文本框中显示内容“VB6.0”移到窗体左上角,类似地单击“左下角”、“右下角”、“右上角”按钮,文本框中显示内容“VB6.0”移到窗体指定合适的位置处。,26,程序代码: Private Sub Form_Load()Text1.Text = “VB6.0“ 装载窗体时设置文本框显示文

12、本内容属性值Text1.Font.Size = 20 装载窗体时设置文本框显示文本字体大小属性值 End SubPrivate Sub Command1_Click()Text1.Move 0, 0 单击“左上角“按钮时用Move方法 End Sub,27,程序代码:Private Sub Command2_Click()Text1.Move 0, 2200 单击“左下角”按钮时用Move方法 End SubPrivate Sub Command3_Click()Text1.Move 4000, 0 单击“右上角”按钮时用Move方法 End SubPrivate Sub Command4_Click()Text1.Move 4000, 2200 单击“右下角“按钮时 End Sub,

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 中等教育 > 中学实验

本站链接:文库   一言   我酷   合作


客服QQ:2549714901微博号:道客多多官方知乎号:道客多多

经营许可证编号: 粤ICP备2021046453号世界地图

道客多多©版权所有2020-2025营业执照举报