Информатика для I курса. Часть I. Никифоров С.Н. - 20 стр.

UptoLike

ВУЗ: 

СПбГАСУ | Санкт-Петербург

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

Рубрика: 

38 39
Рис. 6.13
z3 = Application.WorksheetFunction.Sum(b)
z4 = Application.WorksheetFunction.Sum(y)
s = (2 * z1 + 2 * z2 + 5 * z3 ^ 3) / (3 + z4)
End Function
Некоторые комментарии к программе:
в программе используются промежуточные переменные z1 – z4;
в программе можно ввести комментарии для каждой строки;
процесс отладки модуля можно выполнять по частям, для
чего соответствующим образом изменять последний оператор
присваивания, например s = z2.
После отладки программного модуля и внесения его в мастер
функций f
x
следует, находясь в ячейке G58, обратиться через ма-
стер функций f
x
к функции с именем s (см. рис. 6.7).
Так как функция s(X, Y, B) от трех параметров, то в появившем-
ся окне функции (рис. 6.13) в окне «X» указать адрес объекта (па-
раметра) X – B46:E46, в окне «Y» указать адрес объекта (параме-
тра) Y – B48:E48, а в окне «B» указать адрес объекта (параметра)
B – G47:H48.
Затем следует одновременно нажать клавиши Ctrl-Shift-Enter.
В
ячейке G58 появится ответ 549,625.
Таким образом, значение величины S для заданного примера,
вычисленное в VBA, равно 549,625.
7. ОПЕРАТОРЫ ЦИКЛА
Целью лабораторной работы «Операторы цикла» является осво-
ение грамматических конструкций VBA, обеспечивающих эффек-
тивную организацию циклических процессов.
Лабораторная работа «Операторы цикла» выполняется только
в среде VBA.
При этом одна и та
же разветвляющаяся функция G(x) из ранее
выполненной лабораторной работы «Табулирование разветвляю-
щейся функции» табулируется на листе Excel семь раз с использо-
ванием семи различных конструкций операторов цикла:
Do While … loop ;
Do Loop … while ;
Do Until … loop ;
Do Loop … until ;
While … wend ;
For … next ;
For Each … next .
Критерием правильности является совпадение полученных та-
блиц (рис. 7.1).
Excel

Страницы