2 Операторы
2.1 Оператор присваивания (=)
Оператор присваивания позволяет задать (присвоить) переменной значение другой переменной, выражения или объекта.
Синтаксис: <переменная> <выражение>
Порядок выполнения: вычисляется значение <выражения> и присваивается полученное значение <переменной> (вычисляется значение выражения, стоящего справа от знака присваивания, и присваивается переменной, стоящей слева от знака присваивания).
Изображение в блок – схеме:
П
ример.
Вычислить значение функции
f(x,y)=|x|+sin2(y+5).
Public Sub prog1()
Dim x As Double, y As Double Dim f As Double x=CDbl(InputBox("Введите х")) y=CDbl(InputBox("Введите y"))
f = Abs(x) + Sin(y + 5) ^ 2
MsgBox "Результат = " & f
End Sub |
Заголовок процедуры prog1 (начало программы) Описание переменных: переменные x,y,f вещественного типа (Double) Ввод значений х и у. Функция InputBox выводит на экран окно с полем ввода и сообщением «Введите х» и возвращает значение типа строка (String). Для преобразования вводимого значения к вещественному типу – Double- используется функция CDbl. Вычисление значения переменной f: функция Abs(аргумент) возвращает модуль аргумента, Sin(аргумент) – синус аргумента, ^ - степень числа. Процедура MsgBox выводит на экран окно сообщений с текстом «Результат = 12» (если f=12). Конец программы. |
Р
исунок
6 - Блок-схема программы prog1
2.2 Условный оператор (If…Then…Else…End If)
Условный оператор позволяет выбирать и выполнять действия в зависимости от истинности некоторого условия.
Синтаксис: условный оператор имеет два варианта синтаксиса:
a) однострочная форма записи условного оператора:
If <условие> Then [<операторы 1>] [Else [<операторы 2>]];
б) блочная форма записи условного оператора:
If <условие 1> Then
[<операторы 1>]
. . .
[ElseIf <условие n> Then
[<операторы n> ]…
[Else]
[<ИначеОператоры>]]
End If.
П
орядок
выполнения: вычисляется значение
<условие>. Оно может принимать
значения TRUE (Истина)
или FALSE (Ложь).
Если <условие> принимает значение
TRUE, то выполняются
[<операторы 1>] (операторы ветки
Then), в противном случае
- [<операторы 2>] (операторы ветки
Else).
Изображение в блок – схеме:
Пример. Определить вид введенного числа – положительное, отрицательное или ноль.
Public Sub prog2() Dim x As Double Dim s As String x=Worksheets(1).Range("A1")
If x > 0 Then s = "положительное" ElseIf x = 0 Then s = "ноль" Else s = "отрицательное" End If
Worksheets(1).Range("C2")=s End Sub |
Описание переменной строкового типа Ввод значения переменной х. Значение располагается на Листе1 (Worksheets(1)) в ячейке А1 (Range ("A1")). Условный оператор. Если условие принимает значение True (Истина), то выполняется оператор присваивания ветки Then (s=”положительное”) и завершается условный оператор, в противном случае проверяется второе условие: x=0. Если условие True, то s присваивается значение “нуль”, иначе – “отрицательное”.
Вывод результата–s–на лист1 в ячейку С2. |
Р
исунок
7 - Блок-схема программы prog2