Константи 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
|
Іменована константа |
Шістнадцяткове (десяткове) значення |
Опис |
|
vbCr |
\x0D (13) |
CR - повернення каретки |
|
vbCrLf |
\x0D\x0A (13 10) |
CRLF - повернення каретки і переведення рядка |
|
vbFormFeed |
\x0c (12) |
FF - переведення аркуша |
|
vbLf |
\x0A (10) |
LF - переведення рядка |
|
vbNewLine |
\x0D\x0A (13 10) для Windows 32 біт \x0A (10) для інших 64-бітових систем |
LF або CRLF |
|
vbNullString |
"" |
Порожній рядок |
|
vbTab |
\x09 (9) |
HT - горизонтальна табуляція |
|
vbVerticalTab |
\x0B (11) |
VT - вертикальна табуляція |