简单的程序设计3学时ppt课件(0001)

1、第二章第二章 VB简单的程序设计简单的程序设计3学时学时2.1 VB中的有关概念2.2 建立简单的运用程序2.3 根本控件和属性2.4 工程的管理及环境的设置2.5 生成可执行文件和制造安装盘 2.6 程序调试 2.7 常见错误2.1几个根本概念类类是创建对象实例的模板, 包含了创建对象的属性描画和行为特征的定义。对象是类的一个实例，是被赋予了特殊含义的实体承继了类的属性、方法。VB中常用的对象有：窗体、控件等。2.1几个根本概念Cont.对象三要素：1属性 对象的特性，用来描画和反映对象特征的参数格式： 对象名.属性名=属性值常用属性： 称号、Caption、MaxButton、 BordS

2、tyle、BackColor、Enable、Visible 2.1几个根本概念Cont.2事件 发生在一个对象上，能被其识别的动作。常用事件： click、DblClick、MouseMove、Load、UnLoad、KeyDown2.1几个根本概念Cont.3方法 对象的行为，将一些通用的过程编写并封装起来，作为方法供用户直接调用。 即：系统提供的一个特殊过程格式： 对象名.方法名 参数表常用方法： Print、Cls以例2.1为例：2.2建立简单的运用程序普通操作步骤设计用户界面的规划设置对象属性编写程序代码保管测试和调试程序一、常用属性一、常用属性 1. Name 1. Name称号属性

3、称号属性 创建的对象称号，有默许的名。在程序中，控件创建的对象称号，有默许的名。在程序中，控件名是作为对象的标识而援用，不会显示在窗体上。名是作为对象的标识而援用，不会显示在窗体上。 2. Caption 2. Caption标题属性标题属性该属性决议了控件上显示的内容。该属性决议了控件上显示的内容。 3. Height 3. Height、widthwidth、toptop和和leftleft属性属性 L e ft T o p H e igW id th 2.3根本控件和窗体4. Enabled4. Enabled属性属性 控件能否可操作。当设置为控件能否可操作。当设置为falsefalse

4、时，呈暗淡色，制止用时，呈暗淡色，制止用户进展操作。户进展操作。5. Visible5. Visible属性属性 控件能否可见。当设置为控件能否可见。当设置为falsefalse时，用户看不到，但控件本身存时，用户看不到，但控件本身存在。在。6. Font6. Font属性属性 Fontname Fontname：字体；：字体；FontsizeFontsize：字体大小；：字体大小；FontboldFontbold：能否是：能否是粗体；粗体； Fontitalic Fontitalic：能否斜体；：能否斜体；FontstrikethruFontstrikethru：能否加一删除线。：能否加一删

5、除线。 Fontunderline Fontunderline：能否带下划线。：能否带下划线。 例例2.2 2.2 在窗体是建立两个命令按钮在窗体是建立两个命令按钮 Command1 Command1和和Command2Command2， Command2 Command2 的的FontFont经过属性窗口设置，经过属性窗口设置， 其他属性其他属性 经过代码实现。经过代码实现。7. Forecolor7. Forecolor前景颜色属性前景颜色属性 设置控件的前景颜色即正文颜色设置控件的前景颜色即正文颜色).).。其值是一个十。其值是一个十六进制常数，用户可以在调色板中直接选择所需颜色。六进制

6、常数，用户可以在调色板中直接选择所需颜色。8. Backcolor8. Backcolor背景颜色属性背景颜色属性9. Backstyle9. Backstyle背景风格属性背景风格属性 0-transparent 0-transparent：透明显示，即控件背景颜色显示不：透明显示，即控件背景颜色显示不出来。出来。10. BorderStyle10. BorderStyle边框风格属性边框风格属性 0-None 0-None：控件周围没有边框：控件周围没有边框 。 1-Fixed Single 1-Fixed Single：控件带有单边框。：控件带有单边框。11. Alignment11.

