Visual-Basic6.0程序设计(完整)

第1章VisualBasic语言概述【教学目的要求】:1、了解VB6.0的功能和特点；2、VisualBasic6.0中文版的安装、启动和退出；3、掌握：主窗口、窗体窗口、工具箱窗口、属性窗口和工程资源管理器窗口的使用。【教学重点】:

主窗口、属性窗口、工具箱窗口和代码窗口、工程管理器的使用。【教学难点】:面向对象与事件驱动的概念。【教学进程与章节学时分配】:讲授2学时,上机2学时，共4学时21.1

VB主要功能和特点1.2

VB的启动与退出1.3

VB集成开发环境31.1VB主要功能和特点1.具有面向对象的可视化设计工具;2.事件驱动的编程机制;3.提供了易学易用的应用程序集成开发环境;4.结构化的程序设计语言;5.支持多种数据库系统的访问;6.Active技术;7.VB6.0在开发环境上、网络功能等的增强;8.完备的help联机帮助功能。41.2VB的启动与退出

1．VB的启动2．VB的运行方式：

VB编程时，同时解释生成伪代码，执行时经解释变成目标码，生成EXE文件，即可脱离VB环境直接在Windows下运行。3．VB的退出5

1.3VB集成开发环境

61.主窗口应用程序窗口，由标题栏、菜单栏和工具栏组成。2.窗体(form)窗口设计VB程序的界面。3.代码(code)窗口编辑窗体、标准模块中的代码。4.属性(properties)窗口所有窗体或控件的属性设置。5.工程资源管理器(projectexpror)窗口保存一个应用程序所有的文件。6.工具箱(toolbox)窗口显示各种控件的制作工具，供用户在窗体上设计。7

8

9

10【小结】：介绍了VB6.0的功能和特点，VisualBasic6.0中文版的安装、启动和退出；应掌握VisualBasic6.0主窗口、窗体窗口、工具箱窗口、属性窗口和工程资源管理器窗口的使用。【作业】：1、书本P9页一、选择题

2、熟悉VB6.0集成开发环境的组成11第2章VisualBasic6.0集成开发环境

【教学目的要求】:1、介绍类、对象及对象的属性、事件和方法的概念；2、掌握建立用户界面对象；3、掌握标准控件的画法和基本操作；4、掌握对象属性的设置；5、掌握对象的事件、事件过程和事件驱动；6、VB6.0工程的管理及环境设置；7、程序的调试。8、应用程序开发示例：创建应用程序界面、设置属性、编写代码、保存应用程序、调试、运行应用程序、生成可执行文件；【教学重点】:对象属性的设置。【教学难点】:对象与事件驱动的概念。13【教学进程与章节学时分配】:讲授5学时,上机2学时,共7学时

2学时：2.1对象的概念

2.2建立简单的应用程序

3学时：2.3窗体和控件的基本属性

2.4工程的管理及环境的设置2.5程序调试

2学时：实验二建立简单的VB6.0应用程序142.1

对象的概念2.2建立简单VB应用程序2.3窗体和控件的基本属性2.4工程的管理及环境的设置2.5程序调试15【教学进程】:第2章第1、2学时【授课类型】:

理论课【教学目的要求】:1、介绍类、对象及对象的属性、事件和方法的概念；2、掌握建立用户界面对象；3、掌握标准控件的画法和基本操作；4、掌握对象属性的设置；【教学重点、难点】:对象属性的设置。162.1

对象的概念1.类类是创建对象实例的模板,包含了创建对象的属性描述和行为特征的定义。2.对象是类的一个实例，继承了类的属性、方法。

VB中常用的对象有：窗体、控件等。3.对象的建立和命名4.对象的三要素（1）属性

对象的性质，即用来描述和反映对象特征的参数。（2）方法

对象的行为，即将一些通用的过程编写好并封装起来，作为方法供用户直接调用。

172.1

对象的概念（3）事件响应对象的动作称为事件，它发生在用户与应用程序交互时。如单击控件、鼠标移动、键盘按下等。事件过程指附在该对象上的用户编写的程序代码,是事件的处理程序。事件驱动过程是图形用户界面的本质，由用户控制而代码作出响应。5.VB程序的执行步骤如下：1）启动应用程序，装载和显示窗体；2）窗体（或窗体上的控件）等待事件的发生；3）事件发生时，执行对应的事件过程；4）重复执行步骤（2）和（3）；5)直到遇到END结束语句结束程序的运行；或按“结束”强行停止程序的运行。18以【例2-2-1】为例：1.建立用户界面的对象；2.对象属性的设置；3.对象事件过程及编程；4.程序运行和调试；5.保存文件。2.2

建立简单的应用程序19简单设计实例【例2-2-1】20源程序21一、常用属性

1.Name名称属性创建的对象名称，有默认的名。在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。

2.Caption标题属性 该属性决定了控件上显示的内容。

3.Height、width、top和left属性2.3窗体和控件的基本属性224.Enabled属性控件是否可操作。当设置为false时，呈暗淡色，禁止用户进行操作。5.Visible属性控件是否可见。当设置为false时，用户看不到，但控件本身存在。

【例2-3-1】

Visible属性和Enabled属性的比较。237．Font（字体）属性

FontName：设置字体类型，属性值为字符型。如：“宋体”、“楷体”。

FontSize：设置字体大小，属性值为整型。如：28、32。

FontBold：设置字体是否粗体，属性值为逻辑型。

FontItalic：设置字体是否斜体，属性值为逻辑型。

FontStrikethru：设置文本是否加删除线，属性值为逻辑型。

