Basic 中的常量

在 Basic 程序中使用的常量

逻辑值常量

名称

类型

值

True

Boolean

1

False

Boolean

0

示例：

Dim bPositive as Boolean

bPositive = True

数学常量

名称

类型

值

Pi

Double

3.14159265358979

示例：

Function Rad2Deg( aRad as Double) As Double

 Rad2Deg = aRad * 180.00 / Pi

End Function

对象常量

名称

类型

用法

Empty

Variant

Empty 值表明这个变量还未初始化。

Null

null

表明这个变量尚未包含数据。

Nothing

Object

将某个变量赋值为 Nothing 对象，以移除先前的值。

示例：

SubExampleEmpty

Dim sVar As Variant

 sVar = Empty

 Print IsEmpty(sVar) ' Returns True

End Sub

Sub ExampleNull

Dim vVar As Variant

 MsgBox IsNull(vVar)

End Sub

Sub ExampleNothing

Dim oDoc As Object

 Set oDoc = ThisComponent

 Print oDoc.Title

 oDoc = Nothing

 Print oDoc ‘ Error

End Sub

更多 VBA 常量

以下常量将会在启用 VBA 兼容模式时可用

警告图标

该功能或常量可通过以下语句启用：Option VBASupport 1，该语句需要放置在模块的每个可执行程序代码的前面。


已命名常量

十六进制（浮点）值

说明

vbCr

\x0D (13)

CR - 回车

vbCrLf

\x0D\x0A (13 10)

CRLF - 回车与换行

vbFormFeed

\x0c (12)

FF - 换页

vbLf

\x0A (10)

LF - 换行

vbNewLine

\x0D\x0A (13 10) for 32-bit Windows

\x0A (10) for other 64-bit systems

LF 或 CRLF

vbNullString

""

Null 字符串

vbTab

\x09 (9)

HT - 水平制表符

vbVerticalTab

\x0B (11)

VT - 垂直制表符