7、Alignment属性属性 控件上正文程度对齐方式控件上正文程度对齐方式 0 0：正文左对齐：正文左对齐 ；1 1：右对齐；：右对齐；2 2：居中。：居中。12. AutoSize12. AutoSize属性属性 控件能否根据正文自动调整大小，控件能否根据正文自动调整大小， False False 13. WordWarp13. WordWarp属性属性 AutoSize True AutoSize True时，时，WordWarpWordWarp才有效。才有效。 按正文字体大小在垂直方向上改动显示区域的大小。按正文字体大小在垂直方向上改动显示区域的大小。14.TabIndex14.TabIn

8、dex属性属性 决议了按决议了按TabTab键时，焦点在各个控件挪动的顺序。各个控件键时，焦点在各个控件挪动的顺序。各个控件默许默许 TabIndex TabIndex值就是以控件建立时值就是以控件建立时 的顺序，第一个为的顺序，第一个为0 0。15.15.控件默许属性控件默许属性 反映该控件最重要的属性，运用时可省略属性名。反映该控件最重要的属性，运用时可省略属性名。 留意：留意：CommandCommand的默许属性为的默许属性为Default,Default,当该属性为当该属性为TrueTrue，当，当按按EnterEnter键，该控件起作用。键，该控件起作用。例例2.32.3 控件设置

9、控件设置 效果效果默认控件名Name 标题 Caption 有关属性设置 Form1 颜色、对齐、鼠标属性例 MousePointer=99,MouseIcon=Key04.ico Label1 左对齐 Alignment=0， BorderStyle =1 Label2 居中 Alignment=1，BorderStyle =1 Label3 自动 AutoSize=True， WordWarp=False， BorderStyle =1 Label4 背景白 BackColor= &H00FFFFFF&， BorderStyle =0 Label5 前景红 ForeColor= &H000

10、000FF&， BorderStyle =0 标题图标控制菜单框最小化按钮最小化按钮边框样式二二. .窗体窗体1.1.属性属性 Caption Caption标题标题 MaxButton MaxButton、MinButtonMinButton Icon Icon、ControlBoxControlBox Picture Picture、AutoRedrawAutoRedraw BorderStyle BorderStyle 0 1 2 3 4 5 0 1 2 3 4 5 WindowsState WindowsState 0-0-正常、正常、1-1-最小化、最小化、2-2-最大化最大化2.2

11、.事件事件 Click Click、DblClickDblClick和和Load Load Load Load 当装入窗体时激发，通常用于对属性和当装入窗体时激发，通常用于对属性和变量初始化变量初始化3.3.方法方法 Print Print、ClsCls和和MoveMove等等 例例2.4 2.4 上述属性、上述属性、ClickClick、DblClickDblClick和和Load Load 事事件演示。件演示。三、标签三、标签 Label Label 用于显示文本用于显示文本( (输出输出) )信息，不能作为输入信息的界面。信息，不能作为输入信息的界面。 例例2.5 2.5 显示浮雕效果的

12、文字，实现方法：字颜色、显示浮雕效果的文字，实现方法：字颜色、标签位置标签位置四、文本框四、文本框 TextBox TextBox 是一个文本编辑区域，可在该区域输入，编辑和显示是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。正文内容。 1. 1.其他属性其他属性 Text Text：正文内容；：正文内容； Maxlength Maxlength：设置正文的最多字符个数，：设置正文的最多字符个数，0 0恣意长度值；恣意长度值； MultiLine MultiLine：能否为多行，默以为一行，：能否为多行，默以为一行，FalseFalse； ScrollBars ScrollBars：M

13、ultiLineMultiLine为为TrueTrue时，该属性才有效，表时，该属性才有效，表示滚动条的方式示滚动条的方式 0-None 0-None、1-Horizontal1-Horizontal、2-Vertical2-Vertical、3-Both3-Both； Locked Locked：能否可被编辑属性，：能否可被编辑属性，FalseFalse，表示为可编辑。，表示为可编辑。PassWordPassWord：口令字符；：口令字符； Text Text属性前往输入的数据，屏属性前往输入的数据，屏幕显示该字符；幕显示该字符； SelStart SelStart、SelLengthSel

