9. Добавление командной кнопки Расчет

– перейдите в режим конструктора формы;

– на Панели элементов (рис. 10.26) с помощью мыши выберите инструмент Надпись;

– создайте надпись с именем Расчет в нужном месте разрабатываемой формы "Платеж_Форма";

­– в контекстном меню выберите команду Свойства и в появившемся окне Надпись (рис. 10.42) в разделе Подпись введите РАСЧЕТ, а также задайте размеры и положение кнопки в форме (рекомендуемый набор параметров: Выравнивание текста: Подбор; Размер шрифта: 20; Насыщенность: полужирный; Ширина: 6 см; Высота 0,8 см; Тип границы: сплошная; Оформление: приподнятое);

– поскольку кнопка индивидуальная, да к тому же с помощью ее необходимо производить вычисления в форме Платеж_Форма, то для обеспечения ее работоспособности необходимо сформировать программу, реализующую действие кнопки. Методика разработки расчетных программ изложена в п.10.

10. Разработка программ для решения различных задач учета, статистики и анализа

Разработку программ для решения различных задач учета, статистики и анализа рассмотрим на примере формы "Платеж_Форма".

При нажатии на кнопку "Расчет" в форме "Платеж_Форма" должны рассчитываются совокупные показатели за все периоды:

• количество платежей;

• общая сумма налога исчисленная;

• общая сумма налога уплаченная;

• общая сумма задолженности;

• средняя сумма задолженности;

• максимальное значение платежа;

• минимальное значение платежа.

Результаты расчетов должны отражаться в созданных ранее полях формы "Платеж_Форма" (см. п. 4.3 – 4.6):

– КоличествоПлатежей

– СуммарныйНалогИсчисленный

– СуммарныйНалогУплаченный

– СуммарнаяЗадолжность

– СредняяЗадолжность

– МинимальныйПлатеж

– МаксимальныйПлатеж

Ниже приведен порядок создания расчетных формул (программы) для формы Платеж_Форма.

10.1. Переведите форму Платеж_Форма в режим Конструктора.

10.2. Щелчком правой кнопки мыши в поле формы вызовите контекстное меню (рис. 10.43), в поле которого выберите команду "Обработка событий".

10.3. В появившемся диалоговом окне "Построитель" (рис. 10.44) выберите "Программы", и нажмите кнопку "ОК".

Рис. 10.43. Контекстное меню

Рис. 10.44. Окно Построитель

10.4. Активизируется окно редактора Visual Basic (рис. 10.45).

Рис. 10.45. Окно редактора Visual Basic

10.5. В окно редактора Visual Basic (рис. 10.45) необходимо ввести текст программы для расчета показателей платежей, приведенный на рис. 10.46.

Рис. 10.46. Окно с кодом программы расчета показателей

10.6. Для ускорения выполнения работы текст программы расчета показателей приведен в табл. 10.5. Рекомендуется скопировать с помощью Буфера обмена текст программы из табл. 10.5 окно редактора Visual Basic (рис. 10.45).

Таблица 10.5

Текст программы для расчета показателей

	Option Compare Database Option Explicit Private Sub Надпись47_Click() Поле33 = DCount("НомерПлатежа", "Платеж") Поле35 = DSum("СуммаИсчисленная", "Платеж") Поле37 = DSum("СуммаУплаченная", "Платеж") Поле39 = DSum("Задолжность", "Платеж") Поле41 = DAvg("Задолжность", "Платеж") Поле43 = DMin("СуммаУплаченная", "Платеж") Поле45 = DMax("СуммаУплаченная", "Платеж") End Sub