- •Уфимский государственный нефтяной технический университет
- •Основные типы алгоритмических структур
- •Программирование на Microsoft Visual Basic 6.0
- •Основные термины Visual Basic
- •Разработка приложений в vb6
- •Разработка программного кода Тип, имя и значение переменной в Visual Basic
- •Функции в языке vb
- •Ввод, вывод
- •Конструкции управления
- •Графические возможности языка vb
- •Анимация
- •Общие процедуры. Область видимости процедур
- •Работа с массивами
- •Работа с файлами в vb
- •Основы объектно-ориентированного визуального программирования
- •Классы объектов, экземпляры класса и семейства объектов
- •Свойства объектов
- •Методы объектов
- •События
- •Visual Basic. Среда разработки приложения
- •Элементы управления и их свойства
- •Font(Шрифт) –выдает диалоговое окно, в котором можно устанавливать имя шрифта для метки, начертание и размер.
- •Текстовые окна (элементы Text Box)
- •Командная кнопка
- •Переключатель
- •Комбинированный список
- •Линейки прокрутки
- •Графические элементы управления
- •Меню пользователя
- •Стандартные диалоговые окна
- •Работа с фокусом
- •Работа с буфером обмена в vb
- •Работа с мышью
- •Использование клавиатуры
Конструкции управления
Зачастую в определенном месте программы необходимо выполнять те или иные операторы, в зависимости от некоторых условий. Эта возможность в VB реализуется при помощи управляющих конструкций, которые состоят из структур принятия решений и циклов.
Конструкция If…..Then
If условие Then оператор[Else орератор]
Когда результатом проверки условия является True(истина), то выполняется оператор, находящийся после служебного слова Then, если False(ложь), то выполняется оператор, следующий за ключевым словом Else, если оно отсутствует, то следующий по порядку оператор.
Если при выполнении условия требуется выполнить не один, а несколько операторов, то используется такая конструкция:
If условие Then
Операторы
End If
При необходимости выполнения того или иного оператора (или блока операторов) в зависимости от результата проверки определенного условия, используют такую конструкцию:
If условие Then
Операторы 1
Else
Операторы 2
End If
Или
If условие Then
Операторы 1
Else: Операторы 2
End If
Если определенное действие ( набор действий) нужно выполнять после проверки не одного, а нескольких условий, на языке VB следует использовать такую конструкцию:
If условие Then
Операторы 1
Else If условие 2 Then
Операторы 2
.
.
[Else
операторы N]
End If
Конструкция: IIf(условие, значение1, значение2)
Возвращает одно из двух значений, в зависимости от проверяемого условия.
Например:
Dim intA As Integer, StrA As String
intA=6
strA=IIf(intA Mod 2 = 0, “Четное”, “Нечетное”)
Конструкция Select Case
Когда существует несколько операторов (или блоков операторов), которые необходимо выполнять в зависимости от истинности того или иного условия, то запись конструкции If …Then окажется достаточно громоздкой и следует использовать структуру:
Select Case переменная
Case значение 1
Операторы1
Case значение 2
Операторы 2
.
[Case Else
операторы N]
End Select
Если переменная содержит значение1, то выполняется блок операторов 1 и т.д.
Например:
Select Case x
Case 1
x=x+1
Case 2, 3, 4
x=10
Case Else
x=20
End Select
Разновидности циклов
Цикл – это алгоритмическая структура, при помощи которой реализуется многократное повторение блоков операторов.
Цикл For….Next
Используется тогда, когда количество повторений заданного цикла известно заранее.
For счетчик = нач_значение To кон_значение [Step шаг]
Операторы1
[Exit For]
операторы2
Next [счетчик]
Служебное словосочетание Exit For используется для “аварийного” завершения цикла и используется в конструкции
If условие Then Exit For
Цикл Do…Loop
Применяется в том случае, когда число повторений операторов тела цикла заранее неизвестно.
Do Until условие
Операторы
Loop
Если результатом проверки условия является значение False, то блок операторы выполняется, иначе осуществляется переход на оператор, расположенный после служебного слова Loop.
Do While условие
Операторы
Loop
Если условие истинно, то происходит выполнение блока операторы, если же оно ложно, то цикл ни разу не выполняется.
Do
Операторы
Loop Until условие
Блок операторы выполняется до тех пор, пока результатом проверки условия является значение False, иначе выполнение цикла заканчивается.
Do
Операторы
Loop While условие
В случае ложности условия выполняется блок операторы, если же оно истинно, то происходит окончание цикла.
Цикл While…Wend
Используется, когда число повторений операторов тела цикла заранее неизвестно.
While условие
операторы
Wend
Если результатом проверки условия является истина, то блок операторы выполняется, иначе осуществляется переход на оператор, расположенный после служебного слова Wend.
