脚本之家,脚本语言编程技术及教程分享平台!
分类导航

Python|VBS|Ruby|Lua|perl|VBA|Golang|PowerShell|Erlang|autoit|Dos|bat|

服务器之家 - 脚本之家 - VBA - VBA 中要用到的常数

VBA 中要用到的常数

2020-05-29 13:53VBA教程网 VBA

本文主要讲解VBA编程语言中要用到的常数,具有一定的参考价值,有需要的童鞋可以参考一下。

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上,只有VbNormalvbReadOnly、 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(缺省)

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 (缺省)

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 中没有作用

 

延伸 · 阅读

精彩推荐