14、Length、SelTextSelText：选中文本的起始、：选中文本的起始、长度、内容。长度、内容。 例例2.6 2.6 复制选中的文本复制选中的文本2.2.常用事件常用事件 Change Change：当改动文本框的：当改动文本框的TextText属性时会引发该事件。属性时会引发该事件。 KeyPress(KeyAscii As Integer) KeyPress(KeyAscii As Integer)：同上，并可前往一个：同上，并可前往一个KeyAsciiKeyAscii参数参数 KeyAscii KeyAscii 为为1313，按回车键，按回车键; ;为为0 0 去除刚输入的字符。去

15、除刚输入的字符。 LostFocus LostFocus：当控件失去焦点时发生。：当控件失去焦点时发生。 GotFocus GotFocus：当控件获得焦点时发生。：当控件获得焦点时发生。3.3.常用方法常用方法 对象对象.SetFocus.SetFocus：是把光标移到指定的文本框对象中。：是把光标移到指定的文本框对象中。4.4.文本框的运用文本框的运用 数据过滤数据过滤例例2.7 2.7 要求输入合法的数字数据。当输入终了时按要求输入合法的数字数据。当输入终了时按TabTab键键，对于输入正确的数据，显示正确信息；对输入的非数字数据，对于输入正确的数据，显示正确信息；对输入的非数字数据，那

16、么响铃，那么响铃(Beep)(Beep)、显示错误信息、去除文本框中的内容，并、显示错误信息、去除文本框中的内容，并使焦点重新回到文本框。使焦点重新回到文本框。 Text2_ LostFocus Text2_ LostFocus 当输入终了按当输入终了按TabTab键时，该事件激发。键时，该事件激发。 IsNumeric(Text2) IsNumeric(Text2)：判别能否输入非数字数据。：判别能否输入非数字数据。 Text2.SetFocus Text2.SetFocus：使焦点重新回到文本框。：使焦点重新回到文本框。 五、命令按钮五、命令按钮CommandButtonCommandBu

17、tton 接受用户输入的命令。输入命令可以有三种方式：接受用户输入的命令。输入命令可以有三种方式： 鼠标单击、鼠标单击、TabTab键焦点到该按钮、快捷键。键焦点到该按钮、快捷键。 1. 1. 其他属性其他属性CaptionCaption：命令按钮显示的内容，可设置快捷键，例：命令按钮显示的内容，可设置快捷键，例 &Ok&Ok，显示，显示 Ok Ok。ValueValue： 检查该按钮能否按下。该属性在设计时无效。检查该按钮能否按下。该属性在设计时无效。Picture Picture ：按钮可显示图片文件：按钮可显示图片文件(.bmp(.bmp和和.Ico).Ico)，当，当StyleStyl

18、e为为1 1时有效。时有效。StyleStyle：确定显示的方式，：确定显示的方式，0 0 只能显示文字，只能显示文字，1 1 文字、文字、图形均可图形均可 。ToolTipText ToolTipText ：设置工具提示，和：设置工具提示，和PicturePicture结合运用。结合运用。 2. 2. 事件事件 Click Click3. 例例 2.8 建立一个允许剪切、复制和粘贴的简单便笺板程序。建立一个允许剪切、复制和粘贴的简单便笺板程序。 可添加内容：利用可添加内容：利用MouseMove事件决议命令按钮的有效性，事件决议命令按钮的有效性， 即中选中内容，即中选中内容，“剪切、剪切、“

19、复制按钮有效，否那么无效。复制按钮有效，否那么无效。六、常用方法六、常用方法 方法是面向对象的，故运用的方式为：方法是面向对象的，故运用的方式为： 对对象象.方法方法 1.Print 1.Print方法方法 方式：方式： 对象对象.PrintSpc(n)|Tab(n).PrintSpc(n)|Tab(n)表达式列表达式列表表；| |， 作用：在对象上输出信息作用：在对象上输出信息对象：窗体、图形框或打印机对象：窗体、图形框或打印机(Printer) (Printer) ，省略对象在，省略对象在窗体上输出。窗体上输出。Spc(n)Spc(n)函数：插入函数：插入n n个空格，允许反复运用。个空格

