Calendar 常数
可在代码中的任何地方用下列常数代替实际值：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbCalGreg |
0 |
指出使用的是阳历。 |
|
vbCalHijri |
1 |
指出使用的是*历法。 |
Color 常数
可在代码中的任何地方用下列常数代替实际值：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbBlack |
0x0 |
黑色 |
|
vbRed |
0xFF |
红色 |
|
vbGreen |
0xFF00 |
绿色 |
|
vbYellow |
0xFFFF |
黄色 |
|
vbBlue |
0xFF0000 |
蓝色 |
|
vbMagenta |
0xFF00FF |
紫红色 |
|
vbCyan |
0xFFFF00 |
青色 |
|
vbWhite |
0xFFFFFF |
白色 |
CallType 常数
可在代码中的任何地方用下列常数代替实际值：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbMethod |
1 |
指出已经调用了一个方法。 |
|
vbGet |
2 |
指出一个Property Get 过程。 |
|
vbLet |
4 |
指出一个 Property Let 过程。 |
|
vbSet |
8 |
指出一个 Property Set 过程。 |
下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地方代替实际值：
Comparison常数
|
常数 |
值 |
描述 |
|---|---|---|
|
VbUseCompareOption |
-1 |
使用Option Compare语句的设置进行比较。 |
|
VbBinaryCompare |
0 |
进行二进制的比较。 |
|
VbTextCompare |
1 |
进行文字的比较。 |
|
vbDatabaseCompare |
2 |
用于 Microsoft Access(仅限于Windows)，进行以数据库所含信息为基础的比较。 |
Compiler 常数
Visual Basic for Applications 定义了一些不能与 #If...Then...#Else 指令一起使用的常数。这些常数除了其范围是全局的；也就是说，除了可在工程中到处应用，在功能上与 #If...Then...#Else 指令定义的常数相同。
在 16 位开发平台上，编译常数定义如下：
|
常数 |
值 |
描述 |
|---|---|---|
|
Win16 |
True |
指出开发环境是 16 位。 |
|
Win32 |
False |
指出开发环境不是 32 位。 |
在 32 位开发平台上，编译常数定义如下：
|
常数 |
值 |
描述 |
|---|---|---|
|
Vba6 |
True |
指出开发环境是 Visual Basic for Applications, version 6.0。 |
|
Vba6 |
False |
指出开发环境不是Visual Basic for Applications, version 6.0。 |
|
Win16 |
False |
指出开发环境不是 16 位。 |
|
Win32 |
True |
指出开发环境是 32 位。 |
|
Mac |
False |
指出开发环境不是 Macintosh。 |
|
Win16 |
False |
指出开发环境不是 16位的。 |
|
Win32 |
False |
指出开发环境不是 32位的。 |
|
Mac |
True |
指出开发环境是 Macintosh。 |
注意 这些常数是由 Visual Basic 提供的，所以不能在任何层次中用相同名称定义自己的常数。
Date 常数
可在代码中的任何地方用下列常数代替实际值：
参数值
firstdayofweek 参数具有以下这些值：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbUseSystem |
0 |
使用 NLS API 设置。 |
|
vbSunday |
1 |
星期日（缺省） |
|
vbMonday |
2 |
星期一 |
|
vbTuesday |
3 |
星期二 |
|
vbWednesday |
4 |
星期三 |
|
vbThursday |
5 |
星期四 |
|
vbFriday |
6 |
星期五 |
|
vbSaturday |
7 |
星期六 |
firstdayofyear 参数具有以下这些值：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbUseSystem |
0 |
使用 NLS API 设置。 |
|
VbUseSystemDayOfWeek |
0 |
使用系统设置中为星期的第一天指定的星期数。 |
|
VbFirstJan1 |
1 |
由 1 月 1 日所在的那个星期开始（缺省）。 |
|
vbFirstFourDays |
2 |
由新的一年中第一个至少有 4 天的星期开始。 |
|
vbFirstFullWeek |
3 |
由一年中第一个完整的星期开始。 |
返回值
|
常数 |
值 |
描述 |
|---|---|---|
|
vbSunday |
1 |
星期日 |
|
vbMonday |
2 |
星期一 |
|
vbTuesday |
3 |
星期二 |
|
vbWednesday |
4 |
星期三 |
|
vbThursday |
5 |
星期四 |
|
vbFriday |
6 |
星期五 |
|
vbSaturday |
7 |
星期六 |
日期格式常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数 。
|
常数 |
值 |
描述 |
|---|---|---|
|
vbGeneralDate |
0 |
显示日期和/或时间。对于一个实数，显示日期和时间。如果没有小数部分，则仅显示日期。如果没有整数部分，则仅显示时间。日期和时间的显示由系统设置值确定。 |
|
vbLongDate |
1 |
用计算机区域设置值指定的长日期格式显示日期。 |
|
vbShortDate |
2 |
用计算机区域设置值指定的短日期格式显示日期。 |
|
vbLongTime |
3 |
用计算机区域设置值指定的长时间格式显示时间。 |
|
vbShortTime |
4 |
用计算机区域设置值指定的短时间格式显示时间。 |
Dir、GetAttr 和 SetAttr 常数
可在代码中的任何地方用下列常数代替实际值：
|
常数 |
值 |
描述 |
|
|---|---|---|---|
|
vbNormal |
0 |
正常的（Dir 和 SetAttr 的缺省值） |
|
|
vbReadOnly |
1 |
只读的 |
|
|
vbHidden |
2 |
隐藏的 |
|
|
vbSystem |
4 |
系统文件 |
|
|
vbVolume |
8 |
卷标 |
|
|
vbDirectory |
16 |
目录或文件夹 |
|
|
vbArchive |
32 |
文件自上一次备份后已经改变 |
|
|
vbAlias |
64 |
在 Macintosh上，标识符是一个别名。 |
|
在Macintosh上，只有VbNormal、 vbReadOnly、 vbHidden 和vbAlias是可用的。
驱动器类型常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。
|
常数 |
值 |
描述 |
|---|---|---|
|
Unknown |
0 |
不能确定驱动器类型。 |
|
Removable |
1 |
驱动器具有可删除介质。包括所有软盘驱动器和许多其它种类的存储设备。 |
|
Fixed |
2 |
驱动器具有固定介质（不可删除的）。包括可删除硬盘在内的所有硬盘驱动器。 |
|
Remote |
3 |
网络驱动器。包括在网络上任何地方都可以共享的驱动器。 |
|
CDROM |
4 |
驱动器是一个CD-ROM。包括只读的CD-ROM和可读写的CD-ROM。 |
|
RAMDisk |
5 |
驱动器是本地计算机上的一块随机存取内存（RAM），它工作起来就象是磁盘驱动器一样。
|
文件属性常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。
|
常数 |
值 |
描述 |
|---|---|---|
|
Normal |
0 |
普通文件。没有设置属性。 |
|
ReadOnly |
1 |
只读文件。属性是可读/写。 |
|
Hidden |
2 |
隐藏文件。属性是可读/写。 |
|
System |
4 |
系统文件。属性是可读/写。 |
|
Volume |
8 |
磁盘驱动器卷标。属性是只读。 |
|
Directory |
16 |
文件夹或目录。属性是只读。 |
|
Archive |
32 |
自上次备份后已经改变的文件。属性是可读/写。 |
|
Alias |
64 |
链接或快捷方式。属性是只读。 |
|
Compressed |
128 |
压缩文件。属性是只读。 |
文件输入/输出常数
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。
|
常数 |
值 |
描述 |
|---|---|---|
|
ForReading |
1 |
打开文件用于只读操作。不能对文件进行写操作。 |
|
ForWriting |
2 |
打开文件用于写操作。如果存在具有相同文件名的文件，文件原有的内容被覆盖。 |
|
ForAppending |
8 |
打开文件并向文件的结尾写入。 |
IMEStatus 常数
可在代码中的任何地方用下列常数代替实际值。
日文区域的常数如下所示：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbIMEModeNoControl |
0 |
没有安装 IME（缺省） |
|
vbIMEModeOn |
1 |
打开 IME |
|
vbIMEModeOff |
2 |
关闭 IME |
|
vbIMEModeDisable |
3 |
无效的 IME |
|
vbIMEModeHiragana |
4 |
完整宽度 Hiragana 模式 |
|
vbIMEModeKatakana |
5 |
完整宽度 Katakana 模式 |
|
vbIMEModeKatakanaHalf |
6 |
半宽度 Katakana 模式 |
|
vbIMEModeAlphaFull |
7 |
完整宽度 Alphanumeric 模式 |
|
vbIMEModeAlpha |
8 |
半宽度 Alphanumeric 模式 |
韩国地区的常数如下所示：
|
常数 |
值 |
描述 |
|
vbIMEModeAlphaFull |
7 |
完整宽度 Alphanumeric 模式 |
|
vbIMEModeAlpha |
8 |
半宽度 Alphanumeric 模式 |
|
vbIMEModeHangulFull |
9 |
完整宽度 Hangul 模式 |
|
vbIMEModeHangul |
10 |
半宽度 Hangul 模式 |
中文地区的常数值如下：
|
常数 |
值 |
描述 |
|
vbIMEModeNoControl |
0 |
没有安装 IME （缺省） |
|
vbIMEModeOn |
1 |
IME 打开 |
|
vbIMEModeOff |
2 |
IME off |
Keycode 常数
可在代码中的任何地方用下列常数代替实际值：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbKeyLButton |
0x1 |
鼠标左键 |
|
vbKeyRButton |
0x2 |
鼠标右键 |
|
vbKeyCancel |
0x3 |
CANCEL 键 |
|
vbKeyMButton |
0x4 |
鼠标中键 |
|
vbKeyBack |
0x8 |
BACKSPACE 键 |
|
vbKeyTab |
0x9 |
TAB 键 |
|
vbKeyClear |
0xC |
CLEAR 键 |
|
vbKeyReturn |
0xD |
ENTER 键 |
|
vbKeyShift |
0x10 |
SHIFT 键 |
|
vbKeyControl |
0x11 |
CTRL 键 |
|
vbKeyMenu |
0x12 |
MENU 键 |
|
vbKeyPause |
0x13 |
PAUSE 键 |
|
vbKeyCapital |
0x14 |
CAPS LOCK 键 |
|
vbKeyEscape |
0x1B |
ESC 键 |
|
vbKeySpace |
0x20 |
SPACEBAR 键 |
|
vbKeyPageUp |
0x21 |
PAGE UP 键 |
|
vbKeyPageDown |
0x22 |
PAGE DOWN 键 |
|
vbKeyEnd |
0x23 |
END 键 |
|
vbKeyHome |
0x24 |
HOME 键 |
|
vbKeyLeft |
0x25 |
LEFT ARROW 键 |
|
vbKeyUp |
0x26 |
UP ARROW 键 |
|
vbKeyRight |
0x27 |
RIGHT ARROW 键 |
|
vbKeyDown |
0x28 |
DOWN ARROW 键 |
|
vbKeySelect |
0x29 |
SELECT 键 |
|
vbKeyPrint |
0x2A |
PRINT SCREEN 键 |
|
vbKeyExecute |
0x2B |
EXECUTE 键 |
|
vbKeySnapshot |
0x2C |
SNAPSHOT 键 |
|
vbKeyInsert |
0x2D |
INSERT 键 |
|
vbKeyDelete |
0x2E |
DELETE 键 |
|
vbKeyHelp |
0x2F |
HELP 键 |
|
vbKeyNumlock |
0x90 |
NUM LOCK 键 |
A 至 Z 键与 A – Z 字母的 ASCII 码相同：
|
常数 |
值 |
描述 |
|---|---|---|
|
vbKeyA |
65 |
A 键 |
|
vbKeyB |
66 |
B 键 |
|
vbKeyC |
67 |
C 键 |
|
vbKeyD |
68 |
D 键 |
|
vbKeyE |
69 |
E 键 |
|
vbKeyF |
70 |
F 键 |
|
vbKeyG |
71 |
G 键 |
|
vbKeyH |
72 |
H 键 |
|
vbKeyI |
73 |
I 键 |
|
vbKeyJ |
74 |
J 键 |
|
vbKeyK |
75 |
K 键 |
|
vbKeyL |
76 |
L 键 |
|
vbKeyM |
77 |
M 键 |
|
vbKeyN |
78 |
N 键 |
|
vbKeyO |
79 |
O 键 |
|
vbKeyP |
80 |
P 键 |
|
vbKeyQ |
81 |
Q 键 |
|
vbKeyR |
82 |
R 键 |
|
vbKeyS |
83 |
S 键 |
|
vbKeyT |
84 |
T 键 |
|
vbKeyU |
85 |
U 键 |
|
vbKeyV |
86 |
V 键 |
|
vbKeyW |
87 |
W 键 |
|
vbKeyX |
88 |
X 键 |
|
vbKeyY |
89 |
Y 键 |
|
vbKeyZ |
90 |
Z 键 |
0 至 9 键与数字 0 – 9 的 ASCII 码相同：
|
常数 |
值 |
描述 |
|||
|---|---|---|---|---|---|
|
vbKey0 |
48 |
0 键 |
|||
|
vbKey1 |
49 |
1 键 |
|||
|
vbKey2 |
50 |
2 键 |
|||
|
vbKey3 |
51 |
3 键 |
|||
|
vbKey4 |
52 |
4 键 |
|||
|
vbKey5 |
53 |
5 键 |
|||
|
vbKey6 |
54 |
6 键 |
|||
|
vbKey7 |
55 |
7 键 |
|||
|
vbKey8 |
56 |
8 键 |
|||
|
vbKey9 |
57 |
9 键 |
下列常数代表数字键盘上的键：
|
常数 |
值 |
描述 |
|||
|---|---|---|---|---|---|
|
vbKeyNumpad0 |
0x60 |
0 键 |
|||
|
vbKeyNumpad1 |
0x61 |
1 键 |
|||
|
vbKeyNumpad2 |
0x62 |
2 键 |
|||
|
vbKeyNumpad3 |
0x63 |
3 键 |
|||
|
vbKeyNumpad4 |
0x64 |
4 键 |
|||
|
vbKeyNumpad5 |
0x65 |
5 键 |
|||
|
vbKeyNumpad6 |
0x66 |
6 键 |
|||
|
vbKeyNumpad7 |
0x67 |
7 键 |
|||
|
vbKeyNumpad8 |
0x68 |
8 键 |
|||
|
vbKeyNumpad9 |
0x69 |
9 键 |
|||
|
vbKeyMultiply |
0x6A |
MULTIPLICATION SIGN (*) 键 |
|||
|
vbKeyAdd |
0x6B |
PLUS SIGN (+) 键 |
|||
|
vbKeySeparator |
0x6C |
ENTER 键 |
|||
|
vbKeySubtract |
0x6D |
MINUS SIGN (–) 键 |
|||
|
vbKeyDecimal |
0x6E |
DECIMAL POINT (.) 键 |
|||
|
vbKeyDivide |
0x6F |
DIVISION SIGN (/) 键 |
下列常数代表功能键：
|
常数 |
值 |
描述 |
|||
|---|---|---|---|---|---|
|
vbKeyF1 |
0x70 |
F1 键 |
|||
|
vbKeyF2 |
0x71 |
F2 键 |
|||
|
vbKeyF3 |
0x72 |
F3 键 |
|||
|
vbKeyF4 |
0x73 |
F4 键 |
|||
|
vbKeyF5 |
0x74 |
F5 键 |
|||
|
vbKeyF6 |
0x75 |
F6 键 |
|||
|
vbKeyF7 |
0x76 |
F7 键 |
|||
|
vbKeyF8 |
0x77 |
F8 键 |
|||
|
vbKeyF9 |
0x78 |
F9 键 |
|||
|
vbKeyF10 |
0x79 |
F10 键 |
|||
|
vbKeyF11 |
0x7A |
F11 键 |
|||
|
vbKeyF12 |
0x7B |
F12 键 |
|||
|
vbKeyF13 |
0x7C |
F13 键 |
|||
|
vbKeyF14 |
0x7D |
F14 键 |
|||
|
vbKeyF15 |
0x7E |
F15 键 |
|||
|
vbKeyF16 |
0x7F |
F16 键 |
Miscellaneous 常数
下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地方代替实际值：
|
常数 |
等于 |
描述 |
|---|---|---|
|
vbCrLf |
Chr(13) + Chr(10) |
回车符与换行符结合 |
|
vbCr |
Chr(13) |
回车符 |
|
vbLf |
Chr(10) |
换行符 |
|
vbNewLine |
Chr(13) + Chr(10) or, on the Macintosh, Chr(13) |
平台指定的新行字符；适用于当前平台 |
|
vbNullChar |
Chr(0) |
值为 0 的字符 |
|
vbNullString |
值为 0 的字符串 |
用来调用外部过程；与长度为零的字符串 ("") 不同 |
|
vbObjectError |
-2147221504 |
用户定义的错误号应当大于该值，例如： |
|
vbTab |
Chr(9) |
Tab 字。 |
|
vbBack |
Chr(8) |
退格字符 |
|
vbFormFeed |
Chr(12) |
在 Microsoft Windows or on the Macintosh 中没有作用 |
|
vbVerticalTab |
Chr(11) |
在 Microsoft or on the Macintosh Windows 中没有作用 |