FontUnderline：设置文本是否加下划线，属性值为逻辑型。【例2-3-2】设计一个程序，程序运行后在窗体上显示2个文本框，文本框中显示“沈阳”二字。24

8．BackColor（背景色）属性例如：Form1.BackColor=&HFF00AA 将窗体背景色设置为紫色9．ForeColor（前景色）属性

10．BackStyle（背景样式）属性

0—Transparent：透明，即不显示控件背景色。

1—Opaque：不透明，此时可为控件设置背景颜色。11．BorderStyle（边框样式）属性 0—None：控件周围没有边框。1—FixedSingle：控件带有单边框。

12．Alignment（对齐样式）属性0—LeftJustify：正文左对齐。1—RightJustify：正文右对齐。2—Center：正文居中对齐。25【例：习题p41-1】设计程序，使其在窗体上显示5个外观不同的标签控件。26

13．AutoSize（自动调整）属性True：可以自动调整大小。False：保持原设置时的大小，正文若太长将自动裁剪。

14．TabIndex属性

TabIndex属性值决定了对象的Tab顺序，即按Tab键时焦点在各个控件间移动的顺序。

15．控件默认属性每个控件对象有且只有一个属性可以直接由控件名来代表。例如，可以用Text1=“VisualBasic”来代替Text1.Text=“VisualBasic”。27【小结】：介绍类、对象及对象的属性、事件和方法的概念；如何建立用户界面对象及标准控件的画法和基本操作、对象属性的设置。【作业】：1、书本P40页一、选择题

2、

28【教学进程】:第2章第3、4、5学时【授课类型】:

理论课【教学目的要求】:1、掌握窗体和控件的基本属性2、VB6.0工程的管理及环境设置。3、程序的调试4、应用程序开发示例：创建应用程序界面、设置属性、编写代码、保存应用程序、调试、运行应用程序、生成可执行文件。【教学重点】:窗体和控件的基本属性【教学难点】:VB6.0工程的管理及环境设置29

窗体的属性窗体常用方法窗体常用事件二、

窗体30窗体的属性1．基本属性Name、Caption、Font、BackColor、ForeColorHeight、Width、Left、Top【例2-3-3】用程序改变窗体的背景色和前景色。31

2．Appearance属性0：窗体显示为平面效果。1：窗体显示为立体效果。3．AutoRedraw属性True：自动重绘该窗体上的所有内容。False：不会自动重绘窗体上的内容。默认值4．ControlBox属性True：窗体具有控制菜单。默认值False：窗体不具有控制菜单。5．Enabled属性该属性用于设置窗体是否能够对键盘或鼠标产生的事件作出反应，默认值为True，表示能够对事件作出反应。326．BorderStyle属性7．MaxButton和MinButton属性True：表示窗体的“最大化”、“最小化”按钮有效。默认值False：表示相应的按钮无效。8．Moveable属性True：表示窗体的位置可以被移动

False：表示窗体的位置不可以被移动339．Picture属性用于设置窗体的背景图片。若在程序代码中设置该属性值，则需要使用LoadPicture函数。例如：Form1.Picture=LoadPicture(“c:\picture\lake.bmp”)

使用相对路径来加载图片，即：

Form1.Picture=LoadPicture(“lake.bmp”)

当参数为空时，即LoadPicture()时，表示清除图片。【例2-3-4】本程序用来初始化窗体外观。即当窗体没有显示之前，在加载窗体的事件过程Form_load中用程序对窗体的外观进行设置。3410．Visible属性该属性用于设置窗体是否可见。默认值为True，表示窗体可见。11．WindowsState属性用来指定窗体启动后的初始大小。0：窗体以正常方式显示。默认值1：窗体最小化成图标。2：窗体以全屏方式出现。35窗体常用方法1．Print方法格式：[对象名.]Print字符串表达式功能：用来在窗体上输出字符。说明：⑴当省略对象名时，默认在当前窗体中显示。⑵表达式在窗体上显示的位置由窗体的CurrentX和CurrentY属性决定，在默认情况下，从(0,0)开始，执行完一次Print方法之后，CurrentY自动加1。【例2-3-5】在窗体上输出文字。362．Cls方法格式：[对象名.]Cls

功能：清除在窗体上由Print方法显示的文本，或由Pset、Line、Circle等画图方法所画出的图形，且将光标移动到窗体左上角。说明：⑴当省略对象名而只写Cls时，默认清除当前窗体上的内容。⑵该方法经常写为以下形式：

Cls或Me.Cls '清除当前窗体Picture1.Cls '清除图片框Picture1中的图片373．Move方法格式：[对象名.]Move<左边距>[,<上边距>[,<宽度>[,<高度]]]功能：移动窗体，且可同时改变其大小。说明：左边距、上边距、宽度、高度均以Twip为单位。【例2-3-6】利用程序修改控件位置和大小。

38窗体常用事件1．Click事件2．DblClick事件双击窗体空白区域或双击窗体上的一个无效控件时，此事件被触发。3．Activate事件和Deactivate事件当窗体获得焦点变成活动窗体时，就会触发一个Activate事件。当窗体不再是活动窗体时发生Deactivate事件。4．Initialize事件当应用程序创建一个窗体时，将触发Initialize事件。5．Load事件把窗体装入内存工作区时发生Load事件。6．Unload事件卸载窗体时触发39【例2-3-7】窗体的Load事件举例。在以下程序中，用Form_Load事件过程对窗体的标题、大小、背景色、前景色和字体进行初始化，在Form_Activate事件过程中用Print方法显示。40建立、移除窗体.新建一个VB工程时，工程中只有一个窗体，默认名.称为Form1.添加新窗体方法.添加现存窗体方法.移除窗体方法一般调用一个窗体要经历5个过程：加载—显示—使用—隐藏—卸载。41加载窗体Load方法只是把窗体加载到内存里，并不显示。格式：Load[对象名]例如：LoadForm242显示窗体Show

