2024年6月14日发(作者：)

☆ 常数

在整个应用程序执行过程中，值保持不变的量就是常数。常数分为一般常数和符

号常数。

1．一般常数

一般常数包括数值常数、字符常数、逻辑型常数和日期常数。

（1）数值常数（由正负号、数字和小数点组成）：123，-265，-75.32，-93.2E9

（单精度），2.35D-2（双精度）

（2）字符常数（用" "括起来）："abC"，"李明"

（3）逻辑常数（只有两个）：True（真），False（假）

（4）日期常数（用2个“#”括起来的日期）：#3/15/2000#，#January 1, 1993#

各种数值常数表示和实例如下：

十进制数：例如，123，-456，0。

八进制数：用前缀&O表示八进制数。例如，&O123，-&O11。

十六进制数：用前缀&H表示十六进制数。例如，&H123。

◎ 语法

[Public | Private] Const常数名 [As 数据类型] = 表达式

等号（=）右边的表达式可以是结果为数或字符串的表达式，甚至可用先前定

义过的常数来定义新常数。

Public说明的常数可在整个应用程序中使用，Private说明的常数只在该过程范

围内使用。

符号常数名必须以字母开头，不能包含句号或者类型声明字符，不能超过255

个字符，也不能和受到限制的关键字同名，常数名中的字母不区分大小写。例如：

Const CONPI = 3.979

Const CONPI2 = CONPI * 2

另外，VB还有很多系统定义的内置常量，以Vb为前缀，如vbok。

☆ 变量

像大多数编程语言那样，VB也用变量存储数值。变量一般是用来存储临时数据

的。变量的内容因程序的运行而变化。变量具有名字和数据类型。

1．变量名

（1）变量名必须以字母开头，不能以数字或其他字符开头。

（2）变量名必须由字母、数字或下划线（_）组成。

（3）变量名不能包含句点（.）、空格或者类型声明字符。

（4）变量名最长不能超过 255 个字符。变量名不能和受到限制的关键字同名。

2．变量的数据类型

VB中变量的数据类型多达11种。它们是Integer（整型），Long（长整型），Single

（单精度浮点型），Double（双精度浮点型），Currency（货币型），Byte（字节型），

String（字符串型），Boolean（布尔型），Date（日期时间型），Object（对象型）

和Variant（变体型）。变量的数据类型决定变量能够存储哪种数据。

（1）数值型

数值数据类型包含两类共5种数据类型。

存放整数数据：Integer和Long；

存放包含小数数据：Single, Double和 Currency。

（2）Byte数据类型

Byte表示八位的无符号整数，用于存储二进制数据。

（3）String数据类型

String用于存放字符串，字符串有变长与定长两种，分别声明为固定长度和可变

长度。可变长度的字符串随着对字符串赋予新数据，它的长度可增可减。例如，

变量名Str是可变长度的字符串：

Dim Str As String

Str = "Database"

例如，变量名EmpName是固定长度的字符串：

Dim EmpName As String * 50

如果固定长度的字符串字符少于50个，则用空格将不足部分填满。如果字符串

的长度太长，则截去超出部分的字符。

（4）Boolean 数据类型

Boolean存储的只能是True或False，缺省值为False。

若变量的值只是“True或False”，“Yes或No”，“On或Off”，则可将它声明为Boolean

型。

（5）Date数据类型

Date用于存储日期，日期文字必须以一对“#”括起来。例如，以下都表示2000

年6月12日数据：

Dim MyDate As Date

MyDate = #6/12/2000#

MyDate = #2000-12-6 12:30:00 pm#

MyDate = #2000,12,6#

日期数据类型可以同时表示日期和时间。如果不含时间值，则自动将时间设置

为午夜（一天的开始）；如果不含日期，则自动将日期设置为公元1899年12月

30日。

（6）Object 数据类型

Object用于表示任何类型的对象，存储32位地址，可引用应用程序中或其他应

用程序中的对象。必须使用Set语句先对对象引用赋值，然后才能引用对象。例

如，下列变量名objDb是Object 变量，对“c:”数据库对象引用

赋值：

Dim objDb As Object

Set objDb = OpenDatabase ("c:")

（7）Variant数据类型

Variant能够存储系统定义的所有类型的数据，是一种可变的数据类型。在没有

说明数据类型时，变量为Variant型。当指定变量为Variant变量时，不必在数据

类型之间进行转换，VB自动完成必要的转换。

Variant还包含三种特定值：Empty，Null和Error。例如，Variant型数据的运算

如下：

Dim SomeValue

SomeValue = "17" ' SomeValue是"17"

SomeValue = SomeValue ?15 ' SomeValue是 2

SomeValue = 2 ' SomeValue是2

SomeValue = SomeValue + 3.5 ' SomeValue是 5.5