- •Глава 1. Знакомство с Microsoft Visual Basic 6.0. 5
- •Глава 2. Визуальное программирование. 13
- •Глава 3. Событийное программирование. 18
- •Глава 4. Типы данных, константы и переменные. 23
- •Глава 5. Основы программирования. 29
- •Глава 6. Массивы. 38
- •Глава 7. Стандартные элементы управления 43
- •Об учебнике
- •Структура книги
- •Обозначения
- •Глава 1. Знакомство с Microsoft Visual Basic 6.0.
- •Обзор Visual Basic 6.0
- •Область применения Microsoft Visual Basic 6.0.
- •Запуск Visual Basic 6.0.
- •Интегрированная среда разработки (ide) Visual Basic 6.0
- •Главное меню
- •Стандартная панель инструментов
- •Панель элементов управления
- •Окно проводника проекта Project explorer
- •Конструктор форм
- •Окно свойств элементов управления (Properties)
- •Редактор кода
- •Окно просмотра объектов (Object Browser)
- •Окно отладчика (Immediate)
- •Глава 2. Визуальное программирование. Стандартные элементы управления.
- •Свойства элементов управления в режиме дизайна приложения1
- •Лабораторный практикум. Лабораторная работа 2.1. Создание элементов управление на форме.
- •Лабораторная работа 2.2. Работа со свойствами элементов управления в режиме дизайна проекта
- •Глава 3. Событийное программирование. Вступление
- •События элементов управления.
- •Свойства элементов управления в режиме выполнения приложения.2
- •Лабораторный практикум. Лабораторная работа 3.1.
- •Лабораторная работа 3.2. Работа со свойствами элементов управления в режиме выполнения приложения (Чтение свойств).
- •Лабораторная работа 3.3. Работа со свойствами элементов управления в режиме выполнения приложения (Изменение свойств).
- •Глава 4. Типы данных, константы и переменные. Типы данных в Visual Basic
- •Константы
- •Встроенные константы Visual Basic
- •Объявление констант
- •Переменные
- •Математические операторы
- •Лабораторный практикум Лабораторная работа 4.1. Инициализация переменных и констант.
- •Лабораторная работа 4.2. Использование математических операторов.
- •Лабораторная работа 4.3. Использование математических операторов для расчета математических формул.
- •Глава 5. Основы программирования. Управляющие операторы Visual Basic
- •Конструкция If... Then
- •Конструкция If... Then... Else
- •Конструкция Select Case
- •Операторы цикла
- •Цикл с использованием конструкции For..Next
- •Цикл с использованием конструкции Do...Loop
- •Цикл с использованием конструкции For Each... Next
- •Встроенные функции
- •Строковые функции:
- •Функции преобразования типа данных:
- •Математические функции:
- •Тригонометрические функции
- •Лабораторный практикум Лабораторная работа 5.1. Алгоритмы ветвления с применением оператора If.
- •Лабораторная работа 5.2. Алгоритмы ветвления с применением оператора Case.
- •Лабораторная работа 5.3. Циклы с применением оператора For…Next.
- •Лабораторная работа 5.4. Циклы с применением оператора Do…Loop.
- •Глава 6. Массивы. Массивы
- •Объявление массива фиксированного размера
- •Объявление динамического массива
- •Лабораторный практикум Лабораторная работа 6.1. Использование статических массивов.
- •Лабораторная работа 6.2. Использование динамических массивов.
- •Лабораторная работа 6.3. Операции с матрицами ### Глава 7. Стандартные элементы управления Элемент управления List Box
- •Добавление элементов в список
- •Удаление элементов из списка
- •Доступ к элементам списка
- •Элемент управления ComboBox
- •Стили отображения ComboBox
- •Добавление элементов в список типа ComboBox
- •Удаление элементов из списка типа СоmbоВох
- •Доступ к элементам списка
- •Элемент управления Timer
- •Элемент управления Frame
- •Создание группы элементов
- •Полосы прокрутки
- •Размещение полосы прокрутки и настройка свойств
Конструкция Select Case
Конструкция Select case позволяет обрабатывать в программе несколько условий и аналогична блоку конструкций if.. .Then.. .Else. Эта конструкция состоит из анализируемого выражения и набора операторов case на каждое возможное значение выражения. Работает эта конструкция следующим образом. Сначала Visual Basic вычисляет значение заданного в конструкции выражения. Затем полученное значение сравнивается со значениями, задаваемыми в операторах case конструкции. Если найдено искомое значение, выполняются команды, приписанные данному оператору case. После завершения выполнения конструкций управление будет передано конструкции, следующей за ключевым словом End Select.
Синтаксис конструкции Select Case следующий:
Select Case <СравниваемоеЗначение>
Case Значение1
<Конструкция1>
Case Значение2
<Конструкция2>
. . .
Case Else
<КонструкцияN>
End Select
В начале конструкции расположены ключевые слова Select Case, указывающие, что расположенный рядом с ними параметр сравниваемоеЗначение будет проверяться на несколько значений. Далее следуют группы команд. начинающиеся с ключевого слова Case. Если параметр CравниваемоеЗначение равен значению, указанному в текущем операторе Case, то будут выполняться команды, расположенные между этим и следующим ключевым словом Case.
В качестве примера воспользуемся конструкцией Select Case для решения предыдущей задачи:
Select Case x
Case 1 То 9
MsgBox "Значение больше 0"
Case 0
MsgBox "Значение равно 0"
Case -9 То -1
MsgBox "Значение меньше 0"
End Select
Операторы цикла
В программах Visual Basic 6.0 для выполнения повторяющихся действий используются циклы. Они бывают следующих типов:
-
For...Next
-
For Each...Next
-
Do. . . Loop
Рассмотрим перечисленные конструкции.
Цикл с использованием конструкции For..Next
Конструкция For...Next выполняет последовательность команд определенное число раз. Такую конструкцию называют циклом, а выполняемые ею программные коды — телом цикла.
Синтаксис конструкции For.. .Next следующий:
For Счетчик = НачальноеЗначение То КонечноеЗначение [Step Шаг]
Конструкции
[Exit Do]
Next [Счетчик]
Например:
For lngCounter = 1 To 10 Step 2
txtCounter.Text = txtCounter.Text & lngCounter
Next lngCounter
Ключевое слово Exit For применяется для преждевременного завершения цикла, т.е. когда счетчик не доходит до конечного значения.
Цикл с использованием конструкции Do...Loop
Цикл, задаваемый конструкцией Do... Loop, выполняется до тех пор, пока истинно задаваемое в цикле условие.
Синтаксис конструкции Do. .Loop следующий:
-
С предусловием:
Do [{While | Until} Условие]
Конструкции
[Exit Do]
Loop
-
С постусловием:
Do
Конструкции
[Exit Do]
Loop [{While | Until} Условие]
Пример использования конструкции приведен ниже:
nCounter = 2
Do While nCounter < 10
nDecades(nCounter) = nCounter * 2
nCounter = nCounter * 2
Loop
Ключевое слово Exit Do применяется для преждевременного завершения цикла.
Цикл с использованием конструкции For Each... Next
Цикл с использованием конструкции For Each...Next похож на цикл For.. .Next, но используется для обработки всех элементов некоторого набора объектов или массива. Его особенно удобно использовать в том случае, когда количество обрабатываемых элементов не известно.
Синтаксис конструкции For Each.. .Next следующий:
For Each Элемент In Группа
Конструкции
Next Элемент
Пример использования конструкции приведен ниже:
Dim objControl As Control
For Each objControl In Controls
objControl.Caption = "Test " & objControl.Caption
Next objControl