Съдържание

# Константи на 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) ' Връща 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 ' Грешка
                End Sub

## Наименувани константи на MsgBox

Наименувана константа | Целочислена стойност | Дефиниция
--- | --- | ---
MB_OK | 0 | Показва се само бутон „OK“.
MB_OKCANCEL | 1 | Показват се бутони „OK“ и „Отказ“.
MB_ABORTRETRYIGNORE | 2 | Показват се бутони „Прекратяване“, „Повторен опит“ и „Игнориране“.
MB_YESNOCANCEL | 3 | Показват се бутони „Да“, „Не“ и „Отказ“.
MB_YESNO | 4 | Показват се бутони „Да“ и „Не“.
MB_RETRYCANCEL | 5 | Показват се бутони „Повторен опит“ и „Отказ“.
MB_ICONSTOP | 16 | В диалоговия прозорец се показва икона „Стоп“.
MB_ICONQUESTION | 32 | В диалоговия прозорец се показва икона „Въпрос“.
MB_ICONEXCLAMATION | 48 | В диалоговия прозорец се показва икона „Удивителна“.
MB_ICONINFORMATION | 64 | В диалоговия прозорец се показва икона „Информация“.
| 128 | Първият бутон в диалоговия прозорец е подразбиран.
MB_DEFBUTTON2 | 256 | Вторият бутон в диалоговия прозорец е подразбиран.
MB_DEFBUTTON3 | 512 | Третият бутон в диалоговия прозорец е подразбиран.

## Наименувани константи на GetAttr

Наименувана константа | Стойност | Дефиниция
--- | --- | ---
ATTR_NORMAL | 0 | Нормални файлове.
ATTR_READONLY | 1 | Файлове само за четене.
ATTR_HIDDEN | 2 | Скрит файл.
ATTR_SYSTEM | 4 | Системен файл.
ATTR_VOLUME | 8 | Връща името на тома.
ATTR_DIRECTORY | 16 | Връща само името на директорията.
ATTR_ARCHIVE | 32 | Файлът е бил променен след последното архивиране (бит за архивиране).

## Наименувани константи за типове данни

Стойности на TypeName | Наименувана константа | VarType values | Тип на променливата
--- | --- | --- | ---
…() | 8192 | Масив от променливи
Boolean | 11 | Променлива от тип Boolean
Byte | 17 | Променлива от тип Byte
Date | V_DATE | 7 | Променлива от тип Date
Currency | V_CURRENCY | 6 | Променлива от тип Currency
Double | V_DOUBLE | 5 | Променлива с плаваща запетая с двойна точност
Error | 11 | Променлива от тип грешка
Integer | V_INTEGER | 2 | Променлива от тип Integer
Long | V_LONG | 3 | Променлива от тип Long
Object | 9 | Променлива от тип Object
Single | V_SINGLE | 4 | Променлива с плаваща запетая с единична точност
String | V_STRING | 8 | Променлива от тип String
Variant | 12 | Променлива от тип Variant (може да съдържа произволен тип според присвоената стойност)
Empty | V_EMPTY | 0 | Неинициализирана променлива от тип Variant
Null | V_NULL | 1 | Променливата не съдържа валидни данни.

## Допълнителни константи на VBA

Следните константи са достъпни, когато е включен режимът на съвместимост с VBA.

Тази константа, функция или обект се разрешава с оператора Option VBASupport 1, поставен преди изпълнимия програмен код в модула.

### 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

Наименувана константа | Стойности за червено, зелено и синьо
--- | ---
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)

### Наименувани константи за типове на променливи

Наименувана константа | Десетична стойност
--- | ---
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

### Наименувани константи на VBA за FormatDateTime

Наименувана константа | Стойност | Описание
--- | --- | ---
vbGeneralDate | 0 | Показва дата и/или час по начина, указан в общите системни настройки за дати. Ако е зададена само дата, не се показва час; ако е зададен само час, не се показва дата.
vbLongDate | 1 | Показва дата в дългия формат за дати, зададен в регионалните настройки на компютъра.
vbShortDate | 2 | Показва дата в късия формат за дати, зададен в регионалните настройки на компютъра.
vbLongTime | 3 | Показва час в дългия формат за часове от настройките на системата.
vbShortTime | 4 | Показва час в 24-часов формат (чч:мм).

### Наименувани константи на VBA за StrConv

Преобразуване | Стойност | Описание
--- | --- | ---
vbUpperCase | 1 | Преобразува знаците от Text към горен регистър.
vbLowerCase | 2 | Преобразува знаците от Text към долен регистър.
vbProperCase | 3 | Преобразува първата буква от всяка дума в Text към горен регистър.
vbWide | 4 | Преобразува тесните знаци (с половин ширина) в Text към широки знаци (с пълна ширина).
vbNarrow | 8 | Преобразува широките знаци (с пълна ширина) в Text към тесни знаци (с половин ширина).
vbKatakana | 16 | Преобразува знаците от хирагана в Text към знаци от катакана.
vbHiragana | 32 | Преобразува знаците от катакана в Text към знаци от хирагана.
vbUnicode | 64 | Преобразува знаците от Text към знаци от Уникод, използвайки подразбираната кодова страница на системата.
vbFromUnicode | 128 | Преобразува знаците в Text от Уникод към подразбираната кодова страница на системата.

### Наименувани константи на VBA за WeekDayName

Стойност | Константа на VBA | Описание
--- | --- | ---
0 | vbUseSystemDayOfWeek | Използват се системните настройки за локал.
1 | vbSunday | Неделя (по подразбиране)
2 | vbMonday | Понеделник
3 | vbTuesday | Вторник
4 | vbWednesday | Сряда
5 | vbThursday | Четвъртък
6 | vbFriday | Петък
7 | vbSaturday | Събота

### Наименувани константи на VBA – разни

Наименувана константа | Шестнайсетична (десетична) стойност | Описание
--- | --- | ---
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) за Windows \x0A (10) за други системи | LF или CRLF
vbNullString | "" | Низ със стойност null
vbTab | \x09 (9) | HT - хоризонтална табулация
vbVerticalTab | \x0B (11) | VT - вертикална табулация

Моля, подкрепете ни!