Курсовая работа: Проект программного модуля для нахождения приближенного значения бесконечной суммы

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) 'Закрытие формы

Select Case MsgBox("Закрыть окно?", vbYesNo + vbQuestion, "Завершение работы")

Case vbYes

Cancel = 0

Application.Quit

Case vbNo

Cancel = -1

End Select

End Sub

4 Тестирование программного модуля

Для тестирования программы возьмем следующие данные:

a=-1, b=1, h=0,1.

Вводим исходные данные:

Рисунок 7. Пример ввода входных данных.

После нажатия кнопки «Вычислить сумму» мы получаем таблицу результатов, где для каждого значения аргумента рассчитано значение суммы ряда:

Рисунок 8. Таблица результатов.

Рисунок 9. График функции.

Заключение

Целью данной курсовой работы была разработка программного модуля для вычисления приближенного значения бесконечной суммы с точностью до Е=0.05, если x принимает значения на отрезке [a,b] с шагом h..

Тестирование показало, что результаты, полученные разработанным программным модулем, соответствуют теоретическим расчётам. В программе присутствует обработка ошибок. При вводе ошибочные данные игнорируются, а при отсутствии введенных данных выдаётся сообщение об ошибке. Курсовая работа выполнена в полном объеме в соответствии с заданием.

Список использованных источников

1 Биллинг В.А. VBA и Office 2000. Офисное программирование. – М.: «Русская редакция», 1999.

2 Гарнаев Ю.А. Использование MS Excel и VBA в экономике и финансах. – СПб: БХВ – Санкт-Петербург, 2002.

3 Гарнаев Ю.А. самоучитель VBA. – СПб: БХВ – Санкт-Петербург, 2002.

4 Васильев А. VBA в Office 2000: учебный курс – СПб: Питер, 2002.

5 Кузьменков В.Г. VBA 2002. – М.: Издательство БИНОМ, 2002.

6 MS Office XP: Разработка приложений/Под ред. Ф.А.Новикова – СПб: БХВ – Санкт-Петербург, 2003.