Введение в информатику процессов первичной переработки нефти. Новиков А.А - 78 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

77
Таблица 2.11
Управляющие инструкции VBA
Обозначение Назначение Применение
If-Then-Else
Выполняет одну группу инструкций, если со-
блюдено некоторое условие, либо другую груп-
пу инструкций, если условие не соблюдается
Разветвление по-
следовательной
программы на две
ветви
Select Case
В зависимости от значения некоторой перемен-
ной или результата проверки условия выполняет
одну из нескольких возможных групп инструк-
ций
Разветвление по-
следовательной
программы на не-
сколько ветвей
For-Next
Выполняет группу инструкций заданное число
раз
Циклические рас-
четы заданное чис-
ло раз
While-Wend
Выполняет группу инструкций, пока соблюдает-
ся некоторое условие
Циклические рас-
четы по выполняе-
мому условию
Do-Loop
Выполняет группу инструкций, пока соблюдает-
ся или не соблюдается некоторое условие
Циклические рас-
четы по невыпол-
няемому условию
For-Each-
Next
Выполняет действие над каждым объектом се-
мейства или элементом массива
Циклические рас-
четы над каждым
объектом семейст-
ва или элементом
массива
В следующих разделах действие этих инструкций рассмотрено более подробно.
2.9.1. Управляющая инструкция If-Then-Else
Управляющая инструкция If-Then-Else изменяет порядок выполнения инструк-
ций в зависимости от результатов проверки некоторого условия и позволяет сделать
разветвление на 2 ветви (одна ветвь располагается следом за служебным словом
Then, а другая следом за служебным словом Else).
Const
Sub Pro25()
Dim N As Integer
N = GetOilNumber
If N <1 Or N >10 Then
MsgBox «Вы ввели несуществующий номер компонента»
Else
MsgBox "Номер введенного Вами компонента = " & N & "."
End If
End Sub

Страницы