Пример выполнения зачетного задания (Вариант 6)

Пример зачетного задания .xls

1. Исходная пользовательская форма

2. Лист рабочей книги с тарифами

3. Текст пользовательской функции, вычисляющей пени

Function vpeni(itogclgt, opl As Date, neobh As Date, procent)

If opl <= neobh Then

vpeni = itogclgt

ElseIf opl > neobh Then

vpeni = itogclgt + itogclgt * procent / 100

End If

End Function

Литература

1. Гарнаев А.Ю. Самоучитель VBA. Технология создания пользовательских приложений. БХВ. СПб. 1999.

2. Кен Гетц, Майк Джилберт. Программирование в Microsoft Office. Полное руководство по VBA. Перевод с английского языка. Киев. БХВ (BHV). 1999.

3. П. Сенна. Visual Basic для приложений в подлиннике. BHV. СПб.1998.

4. Б. Карпов. VBA. Специальный справочник. Питер. 2011.

5. Р. Михеев. VBA и программирование в MS Office для пользователей. BHV.2011

21