二章VB简单的程序设计3学时

第二章第二章 VB简单的程序设计简单的程序设计（3学时）学时）2.1 VB2.1 VB中的有关概念中的有关概念2.2 2.2 建立简单的应用程序建立简单的应用程序2.3 2.3 基本控件和属性基本控件和属性2.4 2.4 工程的管理及环境的设置工程的管理及环境的设置2.5 2.5 生成可执行文件和制作安装盘生成可执行文件和制作安装盘 2.6 2.6 程序调试程序调试 2.7 2.7 常见错误常见错误2.1几个基本概念类类是创建对象实例的模板,包含了创建对象的属性描述和行为特征的定义。对象l是类的一个实例，是被赋予了特殊含义的实体l继承了类的属性、方法。lVB中常用的对象有：窗体、控件等。2.1几个基本概念（Cont.）对象三要素：（1）属性 l对象的特性，用来描述和反映对象特征的参数l格式：l常用属性：名称、Caption、MaxButton、BordStyle、BackColor、Enable、Visible 2.1几个基本概念（Cont.）（2）事件 l发生在一个对象上，能被其识别的动作。l常用事件：click、DblClick、MouseMove、Load、UnLoad、KeyDown2.1几个基本概念（Cont.）（3）方法 l对象的行为，将一些通用的过程编写并封装起来，作为方法供用户直接调用。即：系统提供的一个特殊过程l格式：l常用方法：Print、Cls以例例2.12.1为例：2.2建立简单的应用程序一般操作步骤l设计用户界面的布局l设置对象属性l编写程序代码l保存l测试和调试程序一、常用属性一、常用属性 1.Name1.Name名称属性名称属性 创建的对象名称，有默认的名。在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。2.Caption2.Caption标题属性标题属性该属性决定了控件上显示的内容。3.Height3.Height、widthwidth、toptop和和leftleft属性属性 L e ft T o p H e igW id th 2.3基本控件和窗体4.Enabled4.Enabled属性属性 控件是否可操作。当设置为false时，呈暗淡色，禁止用户进行操作。5.Visible5.Visible属性属性 控件是否可见。当设置为false时，用户看不到，但控件本身存在。6.Font6.Font属性属性 Fontname：字体；Fontsize：字体大小；Fontbold：是否是粗体；Fontitalic：是否斜体；Fontstrikethru：是否加一删除线。Fontunderline：是否带下划线。例2.2 在窗体是建立两个命令按钮 Command1和Command2，Command2 的Font通过属性窗口设置，其余属性 通过代码实现。7.Forecolor7.Forecolor前景颜色属性前景颜色属性 设置控件的前景颜色（即正文颜色).。其值是一个十六进制常数，用户可以在调色板中直接选择所需颜色。8.Backcolor8.Backcolor背景颜色属性背景颜色属性9.Backstyle9.Backstyle背景风格属性背景风格属性 0-transparent：透明显示，即控件背景颜色显示不出来。10.BorderStyle10.BorderStyle边框风格属性边框风格属性 0-None：控件周围没有边框。1-Fixed Single：控件带有单边框。11.Alignment11.Alignment属性属性 控件上正文水平对齐方式 0：正文左对齐；1：右对齐；2：居中。12.AutoSize12.AutoSize属性属性 控件是否根据正文自动调整大小，False 13.WordWarp13.WordWarp属性属性 AutoSize True时，WordWarp才有效。按正文字体大小在垂直方向上改变显示区域的大小。14.TabIndex14.TabIndex属性属性 决定了按Tab键时，焦点在各个控件移动的顺序。各个控件默认 TabIndex值就是以控件建立时 的顺序，第一个为0。15.15.控件默认属性控件默认属性 反映该控件最重要的属性，使用时可省略属性名。注意：Command的默认属性为Default,当该属性为True，当按Enter键，该控件起作用。例2.3 控件设置 效果默认控件名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=&H000000FF&，BorderStyle=0 标题图标控制菜单框最小化按钮最小化按钮边框样式二二.窗体窗体1.1.属性属性 Caption标题 MaxButton、MinButton Icon、ControlBox Picture、AutoRedraw BorderStyle（0 1 2 3 4 5 ）WindowsState（0-正常、1-最小化、2-最大化）2.2.事件事件 Click、DblClick和Load Load 当装入窗体时激发，通常用于对属性和变量初始化3.3.方法方法 Print、Cls和Move等 例2.4 上述属性、Click、DblClick和Load 事件演示。三、标签三、标签 LabelLabel 用于显示文本(输出)信息，不能作为输入信息的界面。例2.5 显示浮雕效果的文字，实现方法：字颜色、标签位置四、文本框四、文本框 TextBoxTextBox 是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。1.1.其他属性其他属性 Text：正文内容；Maxlength：设置正文的最多字符个数，0任意长度值；MultiLine：是否为多行，默认为一行，False；ScrollBars：MultiLine为True时，该属性才有效，表示滚动条的形式 0-None、1-Horizontal、2-Vertical、3-Both；Locked：是否可被编辑属性，False，表示为可编辑。PassWord：口令字符；Text属性返回输入的数据，屏幕显示该字符；SelStart、SelLength、SelText：选中文本的起始、长度、内容。例2.6 复制选中的文本2.2.常用事件常用事件 Change：当改变文本框的Text属性时会引发该事件。KeyPress(KeyAscii As Integer)：同上，并可返回一个KeyAscii参数 KeyAscii 为13，按回车键;为0 去除刚输入的字符。LostFocus：当控件失去焦点时发生。GotFocus：当控件获得焦点时发生。3.3.常用方法常用方法 对象.SetFocus：是把光标移到指定的文本框对象中。4.4.文本框的应用文本框的应用 数据过滤数据过滤例例2.7 要求输入合法的数字数据。当输入结束时（按Tab键），对于输入正确的数据，显示正确信息；对输入的非数字数据，则响铃(Beep)、显示错误信息、清除文本框中的内容，并使焦点重新回到文本框。Text2_ LostFocus 当输入结束按Tab键时，该事件激发。IsNumeric(Text2)：判断是否输入非数字数据。Text2.SetFocus：使焦点重新回到文本框。五、命令按钮五、命令按钮CommandButtonCommandButton 接受用户输入的命令。输入命令可以有三种方式：鼠标单击、Tab键焦点到该按钮、快捷键。1.1.其他属性其他属性 Caption：命令按钮显示的内容，可设置快捷键，例&Ok，显示 Ok。Value：检查该按钮是否按下。该属性在设计时无效。Picture：按钮可显示图片文件(.bmp和.Ico)，当Style为1时有效。Style：确定显示的形式，0 只能显示文字，1 文字、图形均可。ToolTipText：设置工具提示，和Picture结合使用。2.2.事件事件 Click3.例例 2.8 建立一个允许剪切、复制和粘贴的简单便笺板程序。可增加内容：利用MouseMove事件决定命令按钮的有效性，即当选中内容，“剪切”、“复制”按钮有效，否则无效。六、常用方法六、常用方法 方法是面向对象的，故使用的形式为：对象.方法 1 1.PrintPrint方法方法 形式：对象.PrintSpc(n)|Tab(n)表达式列表；|，作用：在对象上输出信息对象对象：窗体、图形框或打印机(Printer)，省略对象在窗体上输出。Spc(n)函数：插入n个空格，允许重复使用。Tab(n)函数：左端开始右移动n列，允许重复使用。；(分号)：光标定位上一个显示的字符后。，(逗号)：光标定位在下一个打印区的开始位置处。无；，时换行。开始打印的位置是由对象的CurrentX和CurrentX属性决定，缺省为打印对象的左上角0，0。注意注意：Print方法在Form _Load事件过程中起作用，必须设置窗体的 AutoRedraw为True。例例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.Cls2.Cls方法方法 形式：对象.Cls 作用：清除运行时在窗体或图形框中显示的文本或图形。注意：不清除在设计时的文本和图形。3.Move3.Move方法方法 形式：对象.Move 左边距离，上边距离，宽度，高度 作用：移动窗体或控件，并可改变其大小。对象：可以是窗体及除时钟、菜单外的所有控件 例例2.10 图形移到窗体的中心。七、应用举例七、应用举例 例2-11 编一计算月支付贷款的程序。现要求根据房产商提供的信息，买房者选择房型、面积、单价、按揭期等信息，计算每月支付代款的程序。窗体1：列表框选择数据、标签显示数据、文本框输入数据；窗体2：图形框显示房屋的平面图。Pmt函数计算月支付贷款。2.4 工程的管理及环境的设置工程的管理及环境的设置一、工程的组成一、工程的组成 工程文件包含了一个应用程序的所有文件:窗体文件(.frm)：控件及属性、事件过程和自定义过程;窗体的二进制数据文件(.frx)，自动产生同名.frx文件;标准模块文件(.bas);类模块的文件(.cls);资源文件(.res);ActiveX控件的文件(.ocx).二、创建、打开和保存工程二、创建、打开和保存工程三、添加、删除和保存文件三、添加、删除和保存文件1.窗体名和窗体文件名概念 窗体名窗体名：窗体的Name属性，在代码中用来引用该窗体，同一工程不能有相同的窗体名；窗体文件名窗体文件名：窗体存放在磁盘上的文件名，该文件包含了该窗体的所有控件属性和代码，同一文件夹不能有相同的文件名。2.在工程中添加现存的窗体时，只是对该窗体文件的引用纳入工程。因此，如果更改窗体并保存它，会影响包含此窗体文件的任何工程。3.在工程中删除窗体时，仅将此窗体从工程里删除掉，但是窗体文件仍存在于磁盘上。但是，如果在VB之外删除一个窗体文件，VB不能更新此工程文件，当打开此工程时，将显示一个文件丢失的错误信息。4.对窗体文件改名方法1)打开工程 “另存为Form”实现文件的复制保存工程文件。2)利用编辑程序打开工程文件，修改FORM=XXX的文件名。窗体文件名窗体名2.5 生成可执行文件和制作安装盘生成可执行文件和制作安装盘 以工程文件例2.11为例。1.1.生成可执行文件生成可执行文件 文件/生成V6B2-11.exe文件，然后关闭Visual Basic6.0。2.2.制作安装盘制作安装盘 在向导的指导下运行VB6.0中文版工具“Package&Deployment”；“打包”：把工程中用到的各种类型的文件进行打包压缩后，存放到特定的目录下。“展开”：再把这些打包的文件展开到用户可以携带的安装介质软盘、光盘等。3.3.检测安装程序检测安装程序 在没有VB 6.0系统的环境下，执行安装盘中的Setup.exe文件，将发行盘进行安装。2.6 程程 序序 调调 试试一、错误类型一、错误类型 （1 1）编辑错误）编辑错误在编辑代码时，VB会对键入的代码直接进行语法检查。当发现代码存在打字错误，遗漏关键字或标点符等语法错误，VB 在Form窗口中弹出一个子窗口，提示出错信息，出错的那一行变成红色。这时，用户必须单击“确定”按钮，关闭出错提示窗，然后对出错行进行修改。（2 2）编译错误）编译错误 编译错误指按了“启动”按钮，VB开始运行程序前，先编译执行的程序段时，产生的错误。此类错误由于用户未定义变量、遗漏关键字等原因产生。这时，Visual Basic也弹出一个子窗口，提示出错信息，出错的那一行被高亮度显示。（3 3）运行错误运行错误运行时错误指VB在编译通过后，运行代码时发生的错误。这类错误往往是指令代码执行了一非法操作引起的。例如类型不匹配、试图打开一个不存在的文件等。（4 4）逻辑错误逻辑错误程序运行后，得不到所期望的结果，这说明程序存在逻辑错误。这类错误往往是程序存在逻辑上的缺陷所引起。例如，运算符使用不正确、语句的次序不对、循环语句的起始、终值不正确等。通常，逻辑错误不会产生错误提示信息，故错误较难排除，需要程序员仔细地阅读分析程序以及调试。二、调试错误二、调试错误 (1)VB(1)VB的三种模式的三种模式 设计模式设计 进行程序的界面设计、属性设置、代码编写等。运行模式运行 执行“运行/启动”命令，可以查看程序代码，但不能修改。中断模式中断 当在运行模式，按了“中断”命令或当程序出现运行时错误时进入中断模式。可以查看代码、修改代码、检查数据。(2)(2)调试窗口调试窗口 有三个调试窗口，它们是：“立即”窗口、“监视”窗口、和“本地”窗口。可单击视图菜单中的对应命令打开这些窗口。（3 3）设置断点和逐语句跟踪）设置断点和逐语句跟踪 断点是告诉VB挂起程序执行的一个标记，当程序执行到断点处即暂停程序的运行，进入中断模式。设置或删除断点的步骤：中断模式下，直接查看某个变量的值，只要把鼠标指向所关心的变量处，稍停一下，就在鼠标下方显示该变量的值。断点标记当前行2.7 常常 见见 错错 误误1.使用中文标点符号使用中文标点符号 系统产生“无效字符”，以红色显示。2.字母和数字形状相似字母和数字形状相似 小写字母“l”和数字“1”形式相同、小写字母“o”与数字“0”。3.对象名称对象名称(Name)属性写错属性写错 Text1、Text2、Command1 txtInput、txtOutput、cmdOk4.对象的属性名、方法名、标准函数名写错对象的属性名、方法名、标准函数名写错 尽量使用自动列出成员功能。正确的系统按规定的大小写表示。5.无意形成控件数组无意形成控件数组 建立控件时小心使用“复制”、“粘贴”按钮。6.打开工程时找不到对应的文件打开工程时找不到对应的文件 保存文件时先保存窗体.frm文件、再保存.vbp文件，注意路径。