20、，允许反复运用。Tab(n)Tab(n)函数：左端开场右挪动函数：左端开场右挪动n n列，允许反复运用。列，允许反复运用。；( (分号分号) )：光标定位上一个显示的字符后。：光标定位上一个显示的字符后。，( (逗号逗号) )：光标定位在下一个打印区的开场位置处。：光标定位在下一个打印区的开场位置处。无无 ；，时换行。；，时换行。 开场打印的位置是由对象的开场打印的位置是由对象的CurrentXCurrentX和和CurrentXCurrentX属性决议，属性决议， 缺省为打印对象的左上角缺省为打印对象的左上角0 0，0 0。 留意：留意：PrintPrint方法在方法在Form _LoadF

21、orm _Load事件过程中起作用，必事件过程中起作用，必需设置窗体的需设置窗体的 AutoRedraw AutoRedraw为为TrueTrue。例例2.9 显示图形显示图形 Private Sub Form_Click() For i = 1 To 5 Print Tab(i); String(6 - I, ); Spc(6); String(I, ) Next i End Sub留意：留意：String(number, character)前往指定长度反复字符的前往指定长度反复字符的字符串。字符串。思索：思索：假设把假设把Spc(6)换成换成Tab(6)，效果如何？效果如何？2. Cls

22、2. Cls方法方法 方式：方式： 对象对象.Cls.Cls 作用：去除运转时在窗体或图形框中显示的文本或图形。作用：去除运转时在窗体或图形框中显示的文本或图形。 留意：不去除在设计时的文本和图形。留意：不去除在设计时的文本和图形。3. Move3. Move方法方法 方式：方式： 对象对象.Move .Move 左边间隔左边间隔 ，上边间隔，上边间隔 ，宽度，宽度 ，高度，高度 作用：挪动窗体或控件，并可改动其大小。作用：挪动窗体或控件，并可改动其大小。 对象：可以是窗体及除时钟、菜单外的一切控件对象：可以是窗体及除时钟、菜单外的一切控件 例例2.10 2.10 图形移到窗体的中心。图形移到

23、窗体的中心。 七、运用举例七、运用举例 例2-11 编一计算月支付贷款的程序。现要求根据房产商提供的信息，买房者选择房型、面积、单价、按揭期等信息，计算每月支付代款的程序。窗体1：列表框选择数据、标签显示数据、文本框输入数据；窗体2：图形框显示房屋的平面图。Pmt函数计算月支付贷款。2.4 工程的管理及环境的设置工程的管理及环境的设置一、工程的组成一、工程的组成 工程文件包含了一个运用程序的一切文件工程文件包含了一个运用程序的一切文件: :窗体文件窗体文件(.frm)(.frm)：控件及属性、事件过程和自定义过：控件及属性、事件过程和自定义过程程; ;窗体的二进制数据文件窗体的二进制数据文件(

24、.frx)(.frx)，自动产生同名，自动产生同名.frx.frx文文件件; ;规范模块文件规范模块文件(.bas);(.bas);类模块的文件类模块的文件(.cls);(.cls);资源文件资源文件(.res);(.res);ActiveXActiveX控件的文件控件的文件(.ocx).(.ocx).二、创建、翻开和保管工程二、创建、翻开和保管工程三、添加、删除和保管文件三、添加、删除和保管文件1. 1. 窗体名和窗体文件名概念窗体名和窗体文件名概念 窗体名：窗体的窗体名：窗体的NameName属性，属性，在代码中用来援用该窗体，同一在代码中用来援用该窗体，同一工程不能有一样的窗体名；工程不

25、能有一样的窗体名； 窗体文件名：窗体存放在磁盘上的文件名，该文窗体文件名：窗体存放在磁盘上的文件名，该文件包含了该窗体的一切控件属性和代码，同一文件夹不件包含了该窗体的一切控件属性和代码，同一文件夹不能有一样的文件名。能有一样的文件名。2. 2. 在工程中添加现存的窗体时，只是对该窗体文件的在工程中添加现存的窗体时，只是对该窗体文件的援用纳入工程。因此，假设更改窗体并保管它，会影响援用纳入工程。因此，假设更改窗体并保管它，会影响包含此窗体文件的任何工程。包含此窗体文件的任何工程。3. 3. 在工程中删除窗体时，仅将此窗体从工程里删除掉，在工程中删除窗体时，仅将此窗体从工程里删除掉，但是窗体文件

