Створення таблиць, запитів, форм, звітів, макросів та модулів в середовищі MS Access 7 (Лабораторний цикл), страница 14

    Группа = Группа - Разряд * 100

    If Группа > 19 Then

        Разряд = Группа \ 10

        Пропись = Пропись & " " & Десятки(Разряд)

        Остаток = Остаток - Разряд * 10 * 1000

        Группа = Группа - Разряд * 10

    End If

   Разряд = Группа

   Пропись = Пропись & " " & Единицы(Разряд, "Женский")

   Остаток = Остаток - Разряд * 1000

   Пропись = Пропись & " " & Тысячи(Разряд)

End If

Группа = Остаток

If Группа <> 0 Then

    Разряд = Группа \ 100

    Пропись = Пропись & " " & Сотни(Разряд)

    Остаток = Остаток - Разряд * 100

    Группа = Группа - Разряд * 100

    If Группа > 19 Then

        Разряд = Группа \ 10

        Пропись = Пропись & " " & Десятки(Разряд)

        Остаток = Остаток - Разряд * 10

        Группа = Группа - Разряд * 10

    End If

  Разряд = Группа

  Пропись = Пропись & " " & Единицы(Разряд, "Женский")

  Остаток = Остаток - Разряд

  Пропись = Пропись & " " & Гривны(Разряд)

End If

СуммаПрописью = Пропись

End Function

Відкомпілюйте модуль, натиснувши кнопку  .

Функція «СуммаПрописью» дозволяє перевести «Общую сумму» у символьну константу. При цьому використовуються глобальні аргументи «Сумма», «Остаток», об'явлені у третьому рядку модуля. Функція використовує допоміжні функції «Тысячи», «Сотни», «Десятки», «Единицы», «Гривны» для перекладу окремих розрядів «Общей Сумми» у число прописом.

У звіті «Лист продаж» додайте поле в область «Примечание отчета». Змініть надпис на «Сумма прописью». У полі введіть вираз, який викликає функцію модуля =СуммаПрописью(Sum([Цена])).

5.3.6 Створення макросів для власної БД

Для власної БД створіть відповідні макросі для відкриття форм та звітів, що були створені раніше. Створіть головну форму БД по типу „Панели управления” та організуйте дружній інтерфейс роботи з Вашою БД. Приклад організації інтерфейсу з користувачем для БД індивідуальних телефонів міста дивись у додатку Б.

5.4 Зміст звіту

Звіт повинен містити: мету работи, порядок виконання, отримані макроси для власної БД, форму “Панель управления”, висновки з роботи.

5.5 Контрольні питання та завдання

1. Що таке макрос у MS Access?

2. У чому полягає особливість макросу з ім'ям AutoExec?

3. Для чого використовуються модулі у MS Access?

ДОДАТОК А

Перелік предметних галузей для створення власної БД

1	галузь авіарейсів та продажу авіаквитків;
2	галузь автотранспортного підприємства;
3	галузь аудіо записів;
4	галузь видів спорту;
5	галузь відбіркового турніру європейського чемпіонату з футболу ;
6	галузь відділу кадрів;
7	галузь відділу періодичних видань ;
8	галузь відділу художної літератури;
9	галузь відеофільмів;
10	галузь вузів;
11	галузь географічних об'єктів;
12	галузь деканату;
13	галузь диспетчерської обчислювального центу ВУЗу;
14	галузь дошкільного закладу;
15	галузь жеку;
16	галузь залізничного вокзалу;
17	галузь індивідуальних споживачів електроенергії;
18	галузь індивідуальних телефонів міста;
19	галузь кафедри;
20	галузь комп'ютерних ігор;
21	галузь країн світу;
22	галузь лікарських рослин;
23	галузь літературних творів;
24	галузь міфологічних персонажів;
25	галузь музичних творів;
26	галузь обслуговування клієнтів пральні;
27	галузь органічних речовин;
28	галузь  педіатричного відділення поліклініки;
29	галузь побутової техніки ;
30	галузь стрілецької зброї;
31	галузь творів архітектури ;
32	галузь творів живопису ;
33	галузь творів скульптурного мистецтва;
34	галузь школи ;
35	галузь ювелірних виробів;
36	галузь яхт.