VB程序概述

Visual Basic 概述

VB语言是一种面向对象的可视化程序设计语言

一、面向对象程序设计的基本概念

面向对象程序设计：面向对象的程序设计通过类、对象、继承、多态等机制形成一个完善的

编程体系。它是一种以对象为基础、以事件驱动对象对事件进行处理的

程序设计技术。

对象：概念：对象既包含数据，又包含接受事件后对数据进行操作的方法，将两者封装起来的一个独立逻辑实体。也就是说，对象都有自己的属性（数据）、方法、事件。

对象包含属性和方法，能够识别和响应一定的事件。

事件刺激对象，用一定方法处理数据，从而完成一定的功能任务。

属性：定义：用来描述对象的特征。包括公共属性和专业属性。

设置：每个对象的属性都有一个默认值，可在属性窗口中设置改变，也可在代

码窗口中通过编程设置改变（格式：对象名.属性名称=属性值）。

事件：定义：指对象能够识别并做出反应的外部刺激。每个事件都有其事件名。

对象事件是由VB预先定义好的能被对象识别和响应的动作。

分类：系统事件：由系统或对象自己的产生的，如Load事件。

用户事件：由用户操作引起的事件，如Click事件。

驱动机制：事件发生→刺激对象→对象响应→执行事件代码→完成一定功能

（所执行的事件代码称为事件过程）

能由用户引发也可以由系统引发。

VB应用程序的运行过程就是对事件的处理过程。

事件过程格式：Private Sub 对象名_事件名()[括号不能省略]

……

End Sub

方法：定义：指系统已设计好的、在编写事件过程中可以使用的一些特殊程序。

从而实现完成显示、隐藏、移动、聚焦、卸载、加载、打印等功能。

不同对象具有不同的方法，方法的内容是不可见的，用户只需要知道有哪些方

法，完成哪些功能，熟悉其使用规则即可。

使用格式：对象名.方法名[参数1,][参数2,]…[参数n]

常用方法：Print、Show、Cls、SetFocus

类：概念：具有相同性质的对象的集合，类中的每个单个对象称为类的一个实例。

属于同一类的对象具有同一组属性、事件、方法，只是类的对象一旦建立，每个

对象的属性值、响应事件、设计方法可以不同。

二、程序设计语言

定义：人和计算机交流的工具，由字、词和语法规则构成的指令系统。

演变：低级语言：面向机器（依赖具体的机器硬件，通用性差）的语言。

机器语言（二进制语言）

汇编语言

高级语言：是一种接近自然语言和数学语言的程序设计语言。

它提供常用的数据描述和对数据操作的规则描述

用高级语言编写的程序称为“源程序”，计算机不能直接识别源程序代码，

必须翻译为二进制程序代码才能在机器上运行。

翻译的方式有：解释方式和编译方式。

三、算法

定义：解决问题所确定下来的方法和有限步骤称为算法。（一个算法就是有限指令的集合体）表达方式：自然语言表达

流程图表达

四、程序设计方法

类型：模块化程序设计方法

说明：在设计和编写大型程序时，可以对其进行模块化分解，每个模块负责对应的子功能，模块间相互协调，共同完成整个程序的功能。

模块是数据说明、接口说明、执行语句等程序对象的集合。可以独立命名，并

通过模块名来调用、访问和执行。

VB语言中，子过程（Sub）、函数（Function）、模块等程序可以看成模块。

结构化程序设计方法：

说明：结构化程序是指运用基本控制结构编写的程序。

基本结构有：顺序结构、条件结构、循环结构

△面向对象的程序设计方法

说明：算法和数据结构在编程中作为一个密不可分的整体，这个整体叫做对象。

面向对象的程序设计通过类、对象、继承、多态等机制形成一个完整编程体系

其可读性、可维护性、可修改性强。

五、Visual Basic 发展过程与特点

六、VB 的集成开发环境

定义：将程序的设计、编辑、修改、运行、调试查错等各种功能一体化的开发环境。

包括：window标题栏

菜单栏、工具栏、工具箱窗口、属性窗口、窗体布局窗口、立即窗口、其他窗口

工程资源管理器窗口：其上方有“查看代码”、“查看对象”、“切换文件夹”按钮。

属性窗口：包含：

对象下拉列表框：标识当前选定对象的名称及所属的类。单击右端的下拉

箭头，可以列出当前窗体以及所包含的全班对象名称。

选项卡：属性显示排列方式。（按字母排序和按分类排序）

属性列表框：左列显示所选对象所有属性名,右列可供查看和修改的属性值

属性说明：对属性进行简短说明。

立即窗口：打开：“视图”→“立即窗口”。语句格式：?/Print<表达式>

七.VB程序设计初步

1、界面设计

2、属性设置

3、编写程序代码

编码规则：

（1）VB代码中不区分字母大小写

VB对用户编写的程序代码进行自动转换

VB中的关键字，首字母总被转换为大写，其余字母为小写

若关键字又多个英文单词组成，则将每个单词的首字母转为大写

对于用户自定义的变量、过程名，VB以第一次定义的为准，以后输入的自动向首次

的定义进行转换。

（2）语句书写自由

在同一行上可以书写多条语句，语句间用冒号“：”隔开

单行语句可分若干行书写，在本行后加续行符“ _”（由一个空字符和下划线组成）

一行最多允许书写255个字符

（3）注释有利于程序的维护和调试

Rem语句注释。如果要在同一行进行注释，需要用冒号隔开。

单引号注释。可直接写在同一行语句之后，也可另起一行。

（4）关键字与标识符

关键字：具有固定含义和使用方法的字母自合。

如Private、Sub、End、If、Caption、Print、Exp

标识符：程序开发人员定义的，用作变量名、符号常量名、控件名称、过程名称等的字母自合。标识符的第一个字符必须是字母。后续的字符可以是字母、

数字、下划线。关键字不能被定义为标识符。长度不能超过255个字符。

4、运行程序

运行方式：解释方式：运行、调试、修改

编译方式：VB集成开发环境具有把应用程序编译成可执行文件（.exe）的

功能，这样程序就可以在Windows操作系统环境下直接运行，脱离了VB继

承开发环境。

5、保存工程：一个工程至少包含了工程文件（.vbp）和窗体文件（.frm）等两种以上类型的

文件，这些文件集合在一起才能构成应该程序。工程附属文件(.vwp)

八、VB工程的结构

工程：使用VB设计开发的一个Windows应用程序称为VB的一个工程。

一个工程是一个应用程序所包含文件的集合。

模块是工程的基本功能单位，一个工程可以用多个模块，分担不同功能来完成。

工程中的文件和模块：工程文件（.vbp）

说明：一个工程只有一个工程文件，它管理和跟踪该工程的所有

部件。每个工程还会生成一个扩展名为.vbw的附属工程文

件，用来保存工程在集成环境中各窗口的状态。

窗体模块文件（.frm）：

说明：各窗体地位相互独立，功能不同，共同担当

类模块文件（.cls）

说明：VB允许开发人员创建新类，新类的定义保存在类模块中。

标准模块文件（.bas）

说明：标准模块用来保存公共变量、常量、数据类型和过程

其他模块可以调用标准模块中的代码。

工程结构：树状工程结构图

VB应用程序的组成及模块

组成：VB由窗体模块（Form）、标准模块（Module）、类模块（Class）三种模块组成。

结构关系：应用程序工程文件（.vbp）

窗体模块文件（.frm）：声明、事件、函数、Sub过程

类模块文件（.cls）：类的定义

标准模块文件（.bas）：声明部分、Sub Main过程、函数过程、Sub过程过程作用域

语言基础

一、数据类型

数值型：Integer（%、Int、2 Byte 16位）、Long（&、Lng、4 Byte 32位）、

Single（！、Sng、4 Byte 32位）Double（#、Dbl、8 Byte 64位）

Currency（@、8 Byte 64位）、Byte（Byt、1 Byte 8位）

字符串型：String（$、Str）变长、定长字符串。西方字符占1个字节，汉字全角占2个。

布尔型：Boolean（Bln）只有两个值：True 和 False，占两个字节

日期型：Date （8 Byte 64位），日期数据必须用“#”括起来。

可变类型（数值）、可变类型（字符）：Variant

对象型：Object

注意： 8位（bit） = 1个字节（Byte），1024 Byte = 1 KB，1024 GB = 1TB

位、字节、KB、MB、GB、TB

二、变常量

1、常量：数值型常量、布尔常量、符号常量、字符串常量、日期常量

字符串常量：用双引号括起来的一串字符。

日期常量：用“#”把时间日期括起来表示日期常量。

符号常量：

系统内部定义常量：有局部、窗体模块级、全局的作用域

自定义常量：

语法格式：[Public丨Private] Const <常量名> As <数据类型> = <表达式> Public const Pi as single = 3.14

注意：自定义常量时要避免循环定义的情况。如 Const A = B\2

2、变量：

命名规则：1）变量名只能由字母、数字、下划线组成

2）变量名开头第一个字符必须是字母或汉字（字符数最长255个）

3）不能用VB中的保留名或用保留名加类型说明符给变量命名

如不能用Integer、If、End 等关键字

4）变量名在同一个作用域内必须唯一

5）可在变量名前加数据类型前缀。如 strName$

变量声明：

隐式声明：VB使用一个变量时不加任何声明而直接使用

显式声明：

Option Explicit

Dim、Static、Public、Private 语句声明

语法格式：Dim <变量名> As <数据类型> 或 Dim <变量名><数据类型符>

注意：多个变量一行声明，需要用逗号隔开，同一类型变量可归类，逗号隔开

如 Dim x,y as Integer, z as string

变量赋值：定义一个变量后，要对其进行赋值才能使用。

赋值语句：变量名 = 表达式（“=”赋值符）

变量引用

变量作用域：局部变量、窗体/模块变量、全局变量

局部变量：

声明位置：过程内部

声明方式：Dim 或 Static

说明：不能被本模块的其他过程使用、不能被其他模块使用

窗体/模块变量：

声明位置：窗体/模块“通用声明”处

声明方式：Dim 或 Private

说明：能被本模块其他过程共同使用、不能被其他模块使用

全局变量：

声明位置：窗体/模块“通用声明”处

声明方式：Public

说明：能被本模块其他过程共同使用

窗体：能被其他模块使用，但需要在变量名前加窗体名

标准模块：能被其他模块使用

变量生命周期：指为变量分配内存空间到回收其内存空间的这段时间。

在Vb中，所有的全局变量和窗体/模块级变量的生命周期都和程序的声

明周期一样。而局部变量的生命周期根据其声明方式不同而不同，根据

过程结束后变量的内存空间是否被回收分为动态变量和静态变量。

动静态变量：

动态变量：指程序执行进入到变量所在过程时，才给变量分配内存空间，当退出

过程时，变量所占内存自动清空，变量值消失。当再次进入该过程时，

变量值已重新初始化为默认值。

在过程内部用Dim语句声明的局部变量都是动态变量。

静态变量：指程序进入该变量所在的过程，为变量分配固定的内存空间，当退出

