Лабораторная работа 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.