方法显示窗体格式：[对象名].Show 或[对象名].show0 '显示为无模式窗体[对象名].Visible=True '显示为无模式窗体[对象名].Show1 '显示为模式窗体说明：显示的窗体分为无模式窗体和模式窗体。43隐藏窗体Hide方法隐藏窗体格式：[对象名].Hide或[对象名].Visible=False说明：使用Hide方法只能隐藏窗体，不能将窗体卸载。如果调用Hide方法时该窗体还没有加载，Hide方法会自动加载该窗体但并不予以显示。【例2-3-8】用Hide方法和Show方法，实现两个窗体的交替显示。44卸载窗体Unload方法卸载窗体格式：Unload[对象名]功能：隐藏窗体同时将窗体从内存中卸载。【例2-3-9】用Show方法和Unload方法，实现用主窗体Form1调用其它2个窗体的功能，其中Form3被显示为模式窗体。452.4工程的管理及环境的设置一、工程的组成

工程文件包含了一个应用程序的所有文件:窗体文件(.frm)：控件及属性、事件过程和自定义过程; 窗体的二进制数据文件(.frx)，自动产生同名.frx文件;标准模块文件(.bas);类模块的文件(.cls); 资源文件(.res); ActiveX控件的文件(.ocx).二、创建、打开和保存工程46三、添加、删除和保存文件1.窗体名和窗体文件名概念

窗体名：窗体的Name属性，在代码中用来引用该窗体，同一工程不能有相同的窗体名；

窗体文件名：窗体存放在磁盘上的文件名，该文件包含了该窗体的所有控件属性和代码，同一文件夹不能有相同的文件名。2.在工程中添加现存的窗体时，只是对该窗体文件的引用纳入工程。因此，如果更改窗体并保存它，会影响包含此窗体文件的任何工程。3.在工程中删除窗体时，仅将此窗体从工程里删除掉，但是窗体文件仍存在于磁盘上。但是，如果在VB之外删除一个窗体文件，VB不能更新此工程文件，当打开此工程时，将显示一个文件丢失的错误信息。4.对窗体文件改名方法1)打开工程

“另存为…Form”实现文件的复制——保存工程文件。2)利用编辑程序打开工程文件，修改FORM=XXX的文件名。窗体文件名窗体名47四、生成可执行文件和制作安装盘1.生成可执行文件文件/生成V6B2-11.exe文件，然后关闭VisualBasic6.0。2.制作安装盘在向导的指导下运行VB6.0中文版工具“Package&Deployment”；“打包”：把工程中用到的各种类型的文件进行打包压缩后，存放到特定的目录下。“展开”：再把这些打包的文件展开到用户可以携带的安装介质软盘、光盘等。3.检测安装程序

在没有VB6.0系统的环境下，执行安装盘中的Setup.exe文件，将发行盘进行安装。482.5程序调试一、错误类型（1）编辑错误在编辑代码时，VB会对键入的代码直接进行语法检查。当发现代码存在打字错误，遗漏关键字或标点符等语法错误，VB在Form窗口中弹出一个子窗口，提示出错信息，出错的那一行变成红色。这时，用户必须单击“确定”按钮，关闭出错提示窗，然后对出错行进行修改。49（2）编译错误编译错误指按了“启动”按钮，VB开始运行程序前，先编译执行的程序段时，产生的错误。此类错误由于用户未定义变量、遗漏关键字等原因产生。这时，VisualBasic也弹出一个子窗口，提示出错信息，出错的那一行被高亮度显示。50（3）运行错误运行时错误指VB在编译通过后，运行代码时发生的错误。这类错误往往是指令代码执行了一非法操作引起的。例如类型不匹配、试图打开一个不存在的文件等。51（4）逻辑错误程序运行后，得不到所期望的结果，这说明程序存在逻辑错误。这类错误往往是程序存在逻辑上的缺陷所引起。例如，运算符使用不正确、语句的次序不对、循环语句的起始、终值不正确等。通常，逻辑错误不会产生错误提示信息，故错误较难排除，需要程序员仔细地阅读分析程序以及调试。52二、调试错误

(1)VB的三种模式设计模式[设计]

进行程序的界面设计、属性设置、代码编写等。运行模式[运行]

执行“运行/启动”命令，可以查看程序代码，但不能修改。中断模式[中断]

当在运行模式，按了“中断”命令或当程序出现运行时错误时进入中断模式。可以查看代码、修改代码、检查数据。

(2)调试窗口有三个调试窗口，它们是：“立即”窗口、“监视”窗口、和“本地”窗口。可单击视图菜单中的对应命令打开这些窗口。53（3）设置断点和逐语句跟踪断点是告诉VB挂起程序执行的一个标记，当程序执行到断点处即暂停程序的运行，进入中断模式。设置或删除断点的步骤：中断模式下，直接查看某个变量的值，只要把鼠标指向所关心的变量处，稍停一下，就在鼠标下方显示该变量的值。断点标记当前行54三、常见错误1.使用中文标点符号

系统产生“无效字符”，以红色显示。2.字母和数字形状相似小写字母“l”和数字“1”形式相同、小写字母“o”与数字“0”。3.对象名称(Name)属性写错

