Составители:
Рубрика:
20 21
x = x + dx
i = i + 1
If x <= xk + e Then GoTo 10
End Sub
Некоторые комментарии к программе:
в программе в логическом выражении x <= xk + e использует-
ся цифровая константа e = 0.001, применение которой обеспечива-
ет получение спектра значений X от -1 до 0.3 включительно;
в тексте программы встречаются обращения к приложению,
например, Cos(Application.WorksheetFunction.Pi), которое озна-
чает, что для вызова функции π последовательно обращаются сна-
чала к
приложению Application, затем к функциям рабочего листа
WorksheetFunction и, наконец, к конкретной функции Pi;
чтобы не допустить ошибки в этой достаточно сложной грам-
матической конструкции, следует воспользоваться возможностя-
ми дружественного интерфейса VBA, для чего в тексте програм-
мы написать Cos(Application., и после постановки точки появится
подменю разделов Приложения (рис. 4.2).
Рис. 4.2
После точки следует добавить букву W, и тогда в подменю поя-
вится раздел WorksheetFunction (рис. 4.3).
Выбрать раздел WorksheetFunction, после чего поставить точ-
ку и в появившемся подменю списка функций рабочего листа вы-
брать функцию Pi, рис. 4.4.
Рис. 4.3
Рис. 4.4
Продолжить запись арифметического выражения Cos(Appli-
cation.WorksheetFunction.Pi в соответствии с выполняемым зада-
нием.
5. ПОСТРОЕНИЕ ПОВЕРХНОСТИ
Лабораторная работа «Построение поверхности» также состо-
ит из двух частей:
табулирование функции поверхности в Excel;
табулирование функции поверхности в VBA.
Критерием правильности является совпадение полученных
таблиц.
Страницы
- « первая
- ‹ предыдущая
- …
- 9
- 10
- 11
- 12
- 13
- …
- следующая ›
- последняя »