该过程时，所占内存空间不被释放，变量值仍被保留。当再次进入该

过程时，不再分配内存空间及初始化，而是使用之前分配的内存空间。

只有整个应用程序运行结束后，才回收占用的内存空间。

在过程中使用Static语句声明的局部变量都是静态变量。

如果在过程前使用Static声明，那么过程中所有变量都是静态变量

三、运算符

1、算术运算符：乘方(^)，负号(-)，乘(*)，除(/)，整除(\)，取余(Mod)，加、减

算术运算符要求操作数是数值型

整除运算：若运算数是小数，则先经过四舍五入处理

若运算结果是小数，则截取整数部分

取余运算：若运算数是小数，则先经过四舍五入处理

绝对值小于0.5的数不能做整除和取余运算的除数，否则结果为0 进制换算：【例】 201（十进制）转二进制

所以，201（十进制） = 1001001 （二进制）

日期运算：分两种：（1）日期型与日期型相加减：得出结果是数值型，表天数差

（2）日期型与数值型相加减：

日期型日期部分与整数部分表示天数相加减得新日期

日期型时间部分与小数部分表示时间相加减得新时间

2、字符运算符：有“&”和“+”两个字符串连接符。其中“+”兼连接和算术加法运算功能

如 x = “123” + 5，结果为 x =128

3、关系运算符：< ， > ， = ，<> ，<= ， >=， Like， Is

关系运算的结果有两个（布尔值），True 和 False

Like（字符串匹配）：“abcde” Like “abc” = Ture

字符串比较，按照字符串的ASCII 码从左到右逐一比较。

如“ABCDE” > “ABRA” = False “男” > “女”= True 关系运算符常用于条件语句和循环语句的条件判断部分。

4、逻辑运算符：Not、And、Or、Xor、Eqv、Imp，优先级分别是1,2,3,3,4,5

5、赋值运算符： = ,优先级排最后

四、表达式：

定义：指用运算符连接常量、变量、函数、括号等运算量而形成的式子。

一个复杂的表达式可能同时用到算术、字符串、关系和逻辑等各种运算符。

表达式的整体运算结果是表达式的值。

类型：算术表达式、字符串表达式、逻辑表达式、关系表达式。

书写规则：（1）运算符不能相邻

（2）乘号不能省略，应该写成“*”

（3）括号必须成对出现，且均使用圆括号

（4）表达式从左到右在同一基准上书写，无高低、大小之分

不同数据类型的转换：运算结果往精度高的数据类型靠，即：整>长>单>双>货币

当Long与Single运算时，结果为Double

表达式中运算符的优先级：在一个表达式中，优先级高的运算符先进行运算，同等优先级的

运算符按照从左到右的顺序运算。总的原则，是括号和函数的优

先级最高，然后是算术、字符、关系、逻辑、赋值。

类别运算符含义优先级

算术运算符

^ 乘方 1 - 符号 2 * 乘

3 / 除

\ 整除 4 Mod 取余 5 + 加

6 - 减

字符运算符&和+ 连接7 关系运算符=、>、<、>=、<=、<> 所有关系运算符8

逻辑运算符Not 逻辑非9

And 逻辑与10

Or 逻辑或

11 Xor 逻辑异或

Eqv 逻辑相等12

Imp 逻辑蕴含13

赋值运算符= 赋值14 【例】5 + 10 Mod 10\9/3 + 2^2 = 10

五、函数类型：

1、数学函数：Sin、Cos、Tan、Atn、Int、Rnd、Sqr、Log、sgn、Fix、Abs、Exp

Rnd 函数：返回指定范围的随机数：Int(Rnd*范围 + 基数)

如：返回1—100的随机数：Int(Rnd*100 + 1)

Randomize函数：返回不重复的随机数系列。Randomize （X）

（X）是一个整型数，它是产生随机数的“种子数”，可省三角函数：Sin45°应该写成 Sin（45 * 3.14/180）

2、字符串函数：

去空格函数：LTrim(C)、RTrim(C)、Trim(C)

返回指定字符函数：Left(C,N)、Right(C,N)、Mid(C,N)[Mid(MyName,2,3)]=yNa

返回字符串长度函数：Len(C)

反序函数：StrReverse()

空格函数：Space()

提取大小写字母函数：Lcase()、Ucase()

注意：大小写转换函数：UCase()、LCase()

3、转换函数：Asc(C)、Chr(N)、Fix(N)、Int(N)、LCase(C)、UCase(C)、Round(N) Str(N)、Val(C)、Oct(N)、Hex(N)

说明：C为字符串表达式：“XXX”。N为数值表达式：123

LCase(C)：大写字母变小写。UCcase(C)：小写变大写。

Int(N)：高斯取整函数（不大于N本身的最大整数）

Fix(N)：纯粹取整函数

Round（N）：四舍五入

Val(N)：数字字符串转为数值，如Val(“AB123”) = 123

Str(N)：数值型转为数字字符串，如数值是负数，则应空格代替负号

4、日期时间函数：Year()、Month()、Day()、Hour()、Minute()、Second()

Now()、Time()、Date()、WeekDay()星期函数，星期日为1，星期二为2

5、格式化函数：Format()：格式：Format(表达式, 格式字符串)

6、Shell函数：用来调用凡是能在Windows下运行的应用程序，如Word、Powerpoint等

六、数组

概念：由一系列具有相同变量名、相同数据类型的下标变量构成的有序排列。

数组由数组名和下标变量构成（a（1）、a（2）…）。

下标变量：（1）下标变量在程序中的用法和简单变量的用法一样。

