Объявление констант

Объявление констант во многом аналогично объявлению переменных. Константы можно объявлять на уровне модуля или процедуры. Область их действия при этом определяется теми же правилами, что и для переменных.

Для объявления константы на уровне процедуры используется оператор Const, имеющий следующий синтаксис:

Const ИмяКонстанты [As ТипДанных] = Выражение

Например,

Const PI As Double = 3.14

При объявлении константы на уровне модуля можно дополнительно указать область ее действия.

В этом случае оператор Const имеет следующий синтаксис:

[Public|Private] Const ИмяКонстанты [As ТипДанных] = Выражение

В приведенном ниже примере константа gPI объявлена глобальной:

Public Const gPI As Double = 3.14

Переменные

В VB 6.0 переменные можно не объявлять явно и не явно. При неявном объявлении переменная создается при её первом использовании, т.е. написав в коде программы A=1, автоматически в памяти создается переменная с именем A типа Variant. Для явного объявления переменных используется следующий синтаксис:

[Dim|Private|Public] ИмяПеременной As ТипДанных

Например:

1. Объявление переменной c именем «lngX» типа Long:

Dim lngX As Long

2. Объявление переменной с именем «strMyString» типа String:

Private mstrMyString As String

3. Объявление переменной с именем «curTotalAmount» типа Currency:

Public gstrTotalAmount As Currency

Если разместить выражение Option Explicit в начале модуля, то неявное объявление переменных станет невозможным.

Для выполнения лабораторных работ этой главы вам достаточно объявлять переменные с помощью ключевого слова Dim, а использование Private и Public смотрите в главе Область видимости (см. Область видимости).

Математические операторы

Математические операторы позволяют выполнять действия с переменными числового типа данных. В таблице приведены все математические операторы Visual Basic:

Таблица 4.2 Математические операторы

Оператор	Выполняемая операция
+	Сложение
-	Вычитание
*	Умножение
/	Деление
\	Целочисленное деление
mod	Остаток от деления нацело
/\	Возведение в степень

В следующей таблице даны примеры использование математических операторов и эквиваленты для Visual Basic 6.0:

Мматематическое выражение	Эквивалент в VB 6.0
C=A+B	intC = intA + intB
Area=XY	lngArea = lngX * lngY
Det=B2+4AC	dblDet = dblB ^ 2 + 4 * A * C

Обратите внимание на префиксы, которые используются перед переменными в Visual Basic 6.0, их назначение смотрите далее (см. Именование переменных и элементов управления).

Лабораторный практикум Лабораторная работа 4.1. Инициализация переменных и констант.

Задание: Написать приложение, в котором будут объявляться константы и переменные, а затем их содержимое выведется на экран в окне сообщений.

1. Запустите Visual Basic 6.0 (см. Запуск Visual Basic 6.0.).

2. Выберите тип проекта StandardEXE и нажмите кнопку Открыть.

Появится среда разработки Visual Basic. Должна быть доступна панель элементов управления (см. Панель элементов управления) и открыт конструктор форм (см. Конструктор форм)

3. Создайте на форме элементы управления, как показано на рисунке 4.2.

Рисунок 4.2. Элементы управления и их свойства к лабораторной работе 4.1.

4. Перейдите в редактор кода и напишите код следующий код:

Private Const PI As Double = 3.14159

Private Const MESSAGE As String = "Привет Мир!!!"

Private Sub cmdInitConsts_Click()

MsgBox "Содержимое константы PI:" & PI

MsgBox "Содержимое константы MESSAGE:" & MESSAGE

End Sub

Private Sub cmdInitVars_Click()

Dim bolVar1 As Boolean

Dim intVar2 As Integer

Dim dblVar3 As Double

Dim strVar4 As String

bolVar1 = True

MsgBox "Содержимое переменной bolVar1:" & bolVar1

intVar2 = 10

MsgBox "Содержимое переменной intVar2:" & intVar2

dblVar3 = 12.568266

MsgBox "Содержимое переменной dblVar3:" & dblVar3

strVar4 = "Привет Мир!!!"

MsgBox "Содержимое переменной strVar4:" & strVar4

End Sub

5. Запустите приложение.

Результат работы приложения: по клику на кнопку с надписью «Инициализация констант» в окне сообщения последовательно появятся сообщения с содержимым констант PI и strMessage. При клике на кнопку с надписью «Инициализация переменных» последовательно появятся сообщения с содержимым переменных bolVar1, intVar2, dblVar3 и strVar4.