істить програмний код на мові VBA на подію Натискання кнопки: Sub Кнопка17_Click (). OpenForm ТовариЦветаРазмери raquo ;,,, [Товар]= amp; Me.КодТовараSub
Тут використовується команда DoCmd.OpenForm, що відкриває форму з умовою відбору: товар дорівнює поточному значенню КодТовара на поточній формі.
При виборі групи товару зі списку враховується обраний тип товару (дані фільтруються).
Для цього на подію Отримання фокусу поля зі списком Група товарів (див. рис. 24) .: Sub Группа_товара_GotFocus (). Группа_товара.RowSource= SELECT КодГруппи, Группа_товаров, Тіп_товара FROM Группи_товаров WHERE Тіп_товара= amp; Me.Тіп_товара
Me.Группа_товара.RequerySub
Рис.24. Форма «Кольори і розміри товарів»
У першому рядку коду змінюється джерело рядків поля зі списком Група товарів з урахуванням обраного Типу товару на формі.
У другому рядку коду оновлюється це поле зі списком.
На подію Втрата фокусу поля зі списком Група товарів джерело рядків приймає свій первісний вигляд (без умови відбору за типом товару): Sub Группа_товара_LostFocus (). Группа_товара.RowSource= SELECT КодГруппи, Группа_товаров, Тіп_товара FROM Группи_товаров .Группа_товара.RequerySub
Форма ТовариЦветаРазмери також стрічкового типу.
На наступному малюнку представлений приклад натискання кнопки Кольори, розміри на формі Товари (див. рис. 25):
Рис.25. Форма «Кольори і розміри товарів»
Тобто можна переглянути (а також додати і відредагувати) кольори і розміри товару Жіночий шарф BUERBERY тонкий матерчатий з бахромою.
3.2 Форми для основних таблиць
Форма Поставки: джерело форми - запиту Поставки запит для відображення на формі розрахункових значень ціни (див. рис. 26).
Рис.26. Форма запиту «Поставки»
Форма Продажі в якості джерела містить запит Продажі Запит для відображення розрахованих значень (див. рис. 27):
Рис.27. Форма запиту «Продажі»
Для обліку кількості товару, який є в наявності, на подію Після оновлення поля Кіл-о створений наступний програмний код: Sub Кол_о_AfterUpdate ()=DLookup ( Залишок raquo ;, Текущіе_остаткі raquo ;, ТовЦветРазм= amp; Me.ТовЦвРазм amp; And Магазин= amp; Me.Магазін) Nz (Ost, 0)=0 Then MsgBox Немає в наявності даного товару! Кол_о gt; Ost Then MsgBox Недостатня кількість є в наявності! Поточний залишок - amp; OstSub
У першому рядку коду записується в змінну Ost поточний залишок поточного товару в поточному магазині із запиту Текущіе_остаткі.
У другому рядку перевіряється, якщо отриманий залишок дорівнює нулю, то видається повідомлення «Немає в наявності даного товару!»
У третьому рядку перевіряється, якщо поточне введена кількість товару менше ніж отриманий залишок, то видається повідомлення" Недостатня кількість є в наявності! Поточний залишок».
. 3 Кнопкова форма для переміщення по базі даних
Кнопкова форма - це форма, що містить кнопки, що запускають макроси, які виконують різні завдання, такі як відкриття форм і звітів.
Кнопкова форма створена за допомогою диспетчера кнопкових форм для зручності переміщення між об'єктами бази даних (див. рис. 28).
Рис.28. Форма «Головна кнопкова форма»
При натисканні на кнопку Конвертор відкривається сторінка кнопкової форми довідника (див. рис. 29).
рис.29. Форма «Довідники»
Кнопка Назад на головну повертає на головну сторінку кнопкової форми.
Решта кнопки - відкривають форми бази даних для зміни (тобто з можливістю редагування).
ВИСНОВОК
Метою випускної кваліфікаційної роботи була розробка бази даних для виконання поставлених завдань.
Необхідність розробки даної бази даних зумовлена ??тим, що часто виникають питання, завдання, і вирішення яких може зайняти великий інтервал часу, при якому буде не раціонально використовуватися час, для роботи, наприклад:
· Обробка та облік інформації в різних видах;
· Пошук інформації в багатьох джерелах;
· Складання звітів в прикладних програмах.
У таких випадках база даних є незамінним уніфікованим інструментом, який здатний реалізувати ряд необхідних функцій з ефективного вико...