（2）下标可以是常数、数值变量、算术表达式、甚至下标变量。

下标如含有变量，使用前应给该变量赋值。如i=5，a（i+3）=a（8）（3）下标变量的下标值应该为整数，否则计算机自动对其去整。

数组元素：每个下标变量称为该数组的一个数组元素，数组的数据类型也就是该数组包含的下标变量的数据类型。

维数表示：一维数组、多维数组（最多不超过六十维）

说明：多维数组的表示方法：首先变化的是最后一维的下标，然后变

化倒数第二维的下标，第一维下标最后变化，按行存放。

例：二维数组A（4，3）的表示方法：

第一行：A(0,1) A(0,2) A(0,3) A(0,4)

第二行：A(1,1) A(1,2) A(1,3) A(1,4)

第三行：A(2,1) A(2,2) A(2,3) A(2,4)

第四行：A(3,1) A(3,2) A(3,3) A(3,4)

第五行：A(4,1) A(4,2) A(4,3) A(4,4)

个数计算：一维数组个数：（上界–下界）+ 1

多维数组个数：各维数组个数的乘积。

每一维数组的个数：（上界–下界）+ 1

数组类型：固定数组、动态数组、控件数组、自定义数据类型

1、固定数组：

概念：固定数组也叫静态数组，指数组元素的个数固定不变的数组

声明：声明一个固定数组时，必须指明数组名、维数、类型、数组元素个数、

数组使用的有效范围。

语法格式：[Private丨public丨Dim]数组名(<维数说明>)[As 数据类型]

说明：（1）Private丨Dim 用来声明局部数组或模块数组

Public用来声明公用数组

（2）数组名的命名规则和简单变量的命名规则相同

（3）如果省略[As 数据类型]，数组按Variant型处理

（4）<维数说明>指定数组的维数以及各维的范围。

To语句可以指定下标下界（为Long数据类型）

格式：[下界1]To[上界1],[下界2]To[上界2],…

Option Base n 语句也可以控制下标下界，如果没有使

用该语句，则默认数组下界为0。

【例】 Dim Num（1 To 5）As Integer

表示一个一维数组，下标从1—5，长度为5

Dim X（1 To 10,3,1 To 15）As Double

表示一个三维数组，包含10×4×15个元素

注意：（1）在声明数组时，下标必须是常量，不能是变量。而在应用数组元

素时，下标可以是常量、变量、表达式。

（2）数组下标越界错误：引用的下标不在数组声明时的下标范围内。

（3）数组维数错误：引用数组维数和声明数组时的维数不一致。

（4）增加数组维数时，数组所占存储空间会大幅度增加。

数组的使用：一个数组声明后，通过对其元素进行赋值、表达式运算、输入和输出等

操作实现对其的使用。

注意：（1）在同一过程中，数组名与其中的简单变量名不能相同。

（2）声明后的数组，数值型数组的各元素默认值为0，字符串型数组

的元素默认值为空字符串。

（3）使用数组元素时，数组名、数组的数据类型、维数必须与数组声

明时的一致。下标值应在数组声明时所指定的范围内。

（4）一维数组数轴、二维平面、三维立体空间

2、动态数组：

概念：在事先不知道数组的大小时，可以声明其为动态数组，在程序需要时再指定数组的大小。

声明：（1）数组作用域：全局（Public）、模块（Dim、Private）、局部（Dim、Static）（2）声明数组为动态数组，只需要为数组附以一个空维数表（括号不能省略）如：Dim A()

（3）在过程中，用ReDim语句为声明的动态数组重新分配实际元素个数

格式：ReDim 数组名<维数说明> [As 类型]

如：Redim A（8）表示为X（）指定含有9个元素。

说明：（1）ReDim语句只能出现在事件过程或通用过程中。

（2）<维数说明>格式为：[下界1]To[上界1],[下界2]To[上界2],…

（3）其中括号的内容可以省略，当省略了上下界的说明时，可用

UBound和LBound函数来获取数组的上界和下界。

（4）在一个过程中，可以多次使用ReDim语句定义同一个数组。

（5）当再次使用ReDim语句重新分配动态数组时，当前存储在数

组中的数据将被清除，利用这一点可以随时对数组进行初始

化。但如果ReDim语句中使用Preserve选择项时，可以保持

数组中原有的数据不变。但Preserve只能改变数组最后一维

的大小，且不能改变数组的维数。

（6）用Array函数对数组赋值：格式：数组名=Array（元素值）

如：对A(1 To 4)赋值，a=Array(1，3，5，7)

表示：A（1）=1，A（2）=3，A（3）=5，A（4）=7

各元素值直接用逗号隔开。

Array函数只适合一维变体型数组

动态数组的应用

3、字符串数组：

4、控件数组：

5、自定义数据类型：

设计结构

一、顺序结构

定义：程序按照代码书写顺序执行（执行顺序与书写顺序一致）

1、赋值语句Let

语法格式：

[Let] <变量名> = <表达式>

[Let] [<对象名>.]<属性名> = <表达式>

说明：

1、Rem “=”为赋值符，Let 可以省略。

2、赋值语句兼备运算和赋值两个功能。运算后赋值。

3、数据相容性问题。变量的数据类型与赋值的数据类型要相容。

典例：

【例1】（交换赋值语句）交换两个标签中显示的文本内容。

Private sub command1_Click()

T=label1.Caption

Label1.Caption = Label2.Caption

Label2.Caption = T

End Sub

2、数据输入

方法：

TextBox ：

1）文本框数值化赋值语句：n = Val(text1.text)

2）文本框清空语句：Text1.text = “”

