VB常数与函数(三)

Miscellaneous 常数  

下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地方代替实际值：  

常数 等于 描述   
vbCrLf Chr(13) + Chr(10) 回车符与换行符结合   
vbCr Chr(13) 回车符   
vbLf Chr(10) 换行符   
vbNewLine Chr(13) + Chr(10)  平台指定的新行字符；适用于当前平台   
vbNullChar Chr(0) 值为 0 的字符   
vbNullString 值为 0 的字符串 用来调用外部过程；与长度为零的字符串 ("") 不同   
vbObjectError -2147221504 用户定义的错误号应当大于该值，例如：  
Err.Raise Number = vbObjectError + 1000   
vbTab Chr(9) Tab 字。   
vbBack Chr(8) 退格字符   
vbFormFeed Chr(12) 在 Microsoft Windows 中没有作用   
vbVerticalTab Chr(11) 在 Microsoft Windows 中没有作用   


-------------------------------------------------------  

MsgBox 常数  

可在代码中的任何地方使用下列常数代替实际值：  

MsgBox 参数  

常数 值 描述   
vbOKOnly 0 只有 OK 按钮（缺省值）   
vbOKCancel 1 OK 和 Cancel 按钮   
vbAbortRetryIgnore 2 Abort、Retry，和 Ignore 按钮   
vbYesNoCancel 3 Yes、No，和 Cancel 按钮   
vbYesNo 4 Yes 和 No 按钮   
vbRetryCancel 5 Retry 和 Cancel 按钮   
vbCritical 16 关键消息   
vbQuestion 32 警告询问   
vbExclamation 48 警告消息   
vbInformation 64 通知消息   
vbDefaultButton1 0 第一个按钮是缺省的（缺省值）   
vbDefaultButton2 256 第二个按钮是缺省的   
vbDefaultButton3 512 第三个按钮是缺省的   
vbDefaultButton4 768 第四个按钮是缺省的   
vbApplicationModal 0 应用程序形态的消息框（缺省值）   
vbSystemModal 4096 系统强制返回的消息框   
vbMsgBoxHelpButton 16384 添加Help按钮到消息框   
VbMsgBoxSetForeground 65536 指定消息框窗口作为前景窗口   
vbMsgBoxRight 524288 文本是右对齐的   
vbMsgBoxRtlReading 1048576 指定在希伯来语和阿拉伯语系统中，文本应当显示为从右到左读   

MsgBox 返回值  

常数 值 描述   
vbOK 1 按下 OK 按钮   
vbCancel 2 按下 Cancel 按钮   
vbAbort 3 按下 Abort 按钮   
vbRetry 4 按下 Retry 按钮   
vbIgnore 5 按下 Ignore 按钮   
vbYes 6 按下 Yes 按钮   
vbNo 7 按下 No 按钮   

--------------------------------------------------------------------------------  
QueryClose常数  
下列常数可以用于代码中的任何位置以代替实际值：  
常数 值 描述   
vbFormControlMenu 0 用户从窗体上的Control 菜单选择Close 命令。   
vbFormCode 1 Unload 语句被从代码中调用。   
vbAppWindows 2 当前 Microsoft Windows 操作环境会话结束。   
vbAppTaskManager 3 Windows Task Manager 正在关闭应用程序。   
--------------------------------------------------------------------------------  
Dir、GetAttr 和 SetAttr 常数?  
可在代码中的任何地方用下列常数代替实际值：  
常数 值 描述   
vbNormal 0 正常的（Dir 和 SetAttr 的缺省值）   
vbReadOnly 1 只读的   
vbHidden 2 隐藏的   
vbSystem 4 系统文件   
vbVolume 8 卷标   
vbDirectory 16 目录或文件夹   
vbArchive 32 文件自上一次备份后已经改变   
--------------------------------------------------------------------------------  
Shell 常数  
可在代码中的任何地方使用下列常数代替实际值：  

