Содержание
-
Условные операторыв VBA
-
Условный оператор If ... Then Оператор выбора (условный оператор) используется в программе, когда надо в зависимости от определенного условия выполнить те или иные действия.
-
Общий вид (полная форма): If Then Else Смысл: если условие верно, то надо выполнить оператор 1, иначе – надо выполнить оператор 2. If …Then …Else Если … То …Иначе
-
Общий вид (сокращенная форма без Else): If Then
-
Примеры Кабак Е.В. If a>b Then x = 3 Else x = 5 If x > n^2 Then x = “Информатика”
-
Условие в операторе If является логическим выражением, истинность которого проверяется. Оно может принимать два значения:True(истина, да) и False(ложь, нет). Условие может быть простым и сложным (составным). Сложное условие состоит из нескольких простых, объединенных логическими операциями (And, Or, Not).
-
Операции отношения
-
Основные логические операции And (И) , Or (Или), Not (Не) Применяются в логических выражениях для записи составных условий
-
А и В – логические выражения
-
Примеры x > y a b x >= 1 And x 3 верно при b ] -∞; 3[ U ] 3;∞; [ Not (x
-
Оператор IF может быть записан в строчной или блочной форме Строчная IfУсловиеThenОператор1ElseОператор2
-
Блочная форма IfУсловиеThen Оператор1 Else Оператор2 End If Блочный условный оператор заканчивается строкой с ключевым словомEndIf
-
Блочная (полная) форма IfУсловиеThen Оператор1 Оператор2 ... ОператорN Else Оператор1 Оператор2 ... ОператорN End If Группа операторов, которая выполняется, если условие истинно Группа операторов, которая выполняется, если условие ложно
-
Блочная (сокращенная) IfУсловиеThen Оператор End If
-
Блочная (сокращенная) IfУсловиеThen Оператор1 Оператор2 ... ОператорN End If
-
Пример Для x=0,5n=5,5 y=32 вычислить:
-
Dim x As Single, y As Single, w As Single, n As Single x=Val(InputBox(“х=”)) n=Val(InputBox(“n=”)) y=Val(InputBox(“y=”)) z = Sin(x) / Sqr(Abs(x + 1)) +x If x
-
Вычислить значение функции Y
-
Dimx As Single, n As Single, y As Single x = Val(InputBox("Введите x ")) n = Val(InputBox("Введите n")) If x >= 0 And n >= 0 Then y = Sqr(x) If x
-
Вычислить с использованием вложенных операторов If
-
Dimx As Single, y As Single x = Val(InputBox("Введите x")) If x 5 Theny = x ^ 2 Else y = Sqr(5 * x) EndIf MsgBoxy Решение 1
-
Dimx As Single, y As Single x = Val(InputBox("Введите x")) If x =0 Andx
Нет комментариев для данной презентации
Помогите другим пользователям — будьте первым, кто поделится своим мнением об этой презентации.