3）文本框聚焦语句：Text1.SetFocus

InputBox:

语法格式：变量名 = InputBox( <提示内容>,[<对话框标题>],[<默认值>] )

说明：<提示内容> 换行显示方法：在换行处加入回车符Chr(13) 或换行符Chr(10) 辅助方法（聚焦语句）：

Focus：

焦点赋值方法：1）按Tab键或 Shift + Tab 组合键在窗体各对象间切换焦点 2）在编码中运用 SetFocus 方法

如：Private Sub Form_Activate()

Text1.SetFocus

End Sub

Tab：

聚焦顺序设置：改变对象（控件）的 TabIndex 属性和TabStop 属性

3、数据输出

方法：

Label

Print：

语法格式：[<对象名称>.]Print [<输出式>][,丨;]

说明：1）<对象名称>若省略，则在当前窗体输出

2）Print 具有运算和输出两种功能。先运算后输出。

3）<输出式> 分隔符：逗号“，”为分区输出.（14列一区）

分号“;”为紧凑输出.

4）<输出式> 换行：若语句末尾没有分隔符泽换行输出.

若语句末尾有分隔符（逗号或分号）则同行输出.

与Print 有关的函数：

1）Tab函数

2）Spc函数（空格函数）

MsgBox：

语法格式：<变量名> = Msg（<提示信息>,<对话框类型>,<对话框标题>）

说明：<提示信息> 中使用回车符Chr（13）或换行符Chr（10）使文本换行 <对话框类型> 包含四个参数：命令按钮、图标、默认按钮、等待模式

4、中断语句：

卸载对象语句（Unload）：从内存中卸载窗体或控件。

语法格式：Unload 对象名 Rem 当前窗体对象名：Me

如：Private Sub command1_Click()

Unload Me

End Sub

结束语句（End）：语法格式： End

二、选择结构

1、单行条件语句：

语法格式：If <条件> Then <语句块1> Else <语句块2>

说明：<条件> 通常是关系表达式或逻辑表达式

一行内写完条件语句

语句块可以是单条语句，若是多条语句则用冒号隔开

是可选项，可省略

2、多行条件语句：

语法格式：If <条件> Then

<语句块1>

Else

<语句块2>

End If

说明：开头是If，结尾是End If

语句块可以是单条语句也可以是多条，多条时可多行书写也可用冒号连接书写 Else 是可选项。若有该项，Else 必须单独占一行。

3、条件语句嵌套：

一般格式的嵌套语句

语法根式：

典例：【例1】 Private Sub Form_Load()

Dim mark as Integer, grade as string

Mark = InputBox（”请输入百分制成绩”）

Show

If mark > 90 Then

grade = “优秀“

Else

If mark >= 80 Then

grade = “良好“

Else

If mark >= 70 Then

grade = “中等”

Else

If mark >= 60 Then

grade = “及格”

Else

grade = “不及格“

End If

End If

End If

End Sub

Else If格式的嵌套语句：

语法根式：If <条件1> Then

<语句块1>

ElseIf <条件2> Then

<语句块2>

ElseIf <条件3> Then

<语句块3>

……

Else <语句块n>

End If

说明：该语句执行时先判断<条件1>，如果为True，执行<语句块1>，如果为False 则判断<条件2>，以此类推，直到找到为True 的条件。

一旦找到一个为True的条件，就执行相应的语句块，然后执行End If 后面的

语句。如果所以条件都是False，则执行Else 后面的<条件n>再执行End If

后面的语句。

4、IIf 函数：用来实现一些比较简单的条件判断操作

语法格式：IIf (<条件表达式>,<条件为真时的指>,<条件为假时的值>)

说明：<条件表达式>可为关系表达式、布尔表达式、数值表达式。

如果是数值表达式，则非0为真，0为假。

IIf语句相当于 If <条件表达式> Then y = <条件表达式为真时的值>

Else y = <条件表达式为假时的值>

5、Select Case 语句：实现多分支选择，且结构简单，易读。

语法格式：Select Case <测试表达式>

Case <表达式列表1>

<语句块1>

Case<表达式列表2>

<语句块2>

……

Case<表达式列表n>

<语句块n>

[Case Else

<语句序列 n+1 > ]

End Select

说明：语句根据测试表达式的值从多个Case 中选出与测试值相等的表达式列表值，若找到，则执行相应列表后的语句块，再执行End Select后的语句。

若没找到，则执行Case Else 后面的语句，再执行End Select 后的语句。 <表达式列表>的表达形式：

1)具体取值。如 Case 1,3,5,7

2)To 域。如 Case 3 to 9

3)Is 域。如 Case Is > 10

4)混合式。如 Case 1,2,3,4 To 7,Is > 10

5)若多个Case中有同一取值重复出现，泽执行第一个出现此值的语句块

三、循环结构

1、Do … Loop 语句

先判断条件形式：

语法格式：Do [While丨Until <条件>]

[循环体]

[Exit Do]

Loop

说明：当型循环：Do While … Loop

直到型循环：Do Until … Loop

<条件> 是一个关系表达式或逻辑表达式，其值为True 和 False

[Exit Do] 提前跳出Do Loop 循环

后判断条件形式：

语法格式：Do

[循环体]

Loop [While丨Until <条件>]

说明：后判断条件形式语句是先执行循环体再判断其是否继续循环

2、For … Next 语句

语法格式：For <循环变量> = <初值> To <终值> [Step <步长>] <循环体>

[Exit For]

Next <循环变量>

说明：<循环变量>是一个数值型变量，用来规定循环语句的循环次数 <初值><终值><步长>的值可以是整数和实数。

