首頁 > 開發 > 其他 > 正文

VBA 中要用到的常數

2019-10-14 22:10:50
字體:
來源:轉載
供稿:網友

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 星期日(缺?。?/td>
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、 vbHiddenvbAlias是可用的。
 

驅動器類型常數

僅當您的工程對包含這些常數定義的相應類型庫有一個顯式引用時,才可以使用這些常數。

 

常數 描述
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(缺?。?/td>
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 (缺?。?/td>
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 用戶定義的錯誤號應當大于該值,例如:
Err.Raise Number = vbObjectError + 1000
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 中沒有作用

 

 
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
金玫玫床戏