Text1、Text2、Command1

txtInput、txtOutput、cmdOk4.对象的属性名、方法名、标准函数名写错尽量使用自动列出成员功能。正确的系统按规定的大小写表示。5.无意形成控件数组

建立控件时小心使用“复制”、“粘贴”按钮。6.打开工程时找不到对应的文件

保存文件时先保存窗体.frm文件、再保存.vbp文件，注意路径。55【小结】：介绍了VB6.0的功能和特点，VisualBasic6.0中文版的安装、启动和退出；应掌握VisualBasic6.0主窗口、窗体窗口、工具箱窗口、属性窗口和工程资源管理器窗口的使用。【作业】：1、书本P40-42页一、选择题

2、编写程序实现两个文本框内容同步

3、书本P43页第1、3题56第3章程序设计基础【教学目的要求】:1、掌握：数据类型（变量与常量、整数类型数据、浮点类型数据、货币型、字符串、Variant类型数据、Date类型数据、数据类型转换、数组、记录）表达式和运算符：2、掌握算术运算符、字符串运算符、关系运算符、逻辑运算符、特殊运算符、运算符的优先级、语句；3、掌握编写程序代码的规则；程序流程：分支、条件判断、循环；常见标准函数：数学函数、日期函数、字符串操作函数；【教学重点】:数据类型、表达式、操作符的正确使用。【教学难点】:程序流程的控制、常见标准函数。58【教学进程与章节学时分配】:讲授6学时,上机4学时,共10学时2学时：3.1数据类型

3.2常量

2学时：3.3变量

3.4表达式2学时：3.5常用内部函数3.6编写代码2学时：实验三数据类型、常量、变量2学时：实验四函数和表达式593.1数据类型3.2常量3.3变量

3.4表达式3.5常用内部函数3.6编写代码

60【教学进程】:第3章第1、2学时【授课类型】:

理论课【教学目的要求】:掌握：数据类型（整数类型数据、浮点类型数据、货币型、字符串、Variant类型数据、Date类型数据、数据类型转换）及其常量的描述，掌握正确定义和使用符号常量。【教学重点】:常用的数据类型。【教学难点】:使用符号常量613.1数据类型VisualBasic的数据类型主要分为三大类：系统定义的基本数据类型自定义类型枚举类型62基本数据类型631．字符串型（String）⑴在字符串中字母的大小写是有区别的。例如"ABC"与"abc"是不相等的。⑵字符串中包含字符的个数称为字符串的长度，如果长度为0则称之为空串。 "abc"

“中华人民共和国” “” “” ⑶字符串需要加上定界符双引号图4.1立即窗口642.数值型（Numeric）

包括整数类型和实数类型。⑴整数类型①整型（Integer）

例如：4，-4。②长整型（Long）

③字节型（Byte）

以1个字节存储无符号整型，只能存储0至255之间的数。65⑵实数类型实数类型又分为单精度实型、双精度实型和货币型。其中单精度实型、双精度实型在VB中都有两种表示法：定点表示和浮点表示。①单精度浮点型(Single)

单精度浮点型指数部分用E表示。例如：123.456E+3123.456E-43.402823E+38 '3.402823乘以10的38次方②双精度浮点型（Double）

双精度浮点型指数部分用D表示例如：123.456D+31.79769313486232D+308 '1.79769313486232乘以10的308次方③货币型（Currency）

货币型数据精确到小数点后4位。663．日期型（Date）

可以表示的日期范围从公元100年1月1日到9999年12月31日，而时间可以从0:00:00到23:59:59。日期文字须以定界符“#”括起来。例如： #January1,1993# #1Jan93# #1993-1-1#4．布尔型(Boolean)

布尔型又称为逻辑型，它只有两个值，即真值(True)和假值(False)，存储为两个字节。5．变体型（Variant）

变体型是一种特殊的数据类型，它可以用来表示系统定义的任何种类的数据类型(除了定长String类型及用户定义类型外)。67自定义类型

用Type语句定义数据类型，通常又称为记录型

格式：Type数据类型名

数据类型元素名

as数据类型数据类型元素名

as数据类型……EndType例如：TypestudentNoasintegerNameasString*10 '定义为10个字符的定长字符串

SexasString*2 '定义为2个字符的定长字符串Endtype68枚举类型1．枚举类型的定义枚举类型，即将该变量的取值一一列举出来格式：[Public|Private]Enum

枚举名称

成员名1[=常量表达式]

成员名2[=常量表达式]

……EndEnum69定义一个枚举类型Workday包含7个成员PublicEnumWorkdayMondayTuesdayWednesdayThursdayFridaySaturdaySundayEndEnum可以用赋值语句给枚举中的成员赋值，所赋的值可以是任何长整型的数。例如：PublicEnumWorkdayMonday=1TuesdayWednesdayThursdayFridaySaturdaySundayEndEnum703.2常量在程序设计中需要将数据存储为常量或者变量。值不能被改变的量称为常量，可以被改变的量称为变量。用常量和变量在程序中表示数据是重要的程序设计思想。71变量和常量的命名规则变量：在程序运行中其存储的值可以改变。常量：在程序运行中其值不可以改变。

命名规则：1.以字母或汉字开头，后可跟汉字、字母、数字或下划线组成，长度小于等于255个字符；2.不要使用VB中的关键字；3.VB中不区分变量名的大小写；4.为了增加程序的可读性，可在变量名前加一个缩写的前缀来表明该变量的数据类型。72常量

