End Sub

End Sub

End Sub

Private Sub fam_Click()

‘ знищується вміст поля nn

nn.Value = ""

Private Sub nn_Click()

‘ знищується вміст поля fam

fam = ""

Рисунок 4.3 – Зразок роботи головної форми

Спочатку викликається головна форма (див. рис. 4.3). В одне з полів вводиться табельний номер або прізвище людини. Кнопка Знайти закриває головну форму і викликає форму tvidom з даними тільки про вказану людину (див. рис. 4.4).

Можна форму tvidom в режимі конструктора розмістити на головній формі. Тоді в коді програми буде зайвим рядок

DoCmd. OpenForm "tvidom",,, kriteria

Рисунок 4.4 – Зразок роботи форми tvidom

У вікні властивостей головної форми для об’єкту Подчиненная форма / отчет на вкладці Данные треба вказати елементи, за якими здійснюється зв’язок між формами, а саме:

Подчиненные поля	tn
Основные поля	nn

1.7 Індивідуальні завдання

Варіант 1

1) Створити звіт, який для кожного господарства – замовника виводить всі замовлення і підраховує загальну кількість поставлених добрив та їх вартість за кожен квартал поточного року.

Варіант 2

1) Створити звіт, який для кожного замовника виводить інфор­мацію про всі замовлення і підраховує загальну вартість перевезень та середню відстань для кожного виду транспорту.

Варіант 3

1) Створити звіт, який виводить всі замовлення і підраховує для кожного рівня сервісу та для кожного готелю кількість замовлень і за­гальну сплачену суму за проживання.

Варіант 4

1) Створити звіт, який виводить всі замовлення і підраховує для кожного постачальника загальну та середню вартість замовлених мате­ріалів за кожен місяць.

Варіант 5

1) Створити звіт, який для кожного споживача виводить інфор­мацію про всі платежі та підраховує загальну сплачену суму за кожен квартал поточного року та їх відсотки відносно загальної суми.

Варіант 6

1) Створити звіт, який для кожного магазину виводить інформа­цію про всі замовлення і підраховує загальну кількість партій постав­леної продукції та її вартість по місяцях.

Варіант 7

1) Створити звіт, який для кожного постачальника виводить перелік замовлених вузлів, підраховує їх загальну кількість та вартість для кожного місяця і для кожного постачальника.

Варіант 8

1) Створити звіт, який для кожного рейсу виводить інформацію про продані квитки та підраховує загальну кількість проданих квитків і середній розмір пільг щомісяця та для кожного рейсу.

Варіант 9

1) Створити звіт, який для кожного хірурга виводить інформа­цію про його пацієнтів, підраховує щомісяця їх кількість та загальну вартість лікування без пільг.

Варіант 10

1) Створити звіт, який для кожного магазина – замовника виво­дить перелік поставлених книг, підраховує загальну кількість та вар­тість поставлених книг по місяцях і для кожного магазину.

Варіант 11

1) Створити звіт, який для кожного цеху та для кожного виду продукції виводить відомості про поставки на склад, підраховує за­гальний обсяг продукції та її вартість.

Варіант 12

1) Створити звіт, який для кожного абонента виводить його прізвище, номер телефону, назву пільгової категорії; відсоток сплати та суми платежів із зазначенням дати, підраховує загальну сплачену суму, кількість платежів та середню суму, сплачену одним абонентом.

4.3 Індивідуальні завдання

Створити форми та написати коди програм для розв’язку завдань свого варіанту.

Варіант 1

1) Створити форму, на якій для кожного господарства – замовни­ка будуть виведені його назва, телефон та перелік замовлень. Вивести на формі дату останнього замовлення.

2) Створити форму для реєстрації нового замовлення з усіма потрібними полями. Забезпечити унікальність коду замовлення. Назву замовника та назву добрива вибирати зі списків. Підрахувати суму до сплати (вартість замовлення – пільги + 20%ПДВ) та загальну суму, на яку зроблені замовлення вказаним господарством.

Варіант 2

1) Створити форму, на якій для кожного замовника будуть вказа­ні його назва, адреса, телефон та перелік замовлень. Вивести на формі загальну масу перевезеного вантажу.

2) Створити форму для реєстрації нового замовлення з усіма по­трібними полями. Забезпечити унікальність номеру замовлення. Назву замовника та транспортний засіб вибирати зі списків. Підрахувати вартість замовлення (відстань* маса * вартість т/км – пільги) та загаль­ну кількість замовлень для вибраного замовника.

Варіант 3

1) Створити форму, на якій для кожного готелю будуть вказані його назва, рівень сервісу та відомості про гостей, що зараз перебува­ють в готелі, з підрахованою сумою до сплати за проживання (вартість за одну добу*термін проживання*пільги + 20%ПДВ). Обчислити загальну сплачену суму для кожного готелю.

2) Створити форму для реєстрації нового гостя. Інформація по­винна додаватися до таблиці Гості міста, якщо гість в ній не зареєст­рований, та до таблиці Замовлення. Готель та тип номеру вибирати зі списку. Передбачити унікальність коду замовлення та коду гостя.

Варіант 4

1) Створити форму, на якій для кожного постачальника вивести його назву, адресу і перелік замовлень з підрахованою сумою до спла­ти (вартість замовлення +20% ПДВ) та загальну суму, на яку зроблені замовлення.

