VBA (1)常数
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是可用的。
.............................................................................