若初值小于终值，则步长为正数。反之，为负数。

循环次数 = Int(（终值–初值）/步长 + 1)

3、多重循环：一个循环体内又包含另一个循环体。

【举例】：For i = 1 to 9

For j = 3 to 6

Print i,j

Next j

Next i

四、多重窗体：

定义：在复杂的应用程序中，一个工程可包含多个窗体，即多重窗体（MultiForm）窗体之间没有绝对的从属关系，根据完成的任务相互联系在一起。

添加窗体：菜单栏—工程—添加窗体

工具栏—添加窗体

工具资源管理器—右击工程—添加窗体

启动窗体：菜单栏—工程—工程属性—通用—启动对象—窗体名—确定

设计方法：Load：Load [窗体名]

Unload：Unload [窗体名] 经常用到Me关键字。Unload me ：卸载当前窗体 Show：[窗体名.]show [窗体模式值]

说明：窗体模式值有0和1两种。0：执行show 的窗体是“无模式的”

用户可以激活其他窗体，对其他窗体进行操作。

1：执行show的窗体是“模式的”，用户不能对其他窗体进行操作

必须直到该窗体被关闭为止。

Hide：[窗体名.]Hide

过程

一、Sub 过程

语法格式：[Private丨Public][Static] Sub <过程名> ([参数表])

过程体

[Exit sub]

End sub

说明：Private 和 Public 用于限定过程作用范围

Static 表示该过程中所有局部变量都是静态变量

参数表内的参数叫做形式参数。语法格式：(形参名1 as 类型，形参名2 as 类型)

如果没有指定形参类型，则默认为 Variant 型。

[Exit sub]用于提前退出过程。

不能在过程中再定义新过程。

调用语句：

Call 语句：

语法格式：call <过程名> （<实参表>）

说明：若声明Sub 时没形参，则括号内无需形参，此时括号可省略。

实参个数与形参个数必须相等。

直接使用过程名：

语法格式：<过程名> [<实参标>]

二、函数过程：

语法格式：[Private丨Public][Static] Function <函数名> ([参数表])[as 数据类型] [函数体]

[<函数名> = <表达式>]

[Exit Function]

End Sub

说明：（1）函数过程与Sub过程不同之处在于，函数过程具有返回值，因此，在声明函数过程时要指明返回值的数据类型，默认为Variant型。

（2）[<函数名> = <表达式>]中，<表达式>的值是函数返回的结果，通过赋值语句将值赋给<函数名>，该值就是函数过程的返回值。如果在函数过程中省略

[<函数名> = <表达式>]，则该过程返回一个默认值，其默认值和函数声明的数

据类型相关，若为数值型，函数过程返回0；若为字符串型，则返回空字符串。

调用语句：

Call 语句：Call 函数名（参数1,参数2,…）这种方法放弃了函数的返回值直接使用函数名：（1）如果想要获得函数的返回值，则：

被赋值对象 = 函数名（实参1，实参2，…）

（2）如果放弃函数的返回值，则：

函数名（实参1，实参2，…）

3、参数传递

1、概念：参数传递是指调用过程的主程序，将值（或地址）传给被调用的过程。

其传递方式有两种：按值传递、按地址传递

2、形参与实参：

形参：被调用过程名后括号中出现的变量名

3、按值传递参数：使用方式：在形参名前加上ByVal

说明：按值传递参数是指在过程被调用时，传递给形参的内容是对应实参

的值。形参和实参各占用不同位置的存储空间，被调用过程在执行

过程中对形参变量值的改变不会影响调用过程对应的实参的值。通

常为了保护实参不受被调用过程影响，选用ByVal。

4、按地址传递参数：使用方式：在形参名前加上ByRef或什么都不加

说明：按值传递参数是指在过程被调用时，传递给形参的内容是对应实参

的内存地址，即形参与实参使用相同地址的内存单元。因此在被调

用过程中对形参值的修改就等于修改了实参的值，而且实参和形参

的数据类型应该相互匹配。只有当实参是变量或数组时才能使用按

地址传递，如果是常量或表达式时，实际上是按值传递。

控件

一、标准控件（内部控件）

1、窗体：属性：Name：窗体的名称

说明：Name属性的值是对象的名称，简称对象名。每个对象都有唯一一

个和其他对象相互区别的对象名。

对象名必须以字母开头，长度不能超过40个字符，可以包含字

母、数字、下划线，不能使用标点符号和空格。对象名不能与系

统的公共对象名重名，可以对VB系统的关键字相同，可以使用

汉字，但是不提倡。

如：S_1,S_2,S_3 S：名称缩写符，_：连接符，1：序号符

BackColor、foreColor：背景、前景色，可从调色板中选择颜色

Caption：窗体标题栏名称，默认值与Name值相同，此值可以是人员字符串

Font：FontBold、FontItalic、Fontsize、Font Strikethru、Fontunderline Appearance（0—平面、1—立体）、Borderstyle（12345，边框风格）只读

Height、Width：用来改变窗体的大小（高度、宽度），每个窗体都有一个最小

高度和最小宽度，所以两个属性值不能太小

Left、Top：窗体坐标值，屏幕显示区的左上角为坐标原点，水平X方向向右为

正方向，垂直Y方向向下为正方向。默认单位：缇

Moveable：其值为False或True，为True时程序运行后，用户可以拖动窗体

标题栏实现移动窗体。

Visible：其值为False或True，为True时程序运行后，窗体才可以见。

用来隐藏或显示窗体。

Picture：为窗体指定一副背景图片。要删除Picture属性值时按Delete键盘 Icon：为窗体指定菜单控制图标。要删除Icon属性值时只需按Delete键盘

