Basic-vakiot

Sisällys

# Basic Constants

Constants used in Basic programs

## Boolean constants

Name | Type | Value
--- | --- | ---
True | Boolean | 1
False | Boolean | 0

### Esimerkki:

                Dim bPositive as Boolean
                bPositive = True

## Mathematical constant

Name | Type | Value
--- | --- | ---
Pi | Double | 3.14159265358979

### Esimerkki:

                Function Rad2Deg( aRad as Double) As Double
                 Rad2Deg = aRad * 180.00 / Pi
                End Function

## Object Constants

Name | Type | Usage
--- | --- | ---
Empty | Variant | The Empty value indicates that the variable is not initialized.
Null | null | Indicates that the variable does not contain data.
Nothing | Object | Assign the Nothing object to a variable to remove a previous assignment.

### Esimerkki:

                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

## MsgBox Named Constants

Named constant | Integer value | Definition
--- | --- | ---
MB_OK | 0 | Display OK button only.
MB_OKCANCEL | 1 | Display OK and Cancel buttons.
MB_ABORTRETRYIGNORE | 2 | Display Abort, Retry, and Ignore buttons.
MB_YESNOCANCEL | 3 | Display Yes, No, and Cancel buttons.
MB_YESNO | 4 | Display Yes and No buttons.
MB_RETRYCANCEL | 5 | Display Retry and Cancel buttons.
MB_ICONSTOP | 16 | Add the Stop icon to the dialog.
MB_ICONQUESTION | 32 | Add the Question icon to the dialog.
MB_ICONEXCLAMATION | 48 | Add the Exclamation Point icon to the dialog.
MB_ICONINFORMATION | 64 | Add the Information icon to the dialog.
| 128 | First button in the dialog as default button.
MB_DEFBUTTON2 | 256 | Second button in the dialog as default button.
MB_DEFBUTTON3 | 512 | Third button in the dialog as default button.

## GetAttr Named Constants

Named constant | Value | Definition
--- | --- | ---
ATTR_NORMAL | 0 | Normal files.
ATTR_READONLY | 1 | Read-only files.
ATTR_HIDDEN | 2 | Hidden file
ATTR_SYSTEM | 4 | System file
ATTR_VOLUME | 8 | Returns the name of the volume
ATTR_DIRECTORY | 16 | Returns the name of the directory only.
ATTR_ARCHIVE | 32 | File was changed since last backup (Archive bit).

## Data Type Named Constants

TypeName values | Named constant | VarType values | Muuttujan tyyppi
--- | --- | --- | ---
…() | 8192 | Array of variables
Boolean | 11 | Boolean variable
Byte | 17 | Byte variable
Date | V_DATE | 7 | Date variable
Currency | V_CURRENCY | 6 | Currency variable
Double | V_DOUBLE | 5 | Double-precision floating-point variable
Error | 11 | Error type variable
Integer | V_INTEGER | 2 | Integer variable
Long | V_LONG | 3 | Long integer variable
Object | 9 | Object variable
Single | V_SINGLE | 4 | Single-precision floating-point variable
String | V_STRING | 8 | String variable
Variant | 12 | Variant variable (can contain all types specified by the definition)
Empty | V_EMPTY | 0 | Uninitialized Variant variable
Null | V_NULL | 1 | ei kelvollinen tieto

## Additional VBA constants

The following constants are available when VBA compatibility mode is enabled

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

### VBA MsgBox named constants

Name | Value
--- | ---
vbApplicationModal | 0
vbDefaultButton1 | 0
vbOKOnly | 0
vbOKCancel | 1
vbAbortRetryIgnore | 2
vbYesNoCancel | 3
vbYesNo | 4
vbRetryCancel | 5
vbCritical | 16
vbQuestion | 32
vbExclamation | 48
vbInformation | 64
vbDefaultButton2 | 256
vbDefaultButton3 | 512
vbDefaultButton4 | 768
vbSystemModal | 4096
vbMsgBoxHelpButton | 16384
vbMsgBoxSetForeground | 65536
vbMsgBoxRight | 524288
vbMsgBoxRtlReading | 1048576

### VBA Color Named Constants

Named constant | Red, Green, Blue composition
--- | ---
vbBlack | RGB(0, 0, 0)
vbBlue | RGB(0, 0, 255)
vbCyan | RGB(0, 255, 255)
vbGreen | RGB(0, 255, 0)
vbMagenta | RGB(255, 0, 255)
vbRed | RGB(255, 0, 0)
vbYellow | RGB(255, 255, 0)
vbWhite | RGB(255, 255, 255)

### Variable Type Named Constants

Named constant | Decimal value
--- | ---
vbArray | 8192
vbBoolean | 11
vbByte | 17
vbCurrency | 6
vbDataObject | 13
vbDate | 7
vbDecimal | 14
vbDouble | 5
vbEmpty | 0
vbError | 10
vbInteger | 2
vbLong | 3
vbNull | 1
vbObject | 9
vbSingle | 4
vbString | 8
vbUserDefinedType | 36
vbVariant | 12

### FormatDateTime VBA Named Constants

Named Constant | Value | Description
--- | --- | ---
vbGeneralDate | 0 | Displays a date and/or time as defined in your system's General Date setting. If a date only, no time is displayed; If a time only, no date is displayed.
vbLongDate | 1 | Display a date using the long date format specified in your computer's regional settings.
vbShortDate | 2 | Display a date using the short date format specified in your computer's regional settings.
vbLongTime | 3 | Displays a time as defined in your system's Long Time settings.
vbShortTime | 4 | Display a time using the 24-hour format (hh:mm).

### StrConv VBA Named Constants

Conversion | Value | Description
--- | --- | ---
vbUpperCase | 1 | Converts Text characters to uppercase.
vbLowerCase | 2 | Converts Text characters lowercase.
vbProperCase | 3 | Converts the first letter of every word in Text to uppercase.
vbWide | 4 | Converts narrow (half-width) characters in Text to wide (full-width) characters.
vbNarrow | 8 | Converts wide (full-width) characters in Text to narrow (half-width) characters.
vbKatakana | 16 | Converts Hiragana characters in Text to Katakana characters.
vbHiragana | 32 | Converts Katakana characters in Text to Hiragana characters.
vbUnicode | 64 | Converts Text characters to Unicode characters using the default code page of the system.
vbFromUnicode | 128 | Converts Text characters from Unicode to the default code page of the system.

### WeekDayName VBA Named Constants

Value | VBA Constant | Description
--- | --- | ---
0 | vbUseSystemDayOfWeek | Use system locale settings
1 | vbSunday | Sunday (default)
2 | vbMonday | Monday
3 | vbTuesday | Tuesday
4 | vbWednesday | Wednesday
5 | vbThursday | Thursday
6 | vbFriday | Friday
7 | vbSaturday | Saturday

### Miscellaneous VBA Named Constants

Named constant | Hexadecimal (decimal) value | Description
--- | --- | ---
vbTrue | -1 | Part of vbTriState enumeration.
vbFalse | 0 | Part of vbTriState enumeration.
vbUseDefault | -2 | Part of vbTriState enumeration.
vbCr | \x0D (13) | CR - Carriage return
vbCrLf | \x0D\x0A (13 10) | CRLF - Carriage return and line feed
vbFormFeed | \x0c (12) | FF - Form feed
vbLf | \x0A (10) | LF - Line feed
vbNewLine | \x0D\x0A (13 10) for Windows \x0A (10) for other systems | LF or CRLF
vbNullString | "" | Null string
vbTab | \x09 (9) | HT - Horizontal tab
vbVerticalTab | \x0B (11) | VT - Vertical tab

Please support us!