Similar presentations:
Линейные вычислительные процессы и разветвляющиеся алгоритмические структуры на языке VBA
1. Линейные вычислительные процессы и разветвляющиеся алгоритмические структуры на языке VBA
2. ПЛАН:
1. Оператор присваивания.2. Оператор REM.
3. Программы линейной структуры
на VBA
4. Конструкция IF... THEN... ELSE...
5. Программы разветвляющей
структуры на VBA
3.
1. Оператор присваиванияОператор LET присваивает значение
выражения переменной или свойству:
Общий вид оператора LET:
LET X=A
где LET – служебное слово
(переводится «пусть»); в программе
может быть опущено;
X- имя переменной или имя массива;
A- выражение арифметическое или
текстовое.
4.
Значение выражения может бытьприсвоено переменной, только
если оно имеет совместимый с этой
переменной тип данных.
Невозможно присвоить строковое
выражение числовой переменной
или числовое выражение
строковой переменной. Такая
попытка приведет к ошибке во
время компиляции.
5.
Для присвоения переменныхзаписей различных определяемыхпользователем типов используется
оператор LSet. Для присвоения
переменным ссылок на объекты
применяется оператор Set.
6. 2. Оператор REM REM - оператор с комментарием (от слова REMARK). Иногда вместо командного слова REM допустимо ставить одиночную
2. Оператор REMREM - оператор с комментарием
(от слова REMARK).
Иногда вместо командного слова
REM допустимо ставить одиночную
кавычку ’ – апостроф.
7. 3. Программы линейной структуры на VBA
Пример 1. Вычислить значение функции r=|c|cos3(b-7)
Private Sub CommandButton1_Click()
Начало программы
REM Программа линейной структуры
Комментарий к задаче
c=VAL(InputBox("Введите c"))
b=VAL(InputBox("Введите b"))
Ввод значений c и b. Функция InputBox выводит на экран окно с полем
ввода и сообщением «Введите c» и возвращает значение типа строка
(String). Для преобразования вводимого значения к числовому типу
используется функция VAL.
r = Abs(c) * cos(b-7)^3
Вычисление значения переменной r.
MsgBox "Результат = " & f
Процедура MsgBox выводит на экран окно сообщений с ответом.
End Sub
Конец программы.
8.
Блок-схема линейного алгоритма:начало
ввод c,b
r=|c|cos3(b-7).
вывод r
конец
Блок начала программы
Блок ввода
Блок оператора присваивания
Блок вывода
Блок конца программы
9.
Пример 2. Составить программу для вычислениязначения функции:
b 5c 2
x
c 8a 3
при b=15,2; c=8,7
Private Sub CommandButton1_Click()
REM Программа линейной структуры 2
а=VAL(InputBox("Введите а"))
b=15.2
с=8.7
x=(b-5*c^2)/(c+8*a^3)
MsgBox "Результат = " & x
End Sub
10. 4. Конструкция IF... THEN... ELSE... При составлении программ разветвляющего алгоритма используется конструкция для организации
4. Конструкция IF... THEN... ELSE...При составлении программ
разветвляющего алгоритма используется
конструкция для организации условного
перехода IF... THEN... ELSE...
(Если… То… Иначе…)
и безусловного перехода GOTO
(«перейти к»);
AND («и одновременно»);
11.
Оператор IF…THEN предписываетвыполнять некоторые действия только в
том случае, когда выполняется условие.
Это условие записывается в виде
логического выражения, а действия,
которые нужно выполнить, задаются с
помощью обычных операторов VBA.
Если выражение принимает значение
«истина», то действие, заданное
оператором выполняется. В противном
случае управление передается строке,
непосредственно следующей в
программе за оператором IF.