1．直接常量直接常量就是程序中具体给出的数据的值。直接常量分为数值常量、字符串常量、逻辑常量和日期常量。例如：5678，233.5E-6，0.58d7，"thisisastring"，True，#2004-11-18#等。

可以指明常量的类型，即在数值的后面加上相应的类型说明符。例如：2.75!是一个单精度浮点型常量，11.25#是一个双精度浮点型常量。732．符号常量符号常量:是用一些有意义的名字代替永远不变的值。格式：Const常量名[类型说明]=表达式[，常量名=表达式]……ConstPi2=Pi*2,Pi4=Pi*4Consttomorrow=#1/1/1995#Constnum!=1.25,maxAsDouble=2.65常量的效范围有以下三种情况：⑴

如果创建仅存在于过程中的常量，就在这个过程内部声明常量。⑵

如果希望这个常量在模块中所有过程都有效，但对模块之外任何代码都无效，就在模块的声明段中声明常量。⑶

如果创建在整个程序中都有效的全局常量，则应在标准模块的声明段中声明常量，并在

Const前面放置Public关键字，在窗体模块或类模块中不能声明全局常量。

74【小结】：介绍了VB6.0所使用的数据类型及其常量的描述，学会正确定义和使用符号常量。【作业】：书本P62-63页一、选择题1-575【教学进程】:第3章第3、4学时【授课类型】:

理论课【教学目的要求】:1、掌握：变量的命名规则，定义变量类型。2、掌握：表达式和运算符。【教学重点】:表达式和运算符。【教学难点】:变量的声明及当前值763.3变量1．变量的声明⑴

显式声明

显式声明是在变量使用前用声明语句声明变量。格式：Dim变量名[As数据类型]说明：①

其中Dim还可以是Static、Public或Private。②

变量名应遵循标识符的定义规则。③

数据类型可以是VB支持的任意数据类型，若未指定类型则为变体型。例如：DimvarAsIntegerPublicsum_1AsDoubleDimtomorrowAsDateDimx'x为变体型

77Dimname1asStringDimname2asString*6

可以用一个Dim语句定义多个变量，但每个变量的数据类型必须用as声明，例如：Dimvar1,var2asIntegerDimvar1asInteger,var2asInteger可使用类型符定义变量。例如：

Dimtotal！ '定义total为单精度实型变量

Dimaverage@ '定义average为货币型变量78⑵

隐式声明例如：PrivateSubCommand1_Click()

Var=50PrintVarEndSub

可以采用强制变量声明：OptionExplicit选择“工具|选项”命令，选择“编辑器”选项卡，再选择“要求变量声明”选项

792．自定义类型的变量①

声明自定义类型变量。例如，4.2.2节中定义一个Student数据类型，现在定义一个student类型的变量，方法为：

Dimliasstudent②

引用自定义类型变量

格式：变量名.成员名例如：

li.no

li.Name

li.Sex803．枚举类型的变量例如，在4.2.3节中定义了一个枚举数据类型Workday，下面的程序代码定义了一个枚举类型变量mywork。PrivateSubCommand1_Click()DimmyworkAsWorkday '定义变量mywork为Workday枚举类型

mywork=Tuesday ‘将枚举成员Tuesday（值为2）赋值给ywork

Printmywork '打印变量mywork的值，结果为2EndSub813.4运算符和表达式一、运算符

1.算术运算符例：5+10mod10\9/3+2^2结果：10

822.字符串运算符

＆、+

字符串连接

"123"+"456"结果"123456""123"&"456"结果"123456"

区别：+

两边必须是字符串，&不一定例如：

"abcdef"&12345'结果为"abcdef12345""abcdef"+12345'出错

"123"&456'结果为"123456"“123”+456'结果为

579注意：

"123"+True'结果为

122True转换为数值-1，False转换为数值0

833．关系运算符将两个操作数进行大小比较，结果为逻辑量。字符串比较,则按字符的ASCII码值从左到右一一比较，直到出现不同的字符为止.。例："ABCDE">"ABRA" 结果为False

"男字">"女字"按汉字的拼音字母比较844.逻辑运算符将操作数进行逻辑运算，结果是逻辑值：条件表达式1And条件表达式2条件表达式均为T，结果为T；

条件表达式1Or条件表达式2条件表达式有一个为T结果为T。85二、表达式

1.组成

变量、常量、函数、运算符和圆括号。

2.书写规则

(1)运算符不能相邻。例a+-b是错误的。

(2)乘号不能省略。例x乘以y应写成：x*y。

(3)括号必须成对出现，均使用圆括号。

(4)表达式从左到右在同一基准上书写，无高低、大小。

3.不同数据类型的转换运算结果的数据类型向精度高的数据类型靠。

Integer<Long<Single<Double<Currency4.优先级算术运算符>=字符运算符>关系运算符>逻辑运算86表达式书写举例

sin(45*3.14/180)+(exp(10)+log(10))/sqr(x+y+1)a*b*c*d/e/f/g或a*b*c*d/（e*f*g）87例：用人单位招聘秘书：年龄小于40岁的女性，学历专科或本科，年龄<40，性别=“女”，(学历=“专科”，学历=“本科”)

And

And

Or比a小，比b大用Ora小数b大数a小数b大数比a大，比b小用And例：表示算术表达式：正确的VB表达式：3〈=xAndx<=7

错误的VB表达式：3<=x<=7或

3<=xOrx<=7考虑：若分别写成：年龄<40And性别="女"And(学历="专科"And学历="本科")

年龄<40Or性别="女"Or(学历="专科"Or学历="本科")88算术表达式

