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 - 垂直制表符