常数 值 描述   
vbHide 0 窗口是隐藏的，并且焦点被传递给隐藏窗口。   
vbNormalFocus 1 窗口拥有焦点，并且恢复到原来的大小与位置。   
vbMinimizedFocus 2 窗口缩小为图符并拥有焦点。   
vbMaximizedFocus 3 窗口最大化并拥有焦点。   
vbNormalNoFocus 4 窗口被恢复到最近一次的大小与位置。当前活动窗口仍为活动窗口。   
vbMinimizeNoFocus 6 窗口缩小为图符。当前活动窗口仍为活动窗口。   
--------------------------------------------------------------------------------  
特殊文件夹常数  
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。  
常数 值 描述   
WindowsFolder 0 Windows文件夹包含由Windows操作系统安装的文件。   
SystemFolder 1 System（系统）文件夹包含库、字体和设备驱动程序。   
TemporaryFolder 2 Temp（临时）文件夹用于存储临时文件。它的路径可在TMP环境变量中找到。   

--------------------------------------------------------------------------------  
StrConv 常数  
可在代码中的任何地方使用下列常数代替实际值：  
  
  
Constant 值 描述   
vbUpperCase 1 将字符串转换成大写字符。   
vbLowerCase 2 将字符串转换成小写字符。   
vbProperCase 3 将字符串中每个词的第一个字母转换成大写。   
vbWide 4 将字符串中的窄（单字节）字符转换成宽（双字节）字符。适用于远东地区。   
vbNarrow 8 将字符串中的宽（双字节）字符转换成窄（单字节）字符。适用于远东地区。   
vbKatakana 16 将字符串中的 Hiragana 字符转换成 Katakana 字符；只适用于日文地区。   
vbHiragana 32 将字符串中的 Katakana 字符转换成 Hiragana 字符；只适用于日文地区。   
vbUnicode 64 利用缺省的系统代码页将字符串转换成 Unicode。   
vbFromUnicode 128 将字符串由 Unicode 转换成缺省的系统代码页。   

--------------------------------------------------------------------------------  
System Color 常数  
可在代码中的任何地方用下列常数代替实际值：  
常数 值 描述   
vbScrollBars 0x80000000 滚动条颜色   
vbDesktop 0x80000001 桌面颜色   
vbActiveTitleBar 0x80000002 活动窗口的标题栏颜色   
vbInactiveTitleBar 0x80000003 非活动窗口的标题栏颜色   
vbMenuBar 0x80000004 菜单背景色   
vbWindowBackground 0x80000005 窗口背景色   
vbWindowFrame 0x80000006 窗口框架颜色   
vbMenuText 0x80000007 菜单文本颜色   
vbWindowText 0x80000008 窗口文本颜色   
vbTitleBarText 0x80000009 标题、调整框和滚动箭头的文本颜色   
vbActiveBorder 0x8000000A 活动窗口边框颜色   
vbInactiveBorder 0x8000000B 非活动窗口边框颜色   
vbApplicationWorkspace 0x8000000C 多文档界面 (MDI) 应用程序的背景色   
vbHighlight 0x8000000D 控件中选中项目的背景色   
vbHighlightText 0x8000000E 控件中选中项目的文本颜色   
vbButtonFace 0x8000000F 命令按钮表面阴影颜色   
vbButtonShadow 0x80000010 命令按钮边缘阴影颜色   
vbGrayText 0x80000011 灰色（无效）文本   
vbButtonText 0x80000012 下压按钮文本颜色   
vbInactiveCaptionText 0x80000013 非活动标题文本颜色   
vb3DHighlight 0x80000014 3-D 显示元素的突出显示颜色   
vb3DDKShadow 0x80000015 3-D 显示元素的最深阴影颜色   
vb3DLight 0x80000016 vb3Dhighlight 之外最亮的 3-D 颜色   
vbInfoText 0x80000017 工具提示文本颜色   
vbInfoBackground 0x80000018 工具提示背景色   

