При этом учесть следующее: условия поездки могут быть: в одну сторону, туда и обратно, можно сесть на чужую машину (данные условия учитываются в раскрывающемся списке «условия поездки» на создаваемой форме).
Рис. 68. Примерный формат вывода заявления в документ word
Полученный результат вычисляется по формуле:
Результат = расстояние * (потребление бензина на 100 км) / 100*цену бензина за литр.
Учесть, что если выбрали условие поездки «на чужой машине», то цена бензина равняется 0 руб.
Рис. 69. Разработанная форма примера 32 в рабочем состоянии
Также учесть, что если при вычислении результат превысит 400 руб., то выдать сообщение «Может, пойдем на рынок?».
При создании формы придерживаться рис. 69, при выводе текста в документ Word – рис. 70.
Рис. 70. Примерный формат вывода расчетов в документ word
Рис. 71. Разработанная форма примера 33 в рабочем состоянии
При вычислении придерживаться следующих формул:
если схема вычисления простая, то
Доход = внесенная сумма + внесенная сумма * процентную ставку/100*срок/360;
если схема вычисления сложная, то
Доход = внесенная сумма + внесенная сумма * процентную ставку/100*срок/360 +0,01*(внесенная сумма * процентную ставку/100*срок/360).
При разработке интерфейса формы опираться на приведенный рис. 71, а при выводе расчетов в документ Word – рис. 72.
На настоящий момент гражданин(ка) Евсеева Ольга Константиновна имеет на своем счету по простым процентам при начальной сумме вложения 1000 руб. за 150 дней при 2 %-ной ставке 1008,33 руб.
Рис. 72. Примерный формат вывода расчетов в документ word
Результат вычислений с соответствующими пояснениями выводится в документ Word, а в поле формы выдается числовой результат произведенных расчетов.
При работе придерживаться приведенных рис. 73 и 74.
Курсивом выделены выражения, вставляемые программой после того, как будут заполнены соответствующие текстовые поля разрабатываемой формы.
Рис. 73. Разработанная форма примера 34 в рабочем состоянии
Рис. 74. Примерный формат вывода заявления в документ word
Глава 6
Автоматизация стандартных документов
6.1. Встроенные диалоговые окна
В VBA существуют две возможности создания диалоговых окон, позволяющих вести интерактивный диалог с пользователями.
Окно сообщений MsgBox выводит простейшие сообщения для пользователя, а окно ввода InputBox обеспечивает ввод информации.
Функция InputBox выводит на экран диалоговое окно, содержащее сообщение и поле ввода, устанавливает режим ожидания ввода текста пользователем или нажатия кнопки, а затем возвращает значение типа String, содержащее текст, введенный в поле.
Синтаксис:
InputBox(сообщение [,заголовок] [,default] [,xpos] [,ypos])
Аргументы: