Module
Contents
Index 🔎︎

# 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，该语句需要放置在模块的每个可执行程序代码的前面。

已命名常量 | 十六进制（浮点）值 | 说明
vbTrue | -1 | Part of vbTriState enumeration.
vbFalse | 0 | Part of vbTriState enumeration.
vbUseDefault | -2 | Part of vbTriState enumeration.
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 - 垂直制表符