Обработка объектов СУБД MS Access
Контрольные вопросы
Задание
1. Выполните постановку задачи, опишите экономико-математическую модель и метод решения, составьте алгоритм решения и представьте их преподавателю.
2. В соответствии с вариантом задания (см. табл.5) создайте пользовательскую функцию вычисления значения финансового выражения, позволяющую выполнять логическую проверку параметров на соответствие типов данных, на критические и недопустимые значения (см. Пример 4).
3. Откомпилируйте программу (меню DebugàCompile) и в случае необходимости устраните синтаксические ошибки.
4. Из окна Immediate Window(редактор VBA à меню View à Immediate Window) обратитесь к функции (например, командой ?ИНОРМА(2500,2590,#01.01.14#,#12.29.14#)) и проверьте ее работоспособность, в том числе с критическими и недопустимыми значениями параметров и несоответствующими типами данных.
Замечание: при обращении к функции из окна Immediate Window для корректной ее работы параметры типа дата следует вводить в американском формате: #ММ/ДД/ГГ#.
5. Создайте пользовательскую форму для обращения к функции, для чего:
Запустите конструктор форм и создайте форму, аналогичную представленной в прилож. 15;
При задании свойств полей не забудьте учесть форматы входных и выходных данных;
Закрепите за кнопками процедуры, аналогичные представленным ниже:
Private Sub Кнопка17_Click() ‘Кнопка «Очистить»
With Forms![Для_финансовой_функции]
![Поле1].Value = Empty
![Поле5].Value = Empty
![Поле7].Value = Empty
![Поле9].Value = Empty
![Поле15].Value = Empty
'Фокус на поле1
DoCmd.GoToControl "Поле1"
End With
End Sub
Private Sub Кнопка20_Click() ‘Кнопка «Рассчитать»
With Forms![Для_финансовой_функции]
![Поле15].Value = ИНОРМА(![Поле1].Value, _
![Поле5].Value, _
![Поле7].Value, _
![Поле9].Value)
End With
End Sub
Private Sub Кнопка26_Click() ‘Кнопка «Закрыть»
DoCmd.Close acForm, "Для_финансовой_функции"
End Sub
6. Проверьте и в случае необходимости отладьте работу формы и представьте результаты преподавателю.
Таблица 5
Варианты заданий
| № варианта | Задание |
Создать пользовательскую функцию расчета дохода по казначейскому чеку. Расчет выполняется по следующей формуле:
 , руб,
где: цена – цена казначейского чека на 100 руб номинальной стоимости, руб; цена>0;
дата_вступ – дата погашения для казначейского чека;
дата_согл – дата соглашения для казначейского чека; дата_вступ не должна превышать дата_согл более чем на год; дата_вступ> дата_согл.
| |
Создать пользовательскую функцию расчета накопленного дохода по ценным бумагам, процент по которым выплачивается в срок погашения. Расчет выполняется по следующей формуле:
 ; руб,
где: номинал – номинальная стоимость ценных бумаг, руб; номинал>0;
ставка – годовая процентная ставка для купонов по ценным бумагам; ставка>0;
дата_погаш – дата погашения ценных бумаг;
дата_вып – дата выпуска ценных бумаг; дата_погаш>дата_вып;
Т – число дней в году.
| |
Создать пользовательскую функцию расчета суммы, полученной к сроку вступления в силу полностью обеспеченных ценных бумаг. Расчет выполняется по следующей формуле:
 ; руб,
где: инвестиция – объем инвестиции в ценные бумаги, руб; инвестиция>0;
скидка – процентная норма скидки для ценных бумаг; скидка>0;
дата_вступ – дата погашения для ценных бумаг;
дата_согл – дата согласования для ценных бумаг;
дата_вступ> дата_согл;
Т – число дней в году.
| |
Создать пользовательскую функцию расчета нормы скидки для ценных бумаг. Расчет выполняется по следующей формуле:
 ; %,
где: выкуп – выкупная цена ценных бумаг за 100 рублей номинальной стоимости, руб; выкуп>0;
цена – стоимость ценных бумаг за 100 рублей номинальной стоимости, руб; цена>0;
дата_вступ – дата погашения для ценных бумаг;
дата_согл – дата согласования для ценных бумаг; дата_вступ> дата_согл;
Т – число дней в году.
| |
Создать пользовательскую функцию расчета цены за 100 рублей номинальной стоимости для казначейского чека. Расчет выполняется по следующей формуле:
 ; руб,
где: скидка – процентная норма скидки для казначейского чека; скидка>0;
дата_вступ – дата погашения для ценных бумаг;
дата_согл – дата согласования для ценных бумаг; дата_вступ> дата_согл;
Т – число дней в году.
| |
Создать пользовательскую функцию расчета цены за 100 рублей нарицательной стоимости ценных бумаг, по которым доход выплачивается в срок вступления в силу. Расчет выполняется по следующей формуле:
 ; руб,
где: ставка – процентная ставка дохода по ценным бумагам на дату выкупа; ставка>0;
доход – годовой доход по ценным бумагам, руб; доход>0;
дата_вып – дата выпуска ценных бумаг;
дата_вступ – дата погашения для ценных бумаг;
дата_согл – дата согласования для ценных бумаг; дата_вступ> дата_согл> дата_вып;
Т – число дней в году.
| |
Создать пользовательскую функцию расчета цены за 100 рублей номинальной стоимости ценных бумаг, на которые сделана скидка. Расчет выполняется по следующей формуле:
 ; руб,
где: погаш – выкупная цена ценных бумаг за 100 рублей номинальной стоимости, руб; погаш>0;
скидка – процентная норма скидки для ценных бумаг, скидка>0;
дата_вступ – дата погашения для ценных бумаг;
дата_согл – дата согласования для ценных бумаг; дата_вступ> дата_согл;
Т – число дней в году.
| |
Создать пользовательскую функцию расчета фактической годовой процентной ставки. Расчет выполняется по следующей формуле:
 ; %,
где: номин_ставка – номинальная годовая процентная ставка; номин_ставка>0;
периодов_в_году – целое число периодов, составляющих год; периодов_в_году>0.
| |
Создать пользовательскую функцию расчета амортизации имущества для указанного периода. Расчет выполняется по следующей формуле:
 ; руб,
где: стоим – начальная стоимость имущества, руб; стоим>0;
ост_стоим – остаточная стоимость имущества в конце периода амортизации, руб; ост_стоим>0;
время_эксплуатиции – количество периодов, за которые собственность амортизируется;
период – указанный период, для которого рассчитывается амортизация (должен измеряться в тех же единицах, что и время_эксплуатации).
| |
Создать пользовательскую функцию расчета значения наращенного капитала с учетом дисконтирования. Расчет выполняется по следующей формуле:
 ; руб,
где: капитал – текущий размер вложенного капитала, руб; капитал>0;
норма – коэффициент дисконтирования или норма доходности, в долях единицы; норма>0;
тек_год – текущий год;
персп_год – перспективный год.
|
1. Как осуществляется передача параметров в функцию?
2. В чем заключается отличие между процедурой и функцией?
3. Объясните назначение стандартных функций, использованных в программе (см. Пример 4).
4. Каким образом осуществляется расчет числа дней в указанном пользователем году (см. Пример 4)?
5. В электронной таблице MS Excel найдите встроенную финансовую функцию, аналогичную созданной Вами. Обратитесь к ней и сравните пользовательский интерфейс и результаты расчетов. Выводы сообщите преподавателю.
6. *Предложите свой вариант расчета числа дней в году.
Цель работы –изучение способов обработки объектов СУБД MS ACCESS средствами языка программирования VBA.
После выполнения работы студент должен знать основы обработки объектов СУБД MS ACCESS, уметьсоздавать пользовательские приложения автоматизированной обработки информации средствами СУБД MS ACCESS.