Maxbutton、Minbutton：其值决定窗体标题栏的“最大化”和“最小化”控制

按钮是否可用，前提还要取决ControlBox 的属性值。

ControlBox：其值为False或True，为False时程序运行后，窗体标题栏只显

示标题名称，不显示控制菜单图标和三个控制按钮。

WindowState：该属性值决定窗体的当前状态是还原、最大化还是最小化。

0—正常、1—最小化，2—最大化

常用事件：load（加载）：启动程序，将窗体加载入内存时发生的事件

Unload（卸载）：退出程序（退出窗体或执行Unload 方法），从内存中清

楚窗体时发生的事件。

Activate（激活）：当窗体被激活时发生的事件

Deactivate（非活动）：当其他窗体被激活时发生的事件，此时窗体不活动 Click（左单击）：在窗体的窗口区单击鼠标左键时发生的事件

Dblclick（左双击）：在窗体的窗口区双击鼠标左键时发生的事件

Paint（绘制）：当窗体被显示、移动、缩放或需要重新绘制时发生的时间2、标签：属性：Name

Caption：该值为标签上显示的内容

Appearance、Borderstyle、BackColor、ForeColor

Autosize：为True时，标签控件的大小随显示内容（Caption值）而变化。

Enabled：决定标签是否有效，为False时标签文字会以灰色显示。

Font、Fontsize、FontBold、FontItalic、Fontunderline

Height、Width

Left、Top：以窗体为坐标面。区别与窗体的这两个属性

Visible：可否见、隐藏显示

WordWrap：前提取决Autosize 的值，当Autosize的值为True时，其值决定

显示内容是垂直扩展还是水平扩展，若为True，则垂直扩展。

如果Autosize的值为False，则WordWrap的值无意义。

常用事件：change（改变）：当标签显示的内容（caption属性值）发生改变时的事件3、文本框：属性：Text：其值为文本框中的文本内容。

Maxlength：该属性决定文本框中文本的最大长度。其值为0时，表示长度还

只受系统内存限制，若该值为大于0的数，则可显示具体长度。 MultLine：该属性决定文本框是否可以多行显示文本框内容。

若为True，则可以多行显示。程序运行后向文本框输入内容时

按Enter键换行，如果窗体中有默认按钮，则需要按Ctrl+Enter

组合键换行。若为False时单行显示文本框内容，具体长度受

Maxlength限制，当文本框不能同时显示所有内容时，使用左右

光标移动键滚动显示。MultLine 属性为只读属性。

Alignment：决定文本框内容的对齐方式。0—左，1—右，2—中

Scrollbars：前提取决MultiLine属性值，当MultiLine为True时，ScrollBars

属性值决定文本框的滚动条模式。0—无，1—水平，2—垂直，

3—水平加垂直。MultiLine为False时，Scrollbars的值无意

义。

Bordersyle

PasswordChar：该属性决定是否在文本框中显示用户输入的字符。

先为该属性设置某一个字符（如*），那么无论Text属性值是

什么，在文本框中都以*显示，用户无法知道文本的具体内容。

该功能主要用于将文本框作为密码输入控件。

Locked：决定文本框内容是否被锁定，使用户不能直接编辑。

常用事件：change（改变）：当文本框的内容（text属性值）发生改变时的事件

4、命令按钮：属性：Cancel：若为True，则按钮被定义为“取消”命令按钮，程序运行中，按

下Esc相当于单击这个键。一个窗体只能有一个按钮的Cancel

为True。

Default：若为True，则此按钮被定义为窗体的“默认”按钮，即用户在

窗口中按Enter键相当于单击此按钮。一个窗体只有有一个按

钮的Default的值为True。

Caption ：命令按钮名称。特别的是，在其属性中输入“&”字符，如

“确定(&H)”，运行程序后显示成”欢迎（H）“，这时按

Alt+H 组合键相当于单击此按钮。

Enabled：决定按钮是否可用。

常用事件：click（左单击）：单击命令按钮，激发其Click事件。

单窗体中有“默认”按钮或“取消”按钮时，分别

按下Enter 或 Esc 键也可以激发Click事件。

命令按钮不能响应DblClick事件。

5、框架：在VB程序中，作为容器类控件有窗体（Form）、框架（Frame）和图片（Picture）

属性：Caption、Borderstyle（0—无边线，1—有凹陷边线，系统默认为1）

6、单选按钮：OptionButton，通常将几个单选按钮放在一个框架里形成一个选项组。

属性：Caption

Alignment：文字对齐方式（0（默认值）：左对齐，圆形按钮在左，文字在

右，1：右对齐）

Value：True时，单选按钮被选中，False（默认值）。在一组选项按钮控

件中，选中一个按钮，则该按钮的Value值变为True，其他

按钮的Value值自动变成False。

Enabled：是否可用。True为系统默认值。

Style：standard（标准，默认值）、Graphical（图形风格）

Picture：给图形单选按钮插入一副图形，前提是Style的值为1。

事件：Click：Option1_Click()

7、复选框：允许用户同时做出多个选择，一组复选框中可以多个选择。

属性：Caption

Alignment

Value：大于两个的值（0，1，2）。O—未选中、1—选中、2—选中但不可改 Style

Picture

事件：Click、Getfocus、lostFocus、MouseMove、MouseDown、MouseUP

KeyDown、KeyUp、KeyPress

方法：SetFocus、Refresh、Move

8、列表框：提供一些可供选择的列表项目，用户可以从中选择一项或多项。

属性：ListCount：返回列表框所有选项的个数

