Самоучитель VBA


         

Практика



В данном приложении решается задача нахождения размера постоянных платежей по выданной в долг сумме на фиксированный срок под фиксированные проценты. Приложение рассчитывает размер выплат для различных процентных ставок, изменяющихся от начальной до конечной с указанным шагом.

Рис. У9.1. Диалоговое окно Периодических выплат

Кроме того, приложение строит диаграмму, показывающую зависимость величины выплат от процентной ставки. Тип диаграммы можно задать, выбирая переключатель из группы диаграмма диалогового окна Периодических выплат (рис. У9.1). Результат табуляции зависимости размера выплат от процентной ставки выводится в элемент управления ListBox диалогового окна и на рабочий лист (рис. У9.2).

Рис. У9.2. Отчет, создаваемый приложением на рабочем листе

Обсудим, как приведенная ниже программа решает описанную задачу и что в ней происходит.

UserForm Initialize

  1. Активизирует диалоговое окно.

  2. Назначает клавише <Esc> функцию кнопки Отмена, а клавише <Enter> — вычислить, а также задает тексты всплывающих подсказок для этих кнопок и кнопки Очистка.

    Устанавливает изначально переключатель гистограмма. Проверяет наличие на диске файла, отображаемого в элементе управления image при данном выборе переключателя. Если такого файла нет, то информирует об этом пользователя, но тем не менее программа продолжает свою работу без загрузки отсутствующего файла. Если файл есть, изображение, содержащееся в этом файле, выводится в элементе управления image.

Нажатие кнопки Вычислить запускает на выполнение процедуру

CommandButtonl_Click

  1. Проверяет, являются ли вводимые данные числами. В случае ошибки отображает соответствующее сообщение.

  2. Проверяет согласованность вводимых данных. В случае ошибки отображает соответствующее сообщение (рис. У9.3).

  3. Вводит на рабочий лист заголовки записей и их форматирует.

  4. Определяет число точек, в которых будут табулироваться процентные ставки.

  5. Последовательно находит размеры выплат для очередной процентной ставки, меняющейся от начального значения до конечного с указанным шагом. Результаты вычислений выводит на рабочем листе и в двумерный массив ЭлементыСписка, число строк которого равно числу процентных ставок. В первый его столбец выводятся процентные ставки, а во второй -величины соответствующих выплат.

  6. На основе массива ЭлементыСписка заполняется список, предварительно очищенный от ранее введенных в него элементов.

    В соответствии с установленным переключателем из группы диаграмма при помощи процедуры график строится выбранная диаграмма.

<

Содержание  Назад  Вперед