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 兼容模式时可用

This constant, function or object is enabled with the statement Option VBASupport 1 placed before the executable program code in a module.

已命名常量	十六进制 (浮点) 值	说明
vbTrue	-1	vbTriState 枚举的一部分。
vbFalse	0	vbTriState 枚举的一部分。
vbUseDefault	-2	vbTriState 枚举的一部分。
vbCr	\x0D (13)	CR - 回车
vbCrLf	\x0D\x0A (13 10)	CRLF - 回车与换行
vbFormFeed	\x0c (12)	FF - 换页
vbLf	\x0A (10)	LF - 换行
vbNewLine	\x0D\x0A (13 10) for Windows \x0A (10) for other systems	LF 或 CRLF
vbNullString	""	Null 字符串
vbTab	\x09 (9)	HT - 水平制表符
vbVerticalTab	\x0B (11)	VT - 垂直制表符