VBA 常量基础教程

常量一旦赋值，其值不能改变。在程序运行整个过程，其值一直保持不变。

声明常量

Const [常量名] As [数据类型] = [值]

实例

现在看一个实例，将 π 的值作为一个常量声明，在后续的过程中，直接使用 Pi 作为 π 的值参与计算。

Sub MyCode()    '声明 π 常量    Const Pi As Double = 3.14159    '声明半径 r 和周长 C 变量    Dim r As Double    Dim C As Double    '从单元格 A1 读取半径值    r = Range("A1").Value    '计算周长    C = 2 * Pi * r        MsgBox "周长为：" & CEnd Sub

看一下结果：