Робота з полями

Отримати доступ до значень і властивостями полів деякої таблиці можна, відкривши відповідний динамічний набір. Колекція полів Fields є колекцією за замовчуванням для об'єкта типу Recordset.

Тоді отримати доступ до деякого полю можна за його імені або за індексом в колекції, наприклад:

rst.Fields (Field1 "), rst.Fields (4) або rst! [ Field1 ]. Після отримання посилання на об'єкт типу Field можна читати і змінювати його властивості, наприклад:

Dim fld As Field

fld.DefaultValue = 1

fld.ValidationRule = " BETWEEN 1 AND 1000 "

fld.Value = 100

Хід роботи:

1. Завантажити додаток Access.

2. Виконати команди головного меню „Файл/Створити/Нова база даних”. У діалоговому вікні „Файл нової бази даних” відкрити власну папку. У вікні “Ім’я файлу” ввести з клавіатури ім’я бази даних “Посадові оклади” та натиснути кнопку “Створити”.

3. Створити структуру реляційної таблиці “Підрозділи”. Для побудови таблиці необхідно активізувати закладку „Таблиці”, натиснути кнопку „Створити”, вибрати режим „Конструктор” та натиснути кнопку „ОК”. В діалогове вікно ввести послідовно (рис.1): імена полів та їх типи даних. Закрити та зберегти таблицю з ім’ям „Підрозділи”.

Рис.1. Структура таблиці “Підрозділи”

4. Встановити курсор на піктограму підготовленої таблиці “Підрозділи”, відкрити її кнопкою “Відкрити” та ввести з клавіатури вихідні дані (табл.1). Зберегти реляційну таблицю “Підрозділи”.

Таблиця 1

5. Створити форму “Підрозділи” (рис.2). Для цього необхідно перейти на закладку “Форми”, натиснути кнопку “Створити”. Вибрати режим “Автоформа: у стовпчик” і джерело даних – таблиця “Підрозділи”. Оформити її належним чином. Залишити місце для встановлення кнопок на припіднятій платформі. Закрити та зберегти форму з ім’ям “Підрозділи”.

Рис. 2. Діалогова форма «Підрозділи»

6. Підготувати на об’єктно орієнтовній мові Visual Basic програмний модуль відбору записів по роках, місяцях і підрозділах при відкритті форми.

7. Для запису програмного модулю потрібно відкрити форму “Підрозділи” в режимі “Конструктор”. На панелі “Конструктор форм” натиснути кнопку “Властивості”, вибрати режим “Відкриття”, клацнути курсором миші на рядку даного режиму. З’явиться кнопка “...”, яку необхідно натиснути. Далі вибрати режим “Програми”, в

якому з клавіатури підготувати наступний програмний модуль:

Private Sub Form_Open(Cancel As Integer)

Dim Ввести_рік As Variant

Dim Ввести_місяць As Variant

Dim Ввести_підрозділ As Variant

Me.RecordSource = “ select [Підрозділ], [Посада], [Оклад], [Рік], [Місяць] from [Підрозділи] where [Рік]= Ввести_рік and [Місяць]= Ввести_місяць and [Підрозділ]= Ввести_підрозділ”

End Sub

8. Закрити діалогове вікно конструктора та зберегти форму з програмним модулем.

9. Підготувати на мові SQL запити: підрахунку загальної кількості посад, загальної та середньої суми за окладами, відбору окладів по бухгалтерії. Для програмування на SQL підрахунку загальної кількості посад необхідно активізувати закладку “Запити”, натиснути кнопку “Створити” та вибрати режим “Конструктор”. На бланк запиту добавити відповідною кнопкою таблицю “Підрозділи”. Закрити вікно додавання таблиць. Встановити курсор на заголовок бланка запиту, через контекстне меню відкрити “Режим SQL” і підготувати за допомогою клавіатури наступний запит:

SELECT Count([Посада]) AS [Кількість посад]

FROM [Підрозділи];

10. Закрити та зберегти запит з ім’ям “Кількість посад”.

11. Для програмування на SQL загальної суми за окладами потрібно активізувати закладку “Запити”, натиснути кнопку “Створити” та вибрати режим “Конструктор”. На бланк запиту добавити відповідною кнопкою таблицю “Підрозділи”. Закрити вікно додавання таблиць. Встановити курсор на заголовок бланка запиту, через контекстне меню відкрити “Режим SQL” і підготувати за допомогою клавіатури наступний запит:

SELECT Sum([Оклад]) As [Сума окладів]

FROM [Підрозділи];

12. Закрити та зберегти запит з ім’ям “Сума окладів”.

13. Для програмування на SQL підрахунку середньої суми за окладами необхідно активізувати закладку “Запити”, натиснути кнопку “Створити” та вибрати режим “Конструктор”. На бланк запиту добавити відповідною кнопкою таблицю “Підрозділи”. Закрити вікно додавання таблиць. Встановити курсор на заголовок бланка запиту, через контекстне меню відкрити “Режим SQL” і підготувати за допомогою клавіатури наступний запит:

SELECT Avg([Оклад]) As [Середній оклад]

FROM [Підрозділи];

14. Закрити та зберегти запит з ім’ям “Середній оклад”.

15. Для програмування на SQL відбору окладів по бухгалтерії потрібно активізувати закладку “Запити”, натиснути кнопку “Створити” та вибрати режим “Конструктор”. На бланк запиту добавити відповідною кнопкою таблицю “Підрозділи”. Закрити вікно додавання таблиць. Встановити курсор на заголовок бланка запиту, через контекстне меню відкрити “Режим SQL” і підготувати за допомогою клавіатури наступний запит:

SELECT [Посада],[Оклад]

FROM [Підрозділи]

WHERE [Підрозділ]=«Бухгалтерія»;

16. Закрити та зберегти запит з ім’ям “Оклади по бухгалтерії”.

17. За допомогою засобів візуального програмування встановити на форму “Підрозділи” чотири елементи діалогу “Кнопка” (рис.2).

18. Для створення кнопок потрібно відкрити форму “Підрозділи” в режимі конструктора та активізувати “Панель елементів”. Натиснути на “Кнопку” даної панелі, клацнути курсором у визначеному місці форми. Вибрати в діалоговому вікні категорію “Різне” та дію “Виконати запит”. Далі вибрати курсором запит “Кількість посад”, ввести з клавіатури текст для кнопки “Кількість посад” і натиснути кнопку “Готово”. Аналогічним чином візуально запрограмувати роботу кнопок для запитів: “Сума окладів”, “Середній оклад”, “Оклади по бухгалтерії”. Встановити курсором розміри кнопок і розмістити в нижній частині форми.

19. Встановити припідняту платформу для кнопок. Для реалізації цієї технології потрібно натиснути кнопку „Прямокутник” панелі елементів, обвести курсором кнопки, виділити створену рамку, а потім натиснути кнопку „Припідняте оформлення” панелі інструментів „Формат форма/звіт)”.

20. Закрити та зберегти форму з ім’ям „Підрозділи”.

21. Переглянути роботу форми “Підрозділи” з використанням мов програмування.

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

23. Закрити базу даних “Посадові оклади” та закінчити роботу з СУБД Access.