通过

Const 语句

  • 项目

声明用于替代文本值的常量。

语法

[ 公共 | 专用 ] Constconstname [ Astype ] =expression

Const 语句语法包含以下部分：

Part 说明
Public 可选。 在模块级别使用的关键字用于声明可供所有模块中的所有过程使用的常量。 过程中不允许使用此关键字。
Private 可选。 在模块级别使用的关键字，用于声明仅在进行 声明 的模块中可用的常量。 过程中不允许使用此关键字。
constname 必填。 常量的名称；遵循标准变量命名约定。
type 可选。 常量的数据类型；可以是 Byte、Boolean、Integer、Long、Currency、Single、Double、Decimal（当前不受支持）、Date、String 或 Variant。 对声明的每个常量使用单独的 As类型 子句。
expression 必填。 文本、其他常量或任何包含除 Is 之外的所有算术或逻辑运算符的组合。

备注

默认情况下，常量是私有的。 在过程中，常量始终是私有的；无法更改其可见性。 在 标准模块中，可以使用 Public 关键字更改模块级常量的默认可见性。 但是，在 类模块中，常量只能是私有的，并且无法使用 Public 关键字更改其可见性。

若要在同一个行上组合多个常量赋值，请使用逗号分隔每个常量分配。 在按此方式组合常量声明时，将 Public 或 Private 关键字（如果已使用）将应用于所有常量声明。

您无法在分配给常量的表达式中使用变量、用户定义的函数或固有 Visual Basic 函数（例如，Chr）。

注意

[!注释] 常量可以使您的程序自我说明化且易于修改。 与变量不同，当您的程序正在运行时，不会无意中更改常量。

如果不使用 As类型显式声明常量类型，则常量具有最适合 表达式的数据类型。

在 Sub、Function 或 Property 过程中声明的常量是该过程的本地常量。 在过程的外部声明的常量是在声明它的模块中定义的。 在可以使用表达式的任何位置使用常量。

示例

此示例使用 Const 语句声明用于替代文本值的常量。 在标准模块的"常规"部分中而不是在类模块中声明 Public 常量。 在任何类型的模块的"常规"部分中声明 Private 常量。

' Constants are Private by default. 
Const MyVar = 459 
 
' Declare Public constant. 
Public Const MyString = "HELP" 
 
' Declare Private Integer constant. 
Private Const MyInt As Integer = 5 
 
' Declare multiple constants on same line. 
Const MyStr = "Hello", MyDouble As Double = 3.4567

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。