26、仍存在于磁盘上。但是，假设在但是窗体文件仍存在于磁盘上。但是，假设在VBVB之外删之外删除一个窗体文件，除一个窗体文件，VBVB不能更新此工程文件，当翻开此工不能更新此工程文件，当翻开此工程时，将显示一个文件丧失的错误信息。程时，将显示一个文件丧失的错误信息。4. 4. 对窗体文件改名方法对窗体文件改名方法1) 1) 翻开工程翻开工程 “另存为另存为FormForm实现文件的复制实现文件的复制保管工程文件。保管工程文件。 2) 2) 利用编辑程序翻开工程文件，修正利用编辑程序翻开工程文件，修正FORM=XXXFORM=XXX的文件的文件名。名。窗体文件名窗体名2.5 生成可执行文件和制造安装盘

27、生成可执行文件和制造安装盘 以工程文件例2.11为例。1. 生成可执行文件 文件/生成V6B2-11.exe文件，然后封锁Visual Basic6.0。2. 制造安装盘在导游的指点下运转VB6.0中文版工具“Package & Deployment；“打包：把工程中用到的各种类型的文件进展打包紧缩后，存放到特定的目录下。“展开：再把这些打包的文件展开到用户可以携带的安装介质软盘、光盘等。3. 检测安装程序 在没有VB 6.0系统的环境下，执行安装盘中的Setup.exe文件，将发行盘进展安装。2.6 程程 序序 调调 试试一、错误类型一、错误类型 1 1编辑错误编辑错误在编辑代码时，在编辑代

28、码时，VBVB会对键入的代码直接进展语法检查。会对键入的代码直接进展语法检查。当发现代码存在打字错误，脱漏关键字或标点符等语当发现代码存在打字错误，脱漏关键字或标点符等语法错误，法错误，VB VB 在在FormForm窗口中弹出一个子窗口，提示出窗口中弹出一个子窗口，提示出错信息，出错的那一行变成红色。这时，用户必需单错信息，出错的那一行变成红色。这时，用户必需单击击“确定按钮，封锁出错提示窗，然后对出错行进确定按钮，封锁出错提示窗，然后对出错行进展修正。展修正。2 2编译错误编译错误 编译错误指按了编译错误指按了“启动按钮，启动按钮，VBVB开场运开场运转程序前，先编译执行的程序段时，产生的

29、错误。转程序前，先编译执行的程序段时，产生的错误。此类错误由于用户未定义变量、脱漏关键字等缘此类错误由于用户未定义变量、脱漏关键字等缘由产生。这时，由产生。这时，Visual BasicVisual Basic也弹出一个子窗口，也弹出一个子窗口，提示出错信息，出错的那一行被高亮度显示。提示出错信息，出错的那一行被高亮度显示。3 3 运转错误运转错误运转时错误指运转时错误指VBVB在编译经过后，运转代码时发生在编译经过后，运转代码时发生的错误。这类错误往往是指令代码执行了一非法的错误。这类错误往往是指令代码执行了一非法操作引起的。例如类型不匹配、试图翻开一个不操作引起的。例如类型不匹配、试图翻开

30、一个不存在的文件等。存在的文件等。4 4 逻辑错误逻辑错误程序运转后，得不到所期望的结果，这阐明程序程序运转后，得不到所期望的结果，这阐明程序存在逻辑错误。这类错误往往是程序存在逻辑上存在逻辑错误。这类错误往往是程序存在逻辑上的缺陷所引起。例如，运算符运用不正确、语句的缺陷所引起。例如，运算符运用不正确、语句的次序不对、循环语句的起始、终值不正确等。的次序不对、循环语句的起始、终值不正确等。通常，逻辑错误不会产生错误提示信息，故错误通常，逻辑错误不会产生错误提示信息，故错误较难排除，需求程序员仔细地阅读分析程序以及较难排除，需求程序员仔细地阅读分析程序以及调试。调试。二、调试错误二、调试错误 (1)VB (1)VB的三种方式的三种方式 设计方式设计方式 设计设计 进展程序的界面设计、属性设置、代码编写进展