ПХЯ У5 1 Диалоговое окно Нелинейное уравнение с параметром
пХЯ. У5.1. Диалоговое окно Нелинейное уравнение с параметром
О решаемом уравнении предполагается, что оно преобразовано к виду, когда только левая часть зависит от неизвестной и параметра. Правая же часть -постоянна. При вводе левой части уравнения в поле ввода элемента управления RefEdit вместо переменной х надо давать ссылку на ячейку В2, а вместо параметра — А2. Кроме того, формула должна быть составлена по тем же правилам, по которым пишутся формулы рабочего листа. Например, для упомянутого выше уравнения в поле надо ввести:
=В2^3-В2-А2
либо эквивалентную формулу с абсолютными ссылками на ячейки.
Обсудим, как приведенная ниже программа решает перечисленные задачи и что происходит в программе.
|
|
|
|
|
UserForm_Initialize
|
- Активизирует диалоговое окно.
-
Назначает клавише <Esc> функцию кнопки отмена, а клавише <Enter> - вычислить.
|
|
|
Нажатие кнопки вычислить запускает на выполнение процедуру
CommandButtonl_Click
|
- При выполнении щелчка в соответствующей ячейке в поле элемента управления Re f Edit вводится абсолютная ссылка на эту ячейку. При выделении ячейки с формулой и протаскивании ее маркера заполнения вниз вдоль столбца для получения корректного результата нужна не абсолютная, а относительная ссылка. С этой целью из строки с формулой, присвоенной строковой переменной Формула, удаляются все знаки $, тем самым превращая все абсолютные ссылки в относительные.
- Удаляются с рабочего листа ранее введенные данные и создаются заголовки полей отчета.
- Устанавливаются предельное число итераций и относительная погрешность метода Goal Seek.
- Методом DataSeries в диапазоне создается арифметическая профессия изменения значений параметра от начального до конечного значения с указанным шагом.
- Вводится начальное приближение в диапазон.
- Вводится в диапазон левая часть уравнения при различных значениях параметра.
- Последовательно для каждой ячейки, имеющей формулу с левой частью уравнения, методом GoalSeek, находится корень уравнения.
- Вызывается процедура ПостроениеГрафика для построения графика (Рисунок У5.2).
|
|
|
Нажатие кнопки отмена запускает на выполнение процедуру
CommandButton2 _Click
|
11 . Закрывает диалоговое окно.
|
|
|
Процедура
ПостроениеГрафика
|
12. Строит график.
|
|
|
|
|
|
Содержание Назад Вперед