在书写算术表达式时应注意与数学中的表达式写法的区别：⑴

在VisualBasic中不能省略乘号运算符，如：数学上的表达式b2-4ac中省略了乘号，但在写成对应的VisualBasic表达式的时候，要写成b^2-4*a*c。⑵

表达式中所有的括号一律使用圆括号，并且括号左右必须配对。如：数学中的表达式[(x+y)/(a-b)+c]x，在VisualBasic中要写成((x+y)/(a-b)+c)*x。⑶

算术运算符优先级从高到低的顺序为：乘方→负数→（乘、除）→整除→取模→（加、减），优先级高则先运算，但如果有括号则先运算括号内的表达式，例如：?-2^2 '结果为–4?3^3\2 '结果为13?4Mod8/2 '结果为0?3*2\3/2 '结果为3

89字符串表达式字符串运算符只有“&”和“+”，它们的功能是把字符串连接起来。例如：?"Visual"+"Basic" '结果为:VisualBasic

?"Visual"&"Basic" '结果为:VisualBasic?"abcd"+123 '操作类型不匹配出错

?"abcd"&123 '结果为

abcd123?now&"星期四" '03-6-2015:39:55星期四

字符串表达式例如："abc"&"123"&Left("abc",1)

90关系表达式格式：<表达式1><关系运算符><表达式2>功能：如果关系表达式成立，则计算结果为真，否则为假。说明：⑴

“表达式1”和“表达式2”是两个类型相同的表达式，可以是算术表达式、字符串表达式或者是其它关系表达式。例如：?10-5>2+3 '结果为：False?"xyz"="XYZ" '结果为：False⑵VisualBasic中，所有的关系运算符的优先级都相同。

91逻辑表达式

⑴

Not取反运算，即将真变假或假变真。例如：?Not"abc"<"abd" 'False⑵And

与运算，只有两个操作数的值都为真时，结果为真，否则结果为假。例如：?trueAnd1<2 'True?2+2=4Andfalse 'False?3<5And"a"="A"'False⑶Or或运算，两个操作数的值只要有一个为真时，结果就为真，否则结果为假。例如：?"abc"<>"ABC"Or2>1 'True?TrueOr6-3>4 'True?6<2Or"b"="B" 'False92⑷

Xor

异或运算，两个操作数的值相反时，结果为真，否则结果为假。例如：?3>5Xor8<5 'False⑸

Eqv

等价运算，两个操作数的值同时为真或同时为假时，结果为真，否则结果为假。例如：?3>5Eqv8<5 'True⑹Imp

蕴含运算，当第一个操作数的值为真，第二个操作数的值为假时，结果为假，否则结果为真。例如：?5<6Imp2>3 'False93逻辑表达式逻辑运算符的优先级有高到低为：Not→And→Or→Xor→Eqv→Imp。

例如：?Not"Abc"="abc"Or2+3<>5And"23"<"3"'结果为：True94日期运算符与日期表达式

1．日期运算符日期运算符只有“+”和“-”。2．日期表达式日期表达式包括以下操作：“+”连接的日期表达式，操作数一个为日期型，另一个为数值型，表示计算该日期后的若干天。例如：?#2002-02-01#+1 '结果为：02-2-2“-”连接的日期表达式有两种情况：当操作数一个为日期型，另一个为数值型时，表示计算该日期前的若干天；如果两个操作数都是日期型，表示计算两个日期之间相差的天数。例如：?#01/01/2002#-2 '结果为01-12-30?#2002-02-02#-2 '结果为：02-1-31 ?#2001-02-03#-#2001-02-02# '结果为：1

95各种运算符的优先级比较96【小结】：介绍了VB6.0所使用的数据类型及其常量的描述，学会正确定义和使用符号常量。【作业】：1、书本P62页选择题6-102、历次等级考试真题中相关部分练习题

3、书本P64页操作题197【教学进程】:第3章第5、6学时【授课类型】:

理论课【教学目的要求】:1、掌握常见标准函数：数学函数、日期函数、字符串操作函数；2、掌握编写程序代码的规则；【教学重点】:掌握常见标准函数。【教学难点】:掌握常见标准函数。983.5常用内部函数

函数的调用格式：<函数名>([参数1],[参数2]…)说明：⑴每一个函数都有函数名，通过函数名调用函数。⑵数学术语中的函数的“自变量”在程序设计语言中称为“参数”，函数运算的结果称为“返回值”。⑶函数是以表达式的形式调用的，而不能单独作为一个语句。例如：a=Sin(b)z=Sin(x)+Cos(x+y)99数学函数100字符串函数101102转换函数103时间函数104随机数函数1．Rnd函数格式：Rnd[(x)]，其中参数x是一个双精度数，可以省略。功能：可产生一个0~1之间的单精度随机数（该值是大于或等于0，但小于1的数），下一个要产生的随机数受参数x的影响，分别为：⑴

当x<0时，则每次产生的随机数都相同。⑵

当x>0或省略时，产生下一个随机数。⑶

当x=0时，则该次产生的随机数与上一次产生的随机数相同。例如：要产生1~100之间的随机整数时，可利用Int(Rnd*100+1)来解决2．Randomize语句格式：Randomize[(x)]功能：将Rnd函数的随机数生成器初始化例如：RandomizePrintRnd105数制转换函数106测试函数

格式：TypeName(变量名)功能：返回参数的变量类型。说明：返回值为具体的类型名例如：DimaAsVariantDimbAsIntegerDimcAsDoubleDimdAsStringPrintTypeName(a) '返回值：emptyPrintTypeName(b) '返回值：IntegerPrintTypeName(c) '返回值：DoublePrintTypeName(d) '返回值：StringPrintTypeName(Command1) '返回值：CommandButton

