1、第一章第一章Visual Basic概述概述1.了解了解VB6.0的功能特点的功能特点、集成环境。、集成环境。2.理解面向对象程序设计的几个概念。理解面向对象程序设计的几个概念。3.掌握掌握VB应用程序设计的步骤。应用程序设计的步骤。本章学习目的本章学习目的1.1VB6.0的概述的概述1.1.1 VB6.0的特点和功能的特点和功能 Visual Basic是由Microsoft公司于1991年推出的第一个可视化编程工具。它经历了3.0、4.0、5.0、6.0、V等版本,VB6.0是1999年推出的版本，其主要特点和功能如下：(1)面向对象的 编程(2)可视化的编程方法 (3)丰富的数据访问特性
2、 (4)便于与其它应用程序集成 (5)强大的Internet访问方法 (6)真正的本机编译 (7)完备的联机帮助功能 VB6.0的版本从开发时间上区分，VB6.0有3.0、.0、.0、.0等版本；从使用的语言上区分，VB6.0有英文版和中文版；从功能上区分，VB6.0有种版本，可以满足不同的开发需求。(1)学习版 (2)专业版 (3)企业版1.1.2 VB6.0的版本的版本1.2面向对象的程序设计和事件驱动面向对象的程序设计和事件驱动1.2.1面向对象程序设计的方法面向对象程序设计的方法 1.2.2 对象和类对象和类1.2.3 对象的属性、方法和事件对象的属性、方法和事件 （1）属性：）属性：
3、对象的性质或是描述对象的数据。对象的性质或是描述对象的数据。（2）方法：）方法：让对象实施一个动作或执行一项任务的途径，即方法告诉对让对象实施一个动作或执行一项任务的途径，即方法告诉对象应处理的事情。象应处理的事情。（3）事件和事件过程：）事件和事件过程：事件是一种预先定义好的特定动作，由用户或系事件是一种预先定义好的特定动作，由用户或系统激活；与事件相关的代码叫统激活；与事件相关的代码叫“事件过程事件过程”。（4）事件驱动应用程序的工作方式：）事件驱动应用程序的工作方式：程序运行时，当用户或系统触发某程序运行时，当用户或系统触发某个事件（如单击），则会执行该事件过程代码。这种程序运行方式称为
4、个事件（如单击），则会执行该事件过程代码。这种程序运行方式称为“事件驱动事件驱动”。1.3 VB6.0的安装和启动1.3.1 VB6.0的运行环境的运行环境1.3.2 VB6.0的安装的安装1.3.2 VB6.0的启动的启动1.4 VB6.0的集成环境的集成环境菜单栏工具栏代码窗口工具箱窗体窗口立即窗口监视窗口工程窗口属性窗口布局窗口1.4.1集成环境的工作栏集成环境的工作栏一、标题栏 在集成开发环境窗口中，最上面一行为标题栏。启动VB6.0时，标题栏显示的标题为“工程1-Microsoft Visual Basic设计”。二、菜单栏 菜单栏包含管理VB6.0系统和程序开发工程中需要的各种菜单
5、命令。如1-1图所示：三、工具栏 利用工具栏可以迅速地访问常用的菜单命令，如图1-2所示。1.4.2集成环境中的窗口集成环境中的窗口1.窗体窗口窗体窗口 窗体设计窗口是屏幕中央的主窗口，它可以作窗体设计窗口是屏幕中央的主窗口，它可以作为自定义窗口用来设计应用程序的界面。用户可以为自定义窗口用来设计应用程序的界面。用户可以在窗体中添加控件、图形和图片来创建所希望的外在窗体中添加控件、图形和图片来创建所希望的外观。每个窗口必须有一个的窗体名字，建立窗体时观。每个窗口必须有一个的窗体名字，建立窗体时缺省名为缺省名为Form1,Form2,.。应注意窗体名即应注意窗体名即Name属属性和窗体文件名的区
6、别。性和窗体文件名的区别。窗体设计窗口窗体名窗体文件名2.属性窗口属性窗口 属性是指对象的特征，如大小、标题或颜色等数据。在属性是指对象的特征，如大小、标题或颜色等数据。在Visual Basic6.0设计设计模式中，属性窗口列出了当前选定窗体或控件的属性的值，用户可以对这些属模式中，属性窗口列出了当前选定窗体或控件的属性的值，用户可以对这些属性值进行设置。性值进行设置。3.工程窗口工程窗口 工程是指用于创建一个应用程序的文件工程是指用于创建一个应用程序的文件的集合。工程资源管理器列出了当前工程的集合。工程资源管理器列出了当前工程中的窗体和模块中的窗体和模块 4.代码窗口代码窗口 代码窗口专门
7、用于程序代码设计，可显示和编辑程序的代码。5.立即窗口立即窗口用于执行简单的VB语句，达到测试程序的目的。6.窗体布局窗口窗体布局窗口 窗体布局窗口显示在屏幕右下角。用户可使用表示屏幕的小图像来布置应用程序中各窗体的位置。这个窗口在多窗体应用程序中很有用，因为这可以指定每个窗体相对于主窗体的位置。7.对象浏览窗口对象浏览窗口8.控件箱控件箱 工具箱提供一组工具，用于设计工具箱提供一组工具，用于设计时在窗体中放置控件生成应用程序的时在窗体中放置控件生成应用程序的用户接口。系统启动后缺省的用户接口。系统启动后缺省的General工具箱就会出现在屏幕左边，工具箱就会出现在屏幕左边，上面共有上面共有2
8、1个常用个常用“部件部件”。1.5工程管理1.5.1工程的组成及工程组1.5.2 工程的创建、打开和保存15.3 文件的添加、删除和保存1.5.4工作环境的设置1.6一个简单应用程序的设计 一般来说，创建VB应用程序的基本步骤如下：（1）设计应用程序界面（2）设置对象的属性（3）编写程序代码（4）调试运行程序（5）保存和编译应用程序例题:以一个简单的应用程序说明程序设计过程。程序运行时，在窗体上显示滚动字幕“欢迎进入奇妙的VB世界！”。设计步骤如下：1新建一个工程新建一个工程 启动VB，在“新建工程”对话框的“新建”选项卡下，选择“标准EXE”类型工程，单击“打开”命令按钮，即可创建一个缺省名
9、为“工程1”并包含一个窗体的工程。2界面设置界面设置程序设计界面如图116所示。在窗体上放置一个标签控件和一个时钟控件。表表13对象的属性表对象的属性表对象名称属性名称属性值Form1(窗体)名称CaptionBackcolorWindowstateForm1我的第一个程序H00FFC0C00Timer1（时钟）EnabledIntervalTrue100Label1（标签）CaptionBackStyleAutoSizeFontForcolor“欢迎进入奇妙地VB世界！”0（透明）True隶书、粗体、四号H008080FF3属性设置属性设置程序中各对象地属性如表13所示：4编写代码编写代码
10、双击窗体或窗体上任意控件，打开代码窗口，在“对象列表框”中选中“Timer1”，在“过程列表框”中选中时钟控件唯一的事件“Timer”后，在“SubEnd Sub”之间输入如下代码：Private Sub Timer1_Timer()Label1.Move Label1.Left-20 用Move方法移动标签判断是否到达窗体左边缘If Label1.Left+Label1.Width 启动”选项，或单击工具栏上的“启动”工具按钮，运行程序。6保存工程并生成保存工程并生成EXE文件文件 第第2章章Visual Basic语言基础语言基础 了解编写VB6.0程序代码的书写规则 理解VB6.0中的各
11、种数据类型和常用函数 掌握编写VB6.0程序代码的基本语 掌握编程中数组和过程的用法本章学习目标本章学习目标2.1程序的书写规则程序的书写规则1VB6.0代码中不区分字母的大小写。代码中不区分字母的大小写。2在同一行上可以书写多条语句，语句间要用冒号在同一行上可以书写多条语句，语句间要用冒号“:”分隔。分隔。3若一个语句行不能写下全部语句，或在特别需要时，可以换行。若一个语句行不能写下全部语句，或在特别需要时，可以换行。换行时需在本行后加入续行符，换行时需在本行后加入续行符，1个空格加下划线个空格加下划线“_”。4一行最多允许一行最多允许255个字符。个字符。5注释以注释以Rem开头，也可以使
12、用单引号开头，也可以使用单引号“”，注释内容可直接出现在，注释内容可直接出现在语句的后面。语句的后面。6在程序转向时需用到标号，标号是以字母开始而以冒号结束的字在程序转向时需用到标号，标号是以字母开始而以冒号结束的字符串。符串。7.VB6.0VB6.0中的标识符中的标识符:用来标记变量名、函数名和类型名。以字母或下用来标记变量名、函数名和类型名。以字母或下划线开始，后跟字母、数字或下划线组成的字符串（中间不许有划线开始，后跟字母、数字或下划线组成的字符串（中间不许有空格）。空格）。2.2数据类型数据类型一、标准数据类型一、标准数据类型二、自定义数据类型二、自定义数据类型 在模块级别中使用，用于
13、定义包含一个或多个元素的用户自定义的数据类型。在模块级别中使用，用于定义包含一个或多个元素的用户自定义的数据类型。使用形式：使用形式：Type 自定义类型名自定义类型名 元素名元素名(下标下标)As 类型名类型名 元素名元素名(下标下标)As 类型名类型名 .End Type说明说明:(1)Type(1)TypeEnd Type End Type 关键字；关键字；(2)(2)元素名元素名 表示自定义类型中的一个成员；表示自定义类型中的一个成员；(3)(3)下标下标 表示该成员是一个数组；表示该成员是一个数组；(4)(4)类型名类型名 表示该成员的标准数据类型。表示该成员的标准数据类型。例如例如
14、:对于一个学生的对于一个学生的“学号学号”、“姓名姓名”、“性别性别”、“年龄年龄”、“入学成入学成绩绩”等数据，为了处理数据的方便，常常需要把这些数据定义成一个新的数据类等数据，为了处理数据的方便，常常需要把这些数据定义成一个新的数据类型（如型（如Student类型）。类型）。Type Student Xh As String Xm As String Xb As String Nl As Integer Score As Single End Type2.3变量、常量和函数变量、常量和函数2.3.1变量变量一、变量的命名规则一、变量的命名规则(1)必须以字母开头，由字母、汉字、数字或下划线
15、组成。例如xyz、h_12等变量名都是正确的；而5f、*123是非法的。(2)不能在变量名中出现句点“.”、空格或者嵌入字符：！、#、$、%、&(3)长度不得超过255个字符。(4)不能使用VB的关键字。关键字是语言的组成部分，其中包括预定义语句（例如If、For等）、函数（Abs、Sqr等）和操作符（Or、Mod等）。注意：在同一个范围（范围是可以引用变量的域，如一个过程、一个窗体等）内，变量名必须是唯一的。二、变量的声明二、变量的声明1.用用Dim语句显式声明变量语句显式声明变量 形式：形式：Dim 变量名变量名 AS 类型类型 Dim 变量名变量名类型符类型符 例：例：Dim ab As
16、 integer,sum As single 等价于等价于 Dim ab%,sum!2.隐式声明隐式声明 Visual Basic允许用户在编写应用程序时，不声明变量而直接使用，系统临允许用户在编写应用程序时，不声明变量而直接使用，系统临时为新变量分配存储空间并使用，这就是隐式声明。所有隐式声明的变量都是时为新变量分配存储空间并使用，这就是隐式声明。所有隐式声明的变量都是Variant数据类型数据类型。Visual Basic根据程序中赋予变量的值来自动调整变量的类型。根据程序中赋予变量的值来自动调整变量的类型。例如：例如：下面是一个很简单的程序，其使用的变量a,b,Total都没有事先定义。
17、Private Sub Form_Click()Total=0a=10:b=20Total=a+bPrint“Total=;TotalEnd Sub3强制显式声明强制显式声明Option Explicit语句语句 良好的编程习惯都应该是良好的编程习惯都应该是“先声明变量，后使用变量先声明变量，后使用变量”，这样做可以提高程序，这样做可以提高程序的效率，同时也使程序易于调试。的效率，同时也使程序易于调试。Visual Basic 中可以强制显式声明，可以在窗体模中可以强制显式声明，可以在窗体模块、标准模块和类模块的通用声明段中加入语句块、标准模块和类模块的通用声明段中加入语句：Option Ex
18、plicit2.3.2常量常量 在程序运行过程中，其值不能被改变的量称为常量。在在程序运行过程中，其值不能被改变的量称为常量。在VB中有三类常量：中有三类常量：普通常量普通常量 符号常量符号常量 系统常量。系统常量。一、普通常量一、普通常量 1 整型常量整型常量 （1）整型（）整型（Integer）：表示）：表示-32768至至32767之间的整数之间的整数 例如：例如：10 110 20 （2）长整型（）长整型（Long）：）：表示表示-2,147,483,648至至2,147,483,647之间的整数之间的整数 例如：长整型常数的书写：例如：长整型常数的书写：23&通常我们说的整型常量指的
19、是十进制整数，但通常我们说的整型常量指的是十进制整数，但VB中可以使用八进制和十六中可以使用八进制和十六进制形式的整型常数，因此整型常数有如下三种形式：进制形式的整型常数，因此整型常数有如下三种形式：1）十进制整数。）十进制整数。如如125，0，-89。202）八进制整数）八进制整数。以以&或或&O（字母（字母O）开头）开头的整数是八的整数是八进制整数，如进制整数，如&O25表示八进制整数表示八进制整数25，即，即(25)8，等于十，等于十进制数进制数21。3）十六进制。）十六进制。以以&H开头开头的整数是十六进制整数，如的整数是十六进制整数，如&H25表示十六进制整数表示十六进制整数25，即
20、，即(25)16，等于十进制数，等于十进制数37。VB中的颜色数据常常用十六进制整数表示。中的颜色数据常常用十六进制整数表示。2、实数、实数1）单精度实型（）单精度实型（Single）：有效数为：有效数为7位位2）双精度实型（）双精度实型（Double）：有效数为：有效数为15位位常量的表示：常量的表示：1）十进制小数形式。）十进制小数形式。它是由正负号（它是由正负号（+，-）、数字）、数字（09）和小数点（）和小数点（.）或类型符号（！、）或类型符号（！、#）组成，即）组成，即n.n，n！或！或n#，其中，其中n是是09的数字。的数字。例如例如0.123、.123、123.0、123！、！、
21、123#等等2）指数形式。）指数形式。nEm 或或 n.nEm,nDm 或或 n.nDm 例：例：1.25E+3 和和 1.25D+3相当于相当于1250.0 或者或者1.25103。3、字符串常量字符串常量在在VB中字符串常量是用双引号中字符串常量是用双引号“”括起的一串字符，可以括起的一串字符，可以是所有西文字符和汉字、标点符号等；是所有西文字符和汉字、标点符号等；例如例如ABC，abcdefg，123，0，VB程序设计程序设计等。等。说明：说明：（1）表示空字符串，而表示空字符串，而 表示有一个空格的字符串；表示有一个空格的字符串；（2）若字符串中有双引号，例如）若字符串中有双引号，例如
22、ABDXYZ，则用连续两，则用连续两个双引号表示，即：个双引号表示，即：ABDXYZ“4、逻辑（、逻辑（Boolean）数据类型）数据类型 只有两个值只有两个值True，或，或False。将逻辑数据转换成整型时：。将逻辑数据转换成整型时：True为为-1，False为为0；其它数据转换成逻辑数据时：；其它数据转换成逻辑数据时：非非0为为True,0为为False。5、日期常量、日期常量 日期（日期（Date）型数据按）型数据按8字节的浮点数来存储，表示日期范围从公元字节的浮点数来存储，表示日期范围从公元100年年1月月1日日9999年年12月月31日，而时间范围从日，而时间范围从0:00:00
23、23:59:59。一种在字面上可被认作日期和时间的字符，只要用号码符一种在字面上可被认作日期和时间的字符，只要用号码符“#”括起来，都可以作为括起来，都可以作为日期型数值常量。日期型数值常量。例：例：#09/02/99#、#January 4,1989#，#2002-5-4 14:30:00 PM#都是合法的日期型常都是合法的日期型常量。量。二、符号常量二、符号常量 在程序中，某个常量多次被使用，则可以使用一个符号来代替该常量，这样在程序中，某个常量多次被使用，则可以使用一个符号来代替该常量，这样不仅在书写上方便，而且有效地改进了程序的可读性和可维护性。不仅在书写上方便，而且有效地改进了程序的
24、可读性和可维护性。VB中使用关键字中使用关键字Const 声明符号常量。其格式如下：声明符号常量。其格式如下：Const 常量名常量名 As 类型类型=常数表达式常数表达式 或：或：Const 类型符号类型符号=常数表达式常数表达式例如：例如：Const PI As Double=3.1415926535 等价于：等价于：Const PI#=3.1415926535三、系统常量三、系统常量 VB系统提供的应用程序和控件的系统定义常数。系统提供的应用程序和控件的系统定义常数。它们存放于系统的对象库它们存放于系统的对象库中，在中，在“对象浏览器对象浏览器”中的中的 Visual Basic（VB）
25、和和 Visual Basic for applications（VBA）对象库中列举了）对象库中列举了 Visual Basic 的常数的常数 例如，要将文本框例如，要将文本框Text1的前景颜色设置为红色，可以使用下面的语句：的前景颜色设置为红色，可以使用下面的语句：Text1.ForeColor=vbRed 这里的这里的vbRed就是系统常量。这比直接使用就是系统常量。这比直接使用16进制数来设置要直观得多。进制数来设置要直观得多。2.3.3常用内部函数常用内部函数 VB提供了上百种内部函数（库函数），要求掌握这些常用函提供了上百种内部函数（库函数），要求掌握这些常用函数的功能及使用。数
26、的功能及使用。调用方法：调用方法：函数名（参数列表）函数名（参数列表）有参函数有参函数 函函数数名名 无参函数无参函数 说明：说明：（1）使用库函数要注意参数的个数及其参数的数据类型使用库函数要注意参数的个数及其参数的数据类型 （2）要注意函数的定义域（自变量或参数的取值范围）要注意函数的定义域（自变量或参数的取值范围）例如：例如：sqr(x)要求：要求：x=0 （3）要注意函数的值域。要注意函数的值域。如：如：exp(23773)的值就超出实数在计算机中的表示的值就超出实数在计算机中的表示 范围。范围。1、数学函数、数学函数 常用的数学函数见表常用的数学函数见表2-2所示所示 Abs(N)C
27、os(N)Sin(N)Exp(N)Log(N)Sqr(N)Rnd(N)Sgn(N)说明：说明：（1）在三角函数中的自变量是以弧度为单位。在三角函数中的自变量是以弧度为单位。如：如：sin300 sin(3.14159/180*30)（2）Rnd函数返回函数返回0 1（包括（包括0和不包括和不包括1）之间的双精）之间的双精度随机数。度随机数。若要产生若要产生1-100的随机整数：的随机整数：Int(Rnd*100)+1 提问：怎样产生提问：怎样产生N，M区间的随机数？区间的随机数？2.字符串函数字符串函数（常用的字符串函数见表（常用的字符串函数见表2-3）说明：如果返回是字符型，则函数后有“$”
28、字符。当然一般也可以不写，习惯都写上。例如：len(This is a book!)15 Left$(ABCDEFG,3)ABC Right(ABCDEFG,3)“EFG Mid$(ABCDEFG,2,3)BCD“Ucase(ABcd)ABCD Lcase(ABcd)abcd Trim(Abcd )ABcd String(5,A )AAAAA InStr(2,“ABCDEFGEF”,“EF”)5（第一次出现的位置）3.日期、时间函数日期、时间函数 常用的日期时间函数见表常用的日期时间函数见表2-4 掌握：掌握：Time()Date()Now Year()Month()Day()4.格式输出函数
29、格式输出函数 使用格式：Format$（表达式（表达式，“格式字符串格式字符串”）功能：按用户指定格式返回表达式，功能：按用户指定格式返回表达式，常常用在常常用在print方法中。方法中。使用形式：使用形式：print Format$（表达式（表达式，“格式字符串格式字符串”）表达式：可以是数值、日期或字符串型表达式。表达式：可以是数值、日期或字符串型表达式。格式字符串：表示输出表达式时采用的输出格式。不同数据类型所采用的格式格式字符串：表示输出表达式时采用的输出格式。不同数据类型所采用的格式字符串是不同的。字符串是不同的。（1）数值型数据格式化(见表3-12)注意：对于符号：0与#，当数值的
30、实际位数比格式控制给定的位数多时，系统将按四舍五入返回给定的位数。如：Format(3.14159,“#.#”),其值为 3.142 Format(3.14159,“000.000”),其值为 003.142 （2）日期和时间型数据格式化(见表3-13)缺省日期格式为：“mm/dd/yy”,缺省时间格式：“hh:mm:ss”（3）字符串类型数据格式化(见表3-14)5.输入和输出函数 1.输入函数InputBox变量名=InputBox$(，)其中:提示 提示信息,标题 标题区显示,缺省输入区缺省值。例如:要在屏幕上显示如下的对话框:例如：有下列语句如下例如：有下列语句如下:Dim x%x=V
31、al(InputBox(“请输入一个数请输入一个数”,“输入框输入框”,100)语句执行后打开如下对话框。语句执行后打开如下对话框。缺省值标题提示2.MsgBox函数和函数和MsgBox过程过程 函数形式:变量%=MsgBox(提示,按钮图标+缺省按钮+模式，标题)过程形式:MsgBox 提示,按钮图标+缺省按钮+模式,标题图标标题提示信息命令按钮说明：说明：“标题标题”和和“提示提示”与与InputBox函数中对应的参数相同；函数中对应的参数相同；“按钮图标按钮图标+缺省按钮缺省按钮+模式模式”是整型表达式，决定信息框按钮数目、是整型表达式，决定信息框按钮数目、出现在信息框上的图标类型及操作
32、模式出现在信息框上的图标类型及操作模式(见表见表4.1)若程序中需要返回值，则使用函数，否则可调用过程。若程序中需要返回值，则使用函数，否则可调用过程。图标标题提示信息命令按钮按钮及图标值如下按钮及图标值如下:根据用户所选按钮，函数返回17的整数值，其含义如下表:（表4.2)2.4运算符和表达式运算符和表达式一、算术运算符和表达式一、算术运算符和表达式例：5+2*10 mod 10 9/3+2 2 结果是：二、二、关系运算符与关系表达式关系运算符与关系表达式 比较两个运算量之间的关系，关系表达式的运算结果为逻辑量。若比较两个运算量之间的关系，关系表达式的运算结果为逻辑量。若关系成立，结果为关系
33、成立，结果为True，若关系不成立，结果为若关系不成立，结果为False。VB中的关系运算符如下表所示。中的关系运算符如下表所示。运算符含义优先级实例结果小于所有关系运算优先级相同。低于算术运算的加“+”，减“-”运算，高于逻辑非“Not”运算。15+1020False=小于或等于10大于1020False=大于或等于This=ThatTrue=等于This=ThatFalse不等于This ThatTrueLike字符串匹配This Like*isTrueIs对象比较 例：100 +123 结果为 223100 +123 结果为 100123Abc+123 出错100&123 结果为 100
34、123 100&123 结果为 100123 Abc&123 结果为 Abc123Abc&123 结果为 Abc123 注意：使用运算符注意：使用运算符“&”时，时，变量与运算符变量与运算符“&”之间应加一个空格之间应加一个空格。这是因为。这是因为符号符号“&”还是长整型的类型定义符，如果变量与符号还是长整型的类型定义符，如果变量与符号“&”接在一起，接在一起，VB系统先把系统先把它作为类型定义符处理，因而就会出现语法错误。它作为类型定义符处理，因而就会出现语法错误。关系运算的规则如下：关系运算的规则如下：（1 1）当两个操作式均为数值型，按数值大小比较。）当两个操作式均为数值型，按数值大小比
35、较。（2）字符串比较）字符串比较,则按字符的则按字符的ASCII码值从左到右一一比较码值从左到右一一比较,直到出现不同的字符为止直到出现不同的字符为止.。例：例：ABCDE ABRA 结果为结果为 False （3）数值型与可转换为数值型的数据比较，）数值型与可转换为数值型的数据比较，如：如：29189，按数值比较，结果为，按数值比较，结果为False。（4）数值型与不能转换成数值型的字符型比较，）数值型与不能转换成数值型的字符型比较，如：如：77 sdcd，不能比较，系统出错。，不能比较，系统出错。（5）“Like”运算符是运算符是VB6.0新增加的。新增加的。其使用格式为：其使用格式为：s
36、tr1 Like str2三、逻辑运算符与逻辑表达式三、逻辑运算符与逻辑表达式 逻辑运算符：Not，And，Or Xor Eqv Imp 说说 明：明：（1）逻辑运算符的优先级不相同，）逻辑运算符的优先级不相同，Not（逻辑非）最高，但它低于关系运算，（逻辑非）最高，但它低于关系运算，Imp（逻辑蕴含）最低。（逻辑蕴含）最低。（2）VB中常用的逻辑运算符是中常用的逻辑运算符是Not、And和和Or。它们用于将多个关系表达式进行。它们用于将多个关系表达式进行逻辑判断。逻辑判断。例如：例如：数学上表示某个数在某个区域时用表达式：数学上表示某个数在某个区域时用表达式：10X=10 And X20 如
37、果写成如下形式将是错误的：如果写成如下形式将是错误的：10=x20 或或 10=x Or x20 例：用人单位招聘秘书：年龄小于例：用人单位招聘秘书：年龄小于40岁，女性，学历专科或本科：岁，女性，学历专科或本科：写成条件写成条件VB的表达式：的表达式：年龄年龄=39 性别性别=“女女”学历学历=“专科专科”学历学历=“本科本科”四、四、字符串运算符与字符串表达式字符串运算符与字符串表达式 字符串运算符有：字符串运算符有：、+。功能是字符串连接功能是字符串连接例如：例如：ABCD+EFGHI 结果为：结果为：ABCDEFGHI“VB”&“程序设计教程程序设计教程”结果为：结果为：VB程序设计教
38、程程序设计教程说明：当连接符两旁的操作量都为字符串时，上述两个连接符等说明：当连接符两旁的操作量都为字符串时，上述两个连接符等价。它们区别是：价。它们区别是：+（连接运算）（连接运算）：两个操作数均应为字符串类型；：两个操作数均应为字符串类型；&（连接运算）（连接运算）：两个操作数既可为字符型也可为数值型，：两个操作数既可为字符型也可为数值型，当是数值型时，系统自动先将其转换为数字字符，然后进行当是数值型时，系统自动先将其转换为数字字符，然后进行连接操作。连接操作。2.5基本语句基本语句 VB程序设计有三种基本结构：顺序结构、选择结构和程序设计有三种基本结构：顺序结构、选择结构和循环结构。其中
39、赋值语句、条件语句和循环语句是在这三循环结构。其中赋值语句、条件语句和循环语句是在这三种结构程序设计中最基本、最常用的语句。种结构程序设计中最基本、最常用的语句。2.5.1赋值语句赋值语句形式形式:变量名表达式变量名表达式 对象对象.属性表达式属性表达式功能：功能：将表达式的值赋值给变量名或指定对象的属性。将表达式的值赋值给变量名或指定对象的属性。一般用于给变量赋值或对控件设定属性值一般用于给变量赋值或对控件设定属性值.例：例：sRate!=0.1 Text1.Text 欢迎使用欢迎使用Visual Basic 6.0”说明：说明：1 执行过程：先求表达式的值，然后将值赋值给左边的执行过程：先
40、求表达式的值，然后将值赋值给左边的变量。变量。2 右边的表达式可以是变量、常量、函数调用等特殊的右边的表达式可以是变量、常量、函数调用等特殊的表达式。表达式。3 不要将不要将“”理解为数学上的等号：理解为数学上的等号：A=A+1 是表示将是表示将A单元的值加后以放回到单元的值加后以放回到A单元。单元。4赋值符号赋值符号“=”左边一定只能是变量名或对象的属性引左边一定只能是变量名或对象的属性引用，不能是常量、符号常量、表达式。用，不能是常量、符号常量、表达式。下面的赋值语句都是错的：下面的赋值语句都是错的：5=X 左边是常量。左边是常量。Abs(X)=20 左边是函数调用，即是表达式。左边是函数
41、调用，即是表达式。5.赋值符号赋值符号“=”两边的数据类型一般要求应一致两边的数据类型一般要求应一致2.5.2条件语句条件语句 条件语句用于根据条件产生相应的动作。使用条件语句可以控制程序执行的流程。VB中常用的种条件语句有IfThen语句、IfThenElse语句、Select Case语句。1.IfThen语句语句(单分支结构单分支结构)If Then 语句块语句块 End If 或或 If Then 例例:已知两个数已知两个数x和和y，比较它们的大小，比较它们的大小，使得使得x大于大于y。If xy Then t=x:x=y:y=t End If 或或 If xy Then t=x:x=
42、y:y=t2.IfThenElse语句语句(双分支结构双分支结构)If Then Else End If If Then Else 双分支选择结构执行过程双分支选择结构执行过程 例如：输出例如：输出x,y两个中值较大的一个值。两个中值较大的一个值。IF XY Then Print XElse Print YEnd If也可以写成如下的单行形式：也可以写成如下的单行形式：IF XY Then Print X Else Print Y3.IfThenElseIf语句语句(多分支结构多分支结构)形式形式:If Then ElseIf Then Else 语句块语句块 n+1 End If4.Sele
43、ct Case语句（情况语句）语句（情况语句）形式：Select Case 变量或表达式Case 表达式列表1语句块1Case 表达式列表2语句块2Case Else语句块n+1End Select数值型或字符串表达式 说明：与同类型的下面四种形式之一：表达式 A+5 一组枚举表达式(用逗号分隔)2,4,6,8 表达式1 To 表达式2 60 to 100 Is 关系运算符表达式 Is 0 初值初值终值终值 =1 时时,可省略可省略终值终值=0 死循环死循环 步长步长 循环变量在终值内 语句块 Exit For 语句块 循环变量加步长 T F 循 环 变 量 得 初值 循环次数循环次数)1(步
44、长初值终值Int例例:For I=2 To 13 Step 3 Print I,Next I Print“I=“,I 循环执行次数循环执行次数 输出输出I的值分别为的值分别为:2 5 8 11 出了循环输出为出了循环输出为:I=14例例4.6 编程计算：编程计算：S=1+2+3+100Dim S%,I%S=0 累加前变量累加前变量S为为0For I=1 to 100 S=S+INext IPrint S=,S 当N=100N=N+1打印SS=0,N=1S=S+N例例4-5的算法流程图的算法流程图二、二、DoLoop循环语句循环语句 形式形式1：（当型循环）：（当型循环）Do While|Unt
45、il 语句块语句块 Exit Do 语句块语句块 Loop 条 件 F T Exit D o 语 句 块 语 句 块 D o W hile Loop 执 行 过 程 形式形式2：(直到循环）直到循环）Do 语句块语句块 Exit Do 语句块语句块Loop While|Until T F Exit D o 语 句 块 语 句 块 条 件 D o Loop W hile 的 执 行 过 程 条 件语句块语句块TFExit Do条 件语句块语句块TFExit Do Do UntilLoop执行过程执行过程 DoLoop Until执行过程执行过程 说明：说明：（1 1）当使用）当使用WhileWh
46、ile 构成循环时，当条件为构成循环时，当条件为“真真”，则反复执行循环体，则反复执行循环体，当条件为当条件为“假假”，则退出循环。，则退出循环。（2）当使用）当使用Until 构成循环时，当条件为构成循环时，当条件为“假假”，则反复执行循环体，直，则反复执行循环体，直到条件成立，即为到条件成立，即为“真真”时，则退出循环。时，则退出循环。（3 3）在循环体内一般应有一个专门用来改变条件表达式中变量的语句，以使随）在循环体内一般应有一个专门用来改变条件表达式中变量的语句，以使随着循环的执行，条件趋于不成立（或成立），最后达到退出循环。着循环的执行，条件趋于不成立（或成立），最后达到退出循环。（
47、4）语句）语句Exit Do的作用是退出它所在的循环结构，它只能用在的作用是退出它所在的循环结构，它只能用在DO/Loop结构中，结构中，并且常常是同选择结构一起出现在循环结构中，用来实现当满足某一条件时提前并且常常是同选择结构一起出现在循环结构中，用来实现当满足某一条件时提前退出循环。退出循环。3.WhileWend语句语句使用格式如下：使用格式如下：While Wend 说明：说明：该语句的功能与该语句的功能与Do While.Loop实现的实现的循环完全相同。循环完全相同。例：用例：用doLoop语句改写前面的例题语句改写前面的例题4.5例例2.8 求两个整数的最大公约数、最小公倍数求两
48、个整数的最大公约数、最小公倍数Dim n%,m%,nm%,r%m=Val(InputBox(m=)n=Val(InputBox(n=)nm=n*mIf mn Then t=m:m=n:n=t r=m mod n Do While(r 0)m=n n=r r=m mod n LoopPrint 最大公约数最大公约数=,n Print 最小公倍数最小公倍数=,nm/n 算法流程图算法流程图4.循环的嵌套循环的嵌套多重循环结构多重循环结构 如果在一个循环内完整地包含另一个循环结构，则称为多重循环，或循如果在一个循环内完整地包含另一个循环结构，则称为多重循环，或循环嵌套，嵌套的层数可以根据需要而定，嵌
49、套一层称为二重循环，嵌套二层环嵌套，嵌套的层数可以根据需要而定，嵌套一层称为二重循环，嵌套二层称为三重循环。称为三重循环。上面介绍的几种循环控制结构可以相互嵌套，下面是几种常见的二重嵌套上面介绍的几种循环控制结构可以相互嵌套，下面是几种常见的二重嵌套形式：形式：（1）For I=.For J=.Next J .Next I（2）For I=.Do While/Until.Loop .Next I（3）Do While.For J=.Next J .Loop（4）Do While/Until.Do While/Until.Loop .Loop例如例如：打印九九乘法表打印九九乘法表.For i=1
50、 To 9 For j=1 To 9 se=i&j&=&i*j Picture1.Print Tab(j-1)*9+1);se;Next j Picture1.Print Next i对于循环的嵌套，要注意以下事项：对于循环的嵌套，要注意以下事项：(1)内循环变量与外循环变量不能同名；内循环变量与外循环变量不能同名；(2)外循环必须完全包含内循环，不能交叉；外循环必须完全包含内循环，不能交叉；(3)不能从循环体外转向循环体内，也不能从外循环转向内不能从循环体外转向循环体内，也不能从外循环转向内循环循环.下面是正确的嵌套下面是正确的嵌套 For i=1 To 10 For j=1 To 20 N
