1、Calendar常数Color常数Comparison常数Compiler常数Date常数日期格式常数Dir、GetAttr和SetAttr常数驱动器类型常数文件属性常数文件输入/输出常数IMEStatus常数Keycode常数Miscellaneous常数MsgBox常数QueryClose常数Shell常数特殊文件夹常数StrConv常数SystemColor常数三态常数VarType常数VisualBasic常数Calendar 常数 可在代码中的任何地方用下列常数代替实际值：常数值描述vbCalGreg0指出使用的是阳历。vbCalHijri1指出使用的是伊斯兰历法。 Color 常数
2、 可在代码中的任何地方用下列常数代替实际值：常数值描述vbBlack0x0黑色vbRed0xFF红色vbGreen0xFF00绿色vbYellow0xFFFF黄色vbBlue0xFF0000蓝色vbMagenta0xFF00FF紫红色vbCyan0xFFFF00青色vbWhite0xFFFFFF白色 Comparison常数 下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地方代替实际值：常数值描述VbUseCompareOption-1使用Option Compare语句的设置进行比较。VbBinaryCompare0进行二进制的比
3、较。VbTextCompare1进行文字的比较。vbDatabaseCompare2用于 Microsoft Access(仅限于Windows)，进行以数据库所含信息为基础的比较。 Compiler 常数 Visual Basic for Applications 定义了一些不能与 #If.Then.#Else 指令一起使用的常数。这些常数除了其范围是全局的；也就是说，除了可在工程中到处应用，在功能上与 #If.Then.#Else 指令定义的常数相同。在 16 位开发平台上，编译常数定义如下：常数值描述Win16True指出开发环境是 16 位。Win32False指出开发环境不是 32
4、位。在 32 位开发平台上，编译常数定义如下：常数值描述Win16False指出开发环境不是 16 位。Win32True指出开发环境是 32 位。 Date 常数 可在代码中的任何地方用下列常数代替实际值：参数值firstdayofweek 参数具有以下这些值：常数值描述vbUseSystem0使用 NLS API 设置。vbSunday1星期日（缺省）vbMonday2星期一vbTuesday3星期二vbWednesday4星期三vbThursday5星期四vbFriday6星期五vbSaturday7星期六firstdayofyear 参数具有以下这些值：常数值描述vbUseSystem
5、0使用 NLS API 设置。VbUseSystemDayOfWeek0使用系统设置中为星期的第一天指定的星期数。VbFirstJan11由 1 月 1 日所在的那个星期开始（缺省）。vbFirstFourDays2由新的一年中第一个至少有 4 天的星期开始。vbFirstFullWeek3由一年中第一个完整的星期开始。值常数值描述vbSunday1星期日vbMonday2星期一vbTuesday3星期二vbWednesday4星期三vbThursday5星期四vbFriday6星期五vbSaturday7星期六VBA.DateTime 的成员 Property Calendar As VbC
6、alendarVBA.DateTime 的成员设置或当前的日历Property Date As VariantVBA.DateTime 的成员设置或当前的系统日期Property Date$ As StringVBA.DateTime 的成员设置或当前的系统日期Function DateAdd(Interval As String, Number As Double, Date)VBA.DateTime 的成员一个 Variant，其中包含添加了指定的时间间隔的日期Function DateDiff(Interval As String, Date1, Date2, FirstDayOfWee
7、k As VbDayOfWeek = vbSunday, FirstWeekOfYear As VbFirstWeekOfYear = vbFirstJan1)VBA.DateTime 的成员两个指定日期之间的时间间隔Function DatePart(Interval As String, Date, FirstDayOfWeek As VbDayOfWeek = vbSunday, FirstWeekOfYear As VbFirstWeekOfYear = vbFirstJan1)VBA.DateTime 的成员给定日期的指定部分Function DateSerial(Year As I
8、nteger, Month As Integer, Day As Integer)VBA.DateTime 的成员一个指定的年、月、日的日期Function DateValue(Date As String)VBA.DateTime 的成员一个日期Function Day(Date)VBA.DateTime 的成员一个整数表示一周的某天Function Hour(Time)VBA.DateTime 的成员表示小时的 0-23 的一个整数Function Minute(Time)VBA.DateTime 的成员代表分钟的 0-59 的整数Function Month(Date)VBA.DateT
9、ime 的成员代表月份的一个整数Property Now As Variant只读VBA.DateTime 的成员当前的系统时间和日期Function Second(Time)VBA.DateTime 的成员一个代表秒的 0-59 的整数Property Time As VariantVBA.DateTime 的成员设置或当前的系统时间Property Time$ As StringVBA.DateTime 的成员设置或当前的系统时间Property Timer As Single只读VBA.DateTime 的成员从午夜开始，经过的秒数Function TimeSerial(Hour As
10、Integer, Minute As Integer, Second As Integer)VBA.DateTime 的成员一个表示特定的小时、分、和秒的序列。Function TimeValue(Time As String)VBA.DateTime 的成员一个时间Function Weekday(Date, FirstDayOfWeek As VbDayOfWeek = vbSunday)VBA.DateTime 的成员代表星期几的一个整数Function Year(Date)VBA.DateTime 的成员一个代表年的整数日期格式常数 仅当您的工程对包含这些常数定义的相应类型库有一个显式
11、引用时，才可以使用这些常数 。常数值描述vbGeneralDate0显示日期和/或时间。对于一个实数，显示日期和时间。如果没有小数部分，则仅显示日期。如果没有整数部分，则仅显示时间。日期和时间的显示由系统设置值确定。vbLongDate1用计算机区域设置值指定的长日期格式显示日期。vbShortDate2用计算机区域设置值指定的短日期格式显示日期。vbLongTime3用计算机区域设置值指定的长时间格式显示时间。vbShortTime4用计算机区域设置值指定的短时间格式显示时间。 Dir、GetAttr 和 SetAttr 常数 可在代码中的任何地方用下列常数代替实际值：常数值描述vbNorm
12、al0正常的（Dir 和 SetAttr 的缺省值）vbReadOnly1只读的vbHidden2隐藏的vbSystem4系统文件vbVolume8卷标vbDirectory16目录或文件夹vbArchive32文件自上一次备份后已经改变驱动器类型常数 仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。常数值描述Unknown0不能确定驱动器类型。Removable1驱动器具有可删除介质。包括所有软盘驱动器和许多其它种类的存储设备。Fixed2驱动器具有固定介质（不可删除的）。包括可删除硬盘在内的所有硬盘驱动器。Remote3网络驱动器。包括在网络上任何地方都可以
13、共享的驱动器。CDROM4驱动器是一个CD-ROM。包括只读的CD-ROM和可读写的CD-ROM。RAMDisk5驱动器是本地计算机上的一块随机存取内存（RAM），它工作起来就象是磁盘驱动器一样。 文件属性常数 仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。常数值描述Normal0普通文件。没有设置属性。ReadOnly1只读文件。属性是可读/写。Hidden2隐藏文件。属性是可读/写。System4系统文件。属性是可读/写。Volume8磁盘驱动器卷标。属性是只读。Directory16文件夹或目录。属性是只读。Archive32自上次备份后已经改变的文件。
14、属性是可读/写。Alias64链接或快捷方式。属性是只读。Compressed128压缩文件。属性是只读。 文件输入/输出常数 仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。常数值描述ForReading1打开文件用于只读操作。不能对文件进行写操作。ForWriting2打开文件用于写操作。如果存在具有相同文件名的文件，文件原有的内容被覆盖。ForAppending8打开文件并向文件的结尾写入。IMEStatus 常数 可在代码中的任何地方用下列常数代替实际值。日文国别的常数如下所示：常数值描述vbIMEModeNoControl0没有安装 IME（缺省）vb
15、IMEModeOn1打开 IMEvbIMEModeOff2关闭 IMEvbIMEModeDisable3无效的 IMEvbIMEModeHiragana4完整宽度 Hiragana 模式vbIMEModeKatakana5完整宽度 Katakana 模式vbIMEModeKatakanaHalf6半宽度 Katakana 模式vbIMEModeAlphaFull7完整宽度 Alphanumeric 模式vbIMEModeAlpha8半宽度 Alphanumeric 模式韩国地区的常数如下所示：常数值描述vbIMEModeAlphaFull7完整宽度 Alphanumeric 模式vbIMEMo
16、deAlpha8半宽度 Alphanumeric 模式vbIMEModeHangulFull9完整宽度 Hangul 模式vbIMEModeHangul10半宽度 Hangul 模式中文地区的常数值如下：常数值描述vbIMEModeNoControl0没有安装 IME （缺省）vbIMEModeOn1IME 打开vbIMEModeOff2IME off Keycode 常数 可在代码中的任何地方用下列常数代替实际值：常数值描述vbKeyLButton0x1鼠标左键vbKeyRButton0x2鼠标右键vbKeyCancel0x3CANCEL 键vbKeyMButton0x4鼠标中键vbKeyB
17、ack0x8BACKSPACE 键vbKeyTab0x9TAB 键vbKeyClear0xCCLEAR 键vbKeyReturn0xDENTER 键vbKeyShift0x10SHIFT 键vbKeyControl0x11CTRL 键vbKeyMenu0x12MENU 键vbKeyPause0x13PAUSE 键vbKeyCapital0x14CAPS LOCK 键vbKeyEscape0x1BESC 键vbKeySpace0x20SPACEBAR 键vbKeyPageUp0x21PAGE UP 键vbKeyPageDown0x22PAGE DOWN 键vbKeyEnd0x23END 键vbK
18、eyHome0x24HOME 键vbKeyLeft0x25LEFT ARROW 键vbKeyUp0x26UP ARROW 键vbKeyRight0x27RIGHT ARROW 键vbKeyDown0x28DOWN ARROW 键vbKeySelect0x29SELECT 键vbKeyPrint0x2APRINT SCREEN 键vbKeyExecute0x2BEXECUTE 键vbKeySnapshot0x2CSNAPSHOT 键vbKeyInsert0x2DINSERT 键vbKeyDelete0x2EDELETE 键vbKeyHelp0x2FHELP 键vbKeyNumlock0x90NU
19、M LOCK 键A 至 Z 键与 A Z 字母的 ASCII 码相同：常数值描述vbKeyA65A 键vbKeyB66B 键vbKeyC67C 键vbKeyD68D 键vbKeyE69E 键vbKeyF70F 键vbKeyG71G 键vbKeyH72H 键vbKeyI73I 键vbKeyJ74J 键vbKeyK75K 键vbKeyL76L 键vbKeyM77M 键vbKeyN78N 键vbKeyO79O 键vbKeyP80P 键vbKeyQ81Q 键vbKeyR82R 键vbKeyS83S 键vbKeyT84T 键vbKeyU85U 键vbKeyV86V 键vbKeyW87W 键vbKeyX8
20、8X 键vbKeyY89Y 键vbKeyZ90Z 键0 至 9 键与数字 0 9 的 ASCII 码相同：常数值描述vbKey0480 键vbKey1491 键vbKey2502 键vbKey3513 键vbKey4524 键vbKey5535 键vbKey6546 键vbKey7557 键vbKey8568 键vbKey9579 键下列常数代表数字键盘上的键：常数值描述vbKeyNumpad00x600 键vbKeyNumpad10x611 键vbKeyNumpad20x622 键vbKeyNumpad30x633 键vbKeyNumpad40x644 键vbKeyNumpad50x655
21、键vbKeyNumpad60x666 键vbKeyNumpad70x677 键vbKeyNumpad80x688 键vbKeyNumpad90x699 键vbKeyMultiply0x6AMULTIPLICATION SIGN (*) 键vbKeyAdd0x6BPLUS SIGN (+) 键vbKeySeparator0x6CENTER 键vbKeySubtract0x6DMINUS SIGN (-) 键vbKeyDecimal0x6EDECIMAL POINT (.) 键vbKeyDivide0x6FDIVISION SIGN (/) 键下列常数代表功能键：常数值描述vbKeyF10x70F
22、1 键vbKeyF20x71F2 键vbKeyF30x72F3 键vbKeyF40x73F4 键vbKeyF50x74F5 键vbKeyF60x75F6 键vbKeyF70x76F7 键vbKeyF80x77F8 键vbKeyF90x78F9 键vbKeyF100x79F10 键vbKeyF110x7AF11 键vbKeyF120x7BF12 键vbKeyF130x7CF13 键vbKeyF140x7DF14 键vbKeyF150x7EF15 键vbKeyF160x7FF16 键 Miscellaneous 常数 下列常数由 Visual Basic for Applications 中的类型
23、库定义，可用来在代码中的任何地方代替实际值：常数等于描述vbCrLfChr(13) + Chr(10)回车符与换行符结合vbCrChr(13)回车符vbLfChr(10)换行符vbNewLineChr(13) + Chr(10) 平台指定的新行字符；适用于当前平台vbNullCharChr(0)值为 0 的字符vbNullString值为 0 的字符串用来调用外部过程；与长度为零的字符串 () 不同vbObjectError-2147221504用户定义的错误号应当大于该值，例如：Err.Raise Number = vbObjectError + 1000vbTabChr(9)Tab 字。v
24、bBackChr(8)退格字符vbFormFeedChr(12)在 Microsoft Windows 中没有作用vbVerticalTabChr(11)在 Microsoft Windows 中没有作用 MsgBox常数 可在代码中的任何地方使用下列常数代替实际值：MsgBox 参数常数值描述vbOKOnly0只有 OK 按钮（缺省值）vbOKCancel1OK 和 Cancel 按钮vbAbortRetryIgnore2Abort、Retry，和 Ignore 按钮vbYesNoCancel3Yes、No，和 Cancel 按钮vbYesNo4Yes 和 No 按钮vbRetryCance
25、l5Retry 和 Cancel 按钮vbCritical16关键消息vbQuestion32警告询问vbExclamation48警告消息vbInformation64通知消息vbDefaultButton10第一个按钮是缺省的（缺省值）vbDefaultButton2256第二个按钮是缺省的vbDefaultButton3512第三个按钮是缺省的vbDefaultButton4768第四个按钮是缺省的vbApplicationModal0应用程序形态的消息框（缺省值）vbSystemModal4096系统强制的消息框vbMsgBoxHelpButton16384添加Help按钮到消息框Vb
26、MsgBoxSetForeground65536指定消息框窗口作为前景窗口vbMsgBoxRight524288文本是右对齐的vbMsgBoxRtlReading1048576指定在希伯来语和阿拉伯语系统中，文本应当显示为从右到左读MsgBox 值常数值描述vbOK1按下 OK 按钮vbCancel2按下 Cancel 按钮vbAbort3按下 Abort 按钮vbRetry4按下 Retry 按钮vbIgnore5按下 Ignore 按钮vbYes6按下 Yes 按钮vbNo7按下 No 按钮 QueryClose常数 下列常数可以用于代码中的任何位置以代替实际值：常数值描述vbFormCo
27、ntrolMenu0用户从窗体上的Control 菜单选择Close 命令。vbFormCode1Unload 语句被从代码中调用。vbAppWindows2当前 Microsoft Windows 操作环境会话结束。vbAppTaskManager3Windows Task Manager 正在关闭应用程序。 Shell 常数 可在代码中的任何地方使用下列常数代替实际值：常数值描述vbHide0窗口是隐藏的，并且焦点被传递给隐藏窗口。vbNormalFocus1窗口拥有焦点，并且恢复到原来的大小与位置。vbMinimizedFocus2窗口缩小为图符并拥有焦点。vbMaximizedFocu
28、s3窗口最大化并拥有焦点。vbNormalNoFocus4窗口被恢复到最近一次的大小与位置。当前活动窗口仍为活动窗口。vbMinimizeNoFocus6窗口缩小为图符。当前活动窗口仍为活动窗口。StrConv常数 可在代码中的任何地方使用下列常数代替实际值：Constant值描述vbUpperCase1将字符串转换成大写字符。vbLowerCase2将字符串转换成小写字符。vbProperCase3将字符串中每个词的第一个字母转换成大写。vbWide4将字符串中的窄（单字节）字符转换成宽（双字节）字符。适用于远东地区。vbNarrow8将字符串中的宽（双字节）字符转换成窄（单字节）字符。适用
29、于远东地区。vbKatakana16将字符串中的 Hiragana 字符转换成 Katakana 字符；只适用于日文地区。vbHiragana32将字符串中的 Katakana 字符转换成 Hiragana 字符；只适用于日文地区。vbUnicode64利用缺省的系统代码页将字符串转换成 Unicode。vbFromUnicode128将字符串由 Unicode 转换成缺省的系统代码页。三态常数 仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。常数值描述TristateTrue1TrueTristateFalse0FalseTristateUseDefault2
30、使用缺省设置值。SystemColor常数 可在代码中的任何地方用下列常数代替实际值：常数值描述vbScrollBars0x80000000滚动条颜色vbDesktop0x80000001桌面颜色vbActiveTitleBar0x80000002活动窗口的标题栏颜色vbInactiveTitleBar0x80000003非活动窗口的标题栏颜色vbMenuBar0x80000004菜单背景色vbWindowBackground0x80000005窗口背景色vbWindowFrame0x80000006窗口框架颜色vbMenuText0x80000007菜单文本颜色vbWindowText0x8
31、0000008窗口文本颜色vbTitleBarText0x80000009标题、调整框和滚动箭头的文本颜色vbActiveBorder0x8000000A活动窗口边框颜色vbInactiveBorder0x8000000B非活动窗口边框颜色vbApplicationWorkspace0x8000000C多文档界面 (MDI) 应用程序的背景色vbHighlight0x8000000D控件中选中项目的背景色vbHighlightText0x8000000E控件中选中项目的文本颜色vbButtonFace0x8000000F命令按钮表面阴影颜色vbButtonShadow0x80000010命令按
32、钮边缘阴影颜色vbGrayText0x80000011灰色（无效）文本vbButtonText0x80000012下压按钮文本颜色vbInactiveCaptionText0x80000013非活动标题文本颜色vb3DHighlight0x800000143-D 显示元素的突出显示颜色vb3DDKShadow0x800000153-D 显示元素的最深阴影颜色vb3DLight0x80000016vb3Dhighlight 之外最亮的 3-D 颜色 vbInfoText0x80000017工具提示文本颜色vbInfoBackground0x80000018工具提示背景色VarType常数 可在代
33、码中的任何地方用下列常数代替实际值：常数值描述vbEmpty0未初始化（缺省值）vbNull1不含任何有效数据vbInteger2IntegervbLong3长整数vbSingle4单精度浮点数vbDouble5双精度浮点数vbCurrency6CurrencyvbDate7DatevbString8StringvbObject9对象vbError10错误vbBoolean11布尔vbVariant12Variant（只用于变体的数组类型）vbDataObject13数据访问对象vbDecimal14DecimalvbByte17BytevbUserDefinedType36包含用户定义类型的
34、变量vbArray8192数组VisualBasic常数 Visual Basic for Applications 定义了一些常数，使程序设计变得更为简单。下列常数可在程序代码中的任何地方代替实际值：Calendar常数Color常数Compiler常数Date常数Dir、GetAttr 和 SetAttr常数IMEStatus常数Instr、StrComp常数Keycode常数Miscellaneous常数MsgBox常数QueryClose常数Shell常数StrConv常数System Color常数VarType常数特殊文件夹常数 仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。常数值描述WindowsFolder0Windows文件夹包含由Windows操作系统安装的文件。SystemFolder1System（系统）文件夹包含库、字体和设备驱动程序。TemporaryFolder2Temp（临时）文件夹用于存储临时文件。它的路径可在TMP环境变量中找到。