2) Створити форму для реєстрації нового замовлення. Забезпечи­ти унікальність коду замовлення. Постачальника, назву та код матеріа­лу вибирати зі списків. Перевіряти, щоб дата замовлення була раніше за дату постачання. Вивести дату першого замовлення.

Варіант 5

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

2) Створити форму, яка демонструє список платежів для кожного споживача з підрахованою сумою до сплати (вартість замовлення-пільги+20%ПДВ) та загальну суму, що сплачена за поточний рік.

Варіант 6

1) Створити форму, на якій для кожного магазину будуть вказані його назва, телефон та відомості про замовлення. Вивести на формі вартість кожного замовлення та підрахувати загальну кількість замов­лень для кожного магазину окремо.

2) Створити форму для реєстрації нового замовлення з усіма по­трібними полями. Забезпечити унікальність коду замовлення. Назву магазину та назву продукції вибирати зі списків. Підрахувати загальну вартість замовлень для вибраного магазину.

Варіант 7

1) Створити форму, на якій для кожного постачальника вивести його назву, адресу, телефон і перелік замовлень із вартістю та сумою до сплати (вартість замовлення +20% ПДВ). Підрахувати середню вартість одного замовлення без ПДВ.

2) Створити форму для реєстрації нового замовлення. Забезпечи­ти унікальність коду замовлення. Постачальника, назву та код вузла вибирати зі списків. Після вибору вузла автоматично виводити на формі виробника вузла та вартість одного вузла. Підрахувати вартість замовлення та суму до сплати.

Варіант 8

1) Створити форму, на якій для кожного рейсу будуть вказані аеропорт вильоту і аеропорт призначення та перелік проданих квитків, упорядкований за датою вильоту. Вивести на формі сплачені суми та загальну кількість проданих квитків для кожного рейсу окремо.

2) Створити форму для реєстрації продажу квитків з усіма по­трібними полями. Номер рейсу, тип салону та розмір пільг вибирати зі списків. Вказати на формі найбільшу кількість проданих квитків в одному замовленні для вказаного рейсу.

Варіант 9

1) Створити форму, яка для кожного хірурга демонструє список його пацієнтів із зазначенням прізвища та категорії пацієнта, назви та дати операції. Підрахувати кількість пацієнтів для кожного хірурга.

2) Створити форму для реєстрації нового пацієнта. Категорію та стать пацієнта, назву операції та хірурга вибирати зі списків. Підраху­вати та вивести на формі загальну вартість лікування і суму до сплати з урахуванням пільг.

Варіант 10

1) Створити форму, на якій для кожного магазину будуть вказані його назва, адреса та відомості про замовлені книги. Вивести на формі загальну кількість замовлених книг та найбільший обсяг замовлення.

2) Створити форму для реєстрації нового замовлення. Забезпечи­ти унікальність номеру замовлення. Назву магазину та автора і назву книги вибирати зі списків. Після вибору книги виводити на формі кількість сторінок та відпускну ціну одного примірника. Підрахувати вартість усього замовлення з урахуванням знижок.

Варіант 11

1) Створити форму, на якій для кожного цеху будуть вказані його телефон та відомості про продукцію, поставлену на склад. Вивести на формі дату останньої поставки.

2) Створити форму для реєстрації надходження нової партії про­дукції на склад. Забезпечити унікальність коду партії. Номер цеху, назву продукції та її ґатунок вибирати зі списків. Дату реєстрації за замовчанням встановлювати рівній системній даті. Перевіряти, що об’єм партії продукції більше або дорівнює обсягу мінімальної партії.

Варіант 12

1) Створити форму, яка для кожної пільгової категорії виводить її назву, відсоток сплати та відомості про сплачені суми за телефон із зазначенням прізвища абонента, номеру телефону та дати платежу. Підрахувати загальну сплачену суму.

2) Створити форму для реєстрації чергового платежу. Номер те­лефону вибирати зі списку. Після цього виводити на формі назву піль­гової категорії абонента, відсоток сплати та кількість несплачених хви­лин по всіх видах розмов. Розраховувати розмір суми до сплати в за­леж­ності від пільг та дати сплати.

ЛІТЕРАТУРА

1. В.А. Биллиг, М.И. Дехтярь. VBA и Office 2000. Офисное программирование. Москва, «Русская редакция» - 2002 г., 672 с.

2. Васильев А., Андреев А. VBA в Office 2000: учебный курс. – СПб.: Питер, 2001. – 432с.: ил.

3. Кузьменко В.Г. VBA 2000. – М.: Издательство БИНОМ, 2000. – 408с.

4. Послед Б.С. Access 2000. Базы данных и приложения. – К.: Издательство “ДиаСофт”, 2000. – 512с.

5. Слепцова Л.Д. Программирование на VBA. Самоучитель.: – М.: Изд. дом «Вильямс», 2004. – 384с.: ил.

6. Методичні вказівки та завдання до лабораторних робіт з курсу “Бази даних та інформаційні системи” за темою “Робота в СУБД Access з використанням SQL” для студентів денної форми навчання спеціальності 7.080203 Системний аналіз і управління / Укл. Кузіна В.М.– Запоріжжя: ЗНТУ, 2006.– с. 54.– № 1837

Дата добавления: 2015-03-29