--------------------------------------------------------------------------------  
三态常数  
仅当您的工程对包含这些常数定义的相应类型库有一个显式引用时，才可以使用这些常数。  
常数 值 描述   
TristateTrue –1 True   
TristateFalse 0 False   
TristateUseDefault –2 使用缺省设置值。   
--------------------------------------------------------------------------------  
VarType 常数  
可在代码中的任何地方用下列常数代替实际值：  
常数 值 描述   
vbEmpty 0 未初始化（缺省值）   
vbNull 1 不含任何有效数据   
vbInteger 2 Integer   
vbLong 3 长整数   
vbSingle 4 单精度浮点数   
vbDouble 5 双精度浮点数   
vbCurrency 6 Currency   
vbDate 7 Date   
vbString 8 String   
vbObject 9 对象   
vbError 10 错误   
vbBoolean 11 布尔   
vbVariant 12 Variant（只用于变体的数组类型）   
vbDataObject 13 数据访问对象   
vbDecimal 14 Decimal   
vbByte 17 Byte   
vbUserDefinedType 36 包含用户定义类型的变量   
vbArray 8192 数组   

--------------------------------------------------------------------------------  
Visual Basic 常数  
Visual Basic for Applications 定义了一些常数，使程序设计变得更为简单。下列常数可在程序代码中的任何地方代替实际值：  
Calendar 常数  
Color 常数  
Compiler 常数  
Date 常数  
Dir、GetAttr 和 SetAttr 常数  
IMEStatus 常数  
Instr、StrComp 常数  
Keycode 常数  
Miscellaneous 常数  
MsgBox 常数  
QueryClose 常数  
QueryClose 常数  
Shell 常数  
StrConv 常数  
System Color 常数  
VarType 常数   
sendkeys 按键 代码   
BACKSPACE {BACKSPACE}, {BS}, 或 {BKSP}   
BREAK {BREAK}   
CAPS LOCK {CAPSLOCK}   
DEL or DELETE {DELETE} 或 {DEL}   
DOWN ARROW {DOWN}   
END {END}   
ENTER {ENTER}或 ~   
ESC {ESC}   
HELP {HELP}   
HOME {HOME}   
INS or INSERT {INSERT} 或 {INS}   
LEFT ARROW {LEFT}   
NUM LOCK {NUMLOCK}   
PAGE DOWN {PGDN}   
PAGE UP {PGUP}   
PRINT SCREEN {PRTSC}   
RIGHT ARROW {RIGHT}   
SCROLL LOCK {SCROLLLOCK}   
TAB {TAB}   
UP ARROW {UP}   
F1 {F1}   
F2 {F2}   
F3 {F3}   
F4 {F4}   
F5 {F5}   
F6 {F6}   
F7 {F7}   
F8 {F8}   
F9 {F9}   
F10 {F10}   
F11 {F11}   
F12 {F12}   
F13 {F13}   
F14 {F14}   
F15 {F15}   
F16 {F16}   
为了指定那些与 SHIFT、CTRL 及 ALT 等按键结合的组合键，可在这些按键码的前面放置一个或多个代码，这些代码列举如下：   
按键 代码   
SHIFT +   
CTRL ^   
ALT %   
为了说明在按下其它按键时应同时按下 SHIFT、CTRL、及 ALT 的任意组合键，请把那些按键的码放在括号当中。例如，为了说明按下 E 与 C 的时候同时按下 SHIFT 键，请使用 "+(EC)"。为了说明在按下 E 的时候同时按下 SHIFT 键，但接着按 C 而不按 SHIFT，则使用 "+EC"。   
为了指定重复键，使用 {key number} 的形式。必须在 key 与 number 之间放置一个空格。例如，{LEFT 42} 意指 42 次按下 LEFT ARROW 键；{h 10} 则是指 10 次按下 H 键。   
注意 不能用 SendKeys 将按键消息发送到这样一个应用程序，这个应用程序并没有被设计成在 Microsoft Windows 中运行。Sendkeys 也无法将 PRINT SCREEN 按键 {PRTSC} 发送到任何应用程序