PrintTypeName(Picture1) '返回值：PictureBox

PrintTypeName(Text1) '返回值：TextBox

1073.6语句和语法规则

关键字和标识符关键字：又称为保留字，是VisualBasic系统定义的、有特定意义的词汇.标识符：自定义的命名称为标识符。VisualBasic中标识符的命名规则：⑴必须以字母开头；⑵只能由字母、数字和下划线组成，不能直接使用VisualBasic的关键字；⑶不得超过255个字符，控件、窗体和模块的名字不能超过40个字符；⑷在标识符的有效范围内必须是唯一的。⑸VisualBasic允许使用汉字作为标识符。108【小结】：介绍了常见的各类标准函数：数学函数、日期函数、字符串操作函数及编写程序代码的规则。【作业】：

1、书本P64页编程题2、32、历次等级考试真题中相关部分练习题109第4章窗体和基本输入/输出【授课类型】:理论课、实践课【教学目的要求】:1、掌握数据输入：赋值语句，输入框（InputBox）、文本框(TextBox)；2、掌握数据输出：Print或？方法、消息对话框（MsgBox）；3、掌握特殊打印格式：Spc、Tab；注释（'|Rem

）、暂停（Stop）、程序结束（End）语句。4、应用程序开发示例【教学重点】:窗体的概念和用途、Print方法、InputBox函数和MsgBox函数。【教学难点】:函数调用、Format函数和Tab与Spc函数。111【教学进程与章节学时分配】:讲授2学时,上机2学时,共4学时2学时：4.1顺序结构

4.2数据输入

4.3输出数据

4.4其它常用语句2学时：实验五数据输入与输出1124.1顺序结构程序设计4.2数据输入4.3输出数据4.4其它常用语句1134.1顺序结构一、赋值语句

形式：[LET]变量名＝表达式

作用：将表达式的值赋值给变量名。一般用于给变量赋值或对控件设定属性值。例：

sRate!=0.1Text1.Text＝"欢迎使用VisualBasic6.0"

当表达式的类型与变量的类型不一致时，强制转换成左边的精度，如

iA%=10/3iA中的结果为3

注意：虽然赋值号与关系运算符等于号都用“=”表示，VB系统会根据所处的位置自动判断是何种意义的符号。

114【例4-1-1】115【例4-1-2】116常见错误数据合法性检查中引起程序的死循环PrivateSubText1_LostFocus()IfNotIsNumeric(Text1)ThenText1=""Text1.SetFocusEndIfEndSubPrivateSubText2_LostFocus()IfNotIsNumeric(Text2)ThenText2=""Text1.SetFocusEndIfEndSubIfText2<>""AndNotIsNumeric(Text2)Text2Text1确定1174.2数据输入函数InputBox

格式：InputBox(提示信息[,标题][,缺省值][,x坐标][,y坐标])功能：InputBox函数能产生输入框，并有提示信息，等待用户输入信息后，将输入信息作为字符串返回。输入区【例4-2-1】利用InputBox函数输入学生的一组信息。

118InputBox(提示[，标题][，缺省][，x坐标位置][，y坐标位置])

其中：提示：提示信息；标题：对话框标题；缺省：输入区缺省值函数返回字符类型。例要在屏幕上显示图示的对话框：相应的语句如下：DimstrNameAsString*40strName=InputBox("请输入你的姓名"+vbCrLf+"然后单击确定","输入框")也可以使用如下语句：DimstrNameAsString*40，strS1AsString*40strS1="请输入你的姓名"+Chr(13)+Chr(10)+"然后单击确定"

strName=InputBox(strS1，"输入框"

，，100，100)当键盘输入“王晓明”后，变量strName获得键盘输入的值。1194.3消息框MsgBox

消息框用于向用户显示消息，等待用户做出必要的响应，并返回一个整型数值，作为程序继续运行的依据。消息框有函数形式和语句形式。120函数形式：变量[%]=MsgBox(提示[,按钮][，标题])

过程形式：MsgBox

提示[,按钮][,标题]

按钮值如下：函数返回所选按钮整数值：121格式：MsgBox(提示信息[,按钮类型][,标题])例如：x=MsgBox("thisisamsgbox!",1,"MsgBoxDexmo")

【例4-2-2】测试消息框及返回值

。说明：1．“按钮类型”用来指定显示按钮的个数、使用的图标样式、缺省按钮（即活动状态按钮）的位置以及消息框的强制回应等。每项内容详细取值见表5.1。

2．MsgBox函数的返回值是由用户选择的按钮决定的，每个按钮都有一个特定的返回值，

122消息框的语句形式其作用与MsgBox函数类似。格式：MsgBox

消息[,按钮类型][,标题]例如：MsgBox"下载完毕"1234.4其它常用语句

1．卸载语句unload格式：unload对象名2．结束语句End格式：

End

3．暂停语句Stop格式：

Stop124【小结】：主要介绍了数据输入：赋值语句，输入框（InputBox）、消息对话框（MsgBox）【作业】：1、书本P79页选择题

2、历次等级考试真题中相关部分练习题

3、书本P81页操作题1、4、5125第5章常用控件

