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是可用的。 
  
.............................................................................  
 
  |