ListIndex：返回当前选项的索引号

List ：如List1.List(3)=“北京”表示列表框中第四项是“北京”

Selected：记录列表框中选项是否被选中

Text：返回当前选中的项目文本

Mulitiselect ：设置其属性可现实同时选择多个项目

None、Simple、Extended、Shift + 方向键、Ctrl + 鼠标

Style

Sorted：列表框选项是否按字母顺序排列。取值为 True 和 False

Columns ：设置列表框中出现水平、垂直滚动条以及显示的列数。取值数值型事件：Click事件

方法：

AddItem 方法：语法格式：.AddItem ,

如 List1.AddItem “北京”， 1

在列表框第二项位置插入“北京”

RemoveItem 方法：语法格式： . RemoveItem

Clear方法：语法格式： .Clear

9、组合框：

属性：Style：其值有0、1、2

0—下拉式组合框，包括一个下拉列表和一个文本框

1—简单组合框，包括一个标准列表框和一个文本框

2—下拉列表组合框，和下拉式组合框外观一样，但不能进行文本输入 Text：用户选择项目的文本或直接从文本编辑区输入的文本

List

事件：Style=0时，响应Click、Change、DropDown

Style=1时，Click、DblClick、Change

Style=2时，Click、DropDown

说明：当用户单击组合框下拉箭头时，触发DropDown事件。

对于0、1两种，当用户在编辑区输入文本时触发Change事件。

方法：AddItem 方法：语法格式：.AddItem ,

如 List1.AddItem “北京”， 1

在列表框第二项位置插入“北京”

RemoveItem 方法：语法格式： . RemoveItem

Clear方法：语法格式： .Clear

10、图片控件：

属性：Picture

Appearance

Autosize：图片框是否按图片大小自动调整大小。

Align：设置图片显示位置。有值01234,为0时图片可放在任意位置。

1—顶，2—底，3—左，4—右。

Borderstyle

AutoRedraw

Image：该属性记录了图片框中的所有图形信息（图形图像、文字信息）

CurrentX：在代码中设置、返回Print方法或绘图方法的水平起始位置

CurrentY：在代码中设置、返回Print方法或绘图方法的垂直起始位置事件：paint、Resize、Change、KeyPress、KeyDown

方法：Print、Cls、Move、Setfocus、Refresh、Pset、Point、Circle、line

函数：LoadPicture()函数：用于程序代码中对窗体、图片框、图像框的Picture属性赋值，以便在程序的运行阶段加载图形文件。

语法格式：对象名.picture = loadpicture(<“文件名”>)

<文件名>：图片的目录地址

若要清楚控件中的图像，则：

对象名.picture = loadpicture(“”)

11、图像控件：属性：Picture

Stretch：有两值True和False。决定图片是否调整大小适应图像框大小 Height、width

事件：DblClick、Click、MouseDown、MouseUp、MouseMove

方法：Move、Refresh

函数：LoadPicture ()函数

说明：PictureBox 图片框和 Image 图像框的区别：

PictureBox除了可以显示图形外，还可以作为其他的控件的容器。

而且可以通过Print方法接收文本。图片框不能延伸图形来适应控件的大小

但可自动调整控件大小来显示完整的图形。图像框只能用于显示图形，可以

延伸图片大小来适应控件大小。

12、计时器控件：属性：Enabled：决定计时器是否开始计时。

Interval：设置两个计时器事件之间的时间间隔。单位：毫秒

最大时间间隔为65秒，其值为0时，计时器无效。

设置为1000时，表示一秒钟触发一个计时器事件。

若想在x秒钟中内发生n次事件，则设置为x/n。

事件：Timer：每经过一个Interval时间间隔触发一次Timer事件

13、滚动条控件：属性：Enabled、Height、Width、Left、Top、Caption、Visible

Max：设置滚动条所表示的最大值默认值为32767

Min：这只滚动条所表示的最小值。默认值为0

Value：返回或设置滑动块当前位置的值

LargeChange：当单击滑动块和箭头之间的区域时，Value属性值的

增量或减量，默认值为1，取值1—32767。

SmallChange：当单击箭头时Value值的变化量，默认值为1。

事件：Change：单击箭头或滚动条区域或拖地滑动块结束时触发的事件

Scroll：当拖动滑动块时触发的事件。

二、ActiveX 控件

1、滑动器控件

2、进度条控件

3、选项卡控件

三、对插入对象

文件操作

1、文件概述

2、文件操作

顺序文件：按ASCII码字符的形式一个接一个地存放数据的。

对顺序文件的数据进行读写操作时，只能从第一个数据开始顺序地往后读写

不能跳跃式访问数据。

其操作步骤有：建立或打开、读、写、关闭

建立或打开顺序文件：

Open语句：Open <文件名> For <访问方式> As <文件编号>

<文件名> 的数据类型是字符串型，用于指定文件的完整路径和文件名

访问方式：Input(读)、Output(写)、Append(追写或补写) Input：可按顺序读取文件中数据。若该文件不存在，程序会提示错误。 Output：可把数据按顺序写入文件。若该文件已存在，则文件中内容会

被清空后再写入。若文件不存在，则新建文件并打开。

Append：可把数据追写到文件末尾，文件原本内容不会被清空。

若文件不存在，则新建后打开。

文件编号：可是常量或变量，取值1—511之间的整数。

写顺序文件：

前提：使用Output或Append 访问方式时……

Print #语句：Print # <文件编号> ,[输出列表]

用法与Print 语句基本一致。

[输出列表] 是数据表达式、逗号、分号、Tab(n)、Spc(n)函数等。