【授课类型】:理论课、实践课【教学目的要求】:1、掌握控件的公共属性2、掌握窗体、标签、文本框、命令按钮控件、图形控件PictureBox和Image、复选框和单选按钮、列表框和组合框、滚动条（ScrollBar）和Slider控件、时钟、框架、键盘与鼠标等控件的基本用法。3、综合示例【教学重点】:标签；文本框；命令按钮；图片框；框架；单选钮和复选框的基本用法。【教学难点】:组合框；滚动条；记时器的基本用法。

127【教学进程与章节学时分配】:讲授10学时,上机6学时,共16学时2学时：5.1标签；文本框；命令按钮

2学时：5.2单选按钮和复选框

5.3框架2学时：5.4列表框和组合框2学时：5.5滚动条（ScrollBar）和Slider控件

5.6时钟2学时：5.7图形控件PictureBox和Image5.8键盘器与鼠标2学时：实验六选择控件--标签；文本框；命令按钮2学时：实验七选择控件--单选按钮和复选框、框架2学时：实验八选择控件--列表框和组合框、时钟

1285.2单选钮和复选框5.3框架5.4列表框和组合框5.5滚动条和Slider控件5.6计时器5.7图形控件5.8鼠标和键盘5.1

标签；文本框；命令按钮129【教学进程】:第5章第1、2学时【授课类型】:理论课【教学目的要求】:1、掌握控件的公共属性2、掌握窗体、标签、文本框、命令按钮控件等控件的基本用法。3、应用示例【教学重点】:标签；文本框；命令按钮的基本用法。【教学难点】:标签；文本框；命令按钮的基本用法。130一、标签Label标签主要用来显示文本信息。1.属性⑴

标签的常用属性有：Name、Caption、Height、Width、Top、Left、Enabled、Visible、FontName、FontSize、FontBold、FontItalic、FontUnderline、Alignment和Autosize、BorderStyle等。⑵

WordWrap属性

WordWrap属性控制Caption属性的内容能否自动换行，属性值为逻辑型，默认值为False。将AutoSize属性设置为True时WordWrap属性的设置才起作用。5.1

标签；文本框；命令按钮1312.事件标签的常用事件有：单击（Click）和双击（DblClick）。【例5-1-1】设计一个程序，利用2个标签控件，显示具有浮雕效果的文字。

132二、文本框文本框也称编辑框，用来输入、编辑和显示文本。1．属性⑴

文本框的常用属性有：Name、Height、Width、Top、Left、Enabled、Visible、FontName、FontSize、FontBold、FontItalic、FontUnderline和Alingment等。⑵

Text属性返回或设置文本框中的文本信息。其取值为字符串类型，默认最大长度为2048个字符。⑶

Maxlength属性用来设置文本框中能够输入的正文内容的最大长度。其取值为整数类型，默认设置为0。0：任意长字符串。非零整数：文本框中可容纳的字符数。文本框133⑷

MultiLine属性该属性返回或设置文本框中是否可以输入多行文本。其取值为逻辑型，默认设置为False。True：文本框可以输入或显示多行正文，同时具有文字处理器的自动换行功能。False：只能输入单行文本。⑸

ScrollBars属性该属性用来设置文本框是否具有滚动条，其取值为整数类型，默认设置为0。0—None：无滚动条。1—Horizontal：具有水平滚动条。2—Vertical：具有垂直滚动条。3—Both：同时具有水平和垂直滚动条。134⑹

Locked属性该属性设置文本框在运行时是否可被编辑，其取值为逻辑型，默认值为False。False：可以编辑。True：文本框中的文本不可被编辑，此时文本框相当于标签的作用。⑺

PasswordChar属性该属性可用于密码输入。⑻

SelStart、SelLength和SelText属性在程序运行中，对文本框内容进行选择操作，这三个属性返回用户选中的文本。

SelStart：选定的文本的开始位置，第一个字符的位置是0。

SelLength：选定的文本长度。

SelText：选定的文本内容。135【例5-1-2】设计程序，当单击窗体时，程序会自动将1个文本框的前8个字符显示到另外1个文本框中。1362．事件⑴

Change事件当用户输入新内容或当程序将Text属性设置新值时会触发该事件。⑵

LostFocus事件

由于按下制表键（Tab）或单击其它对象，使当前对象失去焦点时，则引发该事件。3．方法文本框的常用方法：SetFocus。

格式：[对象名.]SetFocus

功能：该方法是把光标移到指定文本框中。

137命令按钮三、命令按纽1．属性⑴基本属性Name、Height、Width、Top、Left、Enabled、Visible

FontName、FontSize、BackColor

⑵Caption属性 ⑶Default属性

True：回车键有效。False：回车键无效。默认值 ⑷Cancel属性True：按此按钮与按Esc键的效果相同。False：Esc键无效。默认值 ⑸Value属性

True：命令按钮被按下。False：命令按钮未被按下。默认值138⑹

Style属性 0—Standard：按钮上不能显示图形。 1—Graphical：按钮上可以显示图形，也可以显示文字。⑺

Picture属性

用来设置命令按钮上显示的图形，条件是Style属性值为1。显示的图形文件可以是.bmp和.ico。⑻

ToolTipText属性

用来设置当鼠标在命令按钮上停留1秒时，在其下面的小矩形框中显示提示信息，其取值为字符类型。例如：Command1.ToolTipText="确认后，单击此按钮"139【例5-1-3】建立一个允许剪切、复制和粘贴的简单便笺板程序。可增加内容：利用MouseMove事件决定命令按钮的有效性，即当选中内容，“剪切”、“复制”按钮有效，否则无效。140【小结】：详细介绍窗体、标签、文本框、命令按钮控件等控件的基本用法【作业】：历次等级考试真题中相关部分