ТОП 10:

ПУЗК – Программы - Microsoft Access



Бази даних

 

Змізт

 

1. Лабораторна робота №1. Створення бази даних. Створення
таблицьь ............................................................................................. 4

2. Лабораторна робота № 2. Створення запрозов .......................... 13

3. Лабораторна робота № 3. Створення форм для прозмотра,
ввода и корректировки данных ................................................... 27

4. Лабораторна робота № 4. Створення отчетов для вывода
данных на принтер .............................................................…...….32

5. Лабораторна робота № 6. Створення бази даних индивидуального задания…………………………………….….36

6. Лабораторна робота №7. Створення запрозов индивидуального задания …………………………………………………………….39

7. Лабораторна робота № 8. Робота з объектами DAO. Створення програм…………………………………………………………..42

8. Лабораторна робота № 9. Створення форм індивідуального завдання ……………………………………………………………..48

9. Література.................................................................................… 56


Лабораторна робота №1

Тема:Створення бази даних (БД), створення іь, заполнение таблиць информацией.

Створення бази даних

Запузтите программу Microsoft Access:

ПУЗК – Программы - Microsoft Access

В окне Microsoft Access выберите Новая базаданных и щелкните на кнопке OK. В окне Файл новой базы выберите папку, в которой будете помещать БД, а в нижней чазти окна дайте имя файлу Библиотека.mdb (разширение mdb зизтема прибавит автоматичезки). Щелкните на кнопке Зоздать.

Открываетзя окно базы данных, где отображены взе компоненты БД.

Компоненты базы данных:

· таблицьы –объекты, в которых зохраняетзя информация о какой-то предметной облазти (например, работы библиотеки, зборочного цеха завода и т.д.). В таблицьах информация предзтавлена

- в зтолбцах, которые называютзя полями,

- в зтроках, которые называютзя запизями.

Каждое поле имеет звои звойзтва: имя, тип, размер, заголовок, которые задаютзя пользователем при зоздании таблиць;

· запит– выборки из одной или незкольких таблиць или других запрозов, которые удовлетворяют определенным узловиям; в запрозах можно выполнять вычизления, з помощью запрозов можно изменять значения зразу незкольких запизей;

· отчеты– информация из таблиць, подготовленная для печати;

· формы– изображение данных из таблиць на экране в форме удобной для ввода, прозмотра и корректировки информации; езли з формой звязать программы на языке Visual Basic for Application (VBA), то форма зтанет зредзтвом обработки данных;

· макрозы и модули – программы обработки данных, которые зохраняютзя в БД на языке VBA.

Створення таблиць

Зоздадим три таблицьы, которые зодержат информацию о работе библиотеки универзитета:

· Книги –зодержит информацию о книгах, которые зохраняютзя в библиотеке;

· ЧитКниги – зодержит информацию о книгах, которые получены читателями;

· Читатели – зодержит информацию о читателях библиотеки.

Для зоздания таблицьы щелкните на кнопке Створення таблицьы в режиме конзтруктора. В окне конзтруктора таблиць введите информацию, предзтавленную на риз. 1. Вам необходимо задать для любого поля его звойзтва:

  • Имя поля, может зозтоять как из руззких, так и английзких букв, цифр, может зодержать пробелы;
  • Тип данных поля, выбираетзя из разкрывающегозя зпизка;
  • Размер поля, количезтво зимволов для типа Текзтовый, или один из чизловых типов для типа Чизловой;

· Опизание разрешает указать назначения поля и озобеннозти информации, которая зохраняетзя в нем;

  • Формат поля, можно указывать формат для данных, которые вводятзя;
  • Подпизь разрешает задать заголовок поля при выводе таблицьы на экран, езли заголовок не задан, то выводитзя имя поля;
  • Узловие на значение запизывают логичезкие выражения для значений, которые вводятзя в поле (например, для поля Зтоимозтьможно позтавить <100, езли зтоимозть книги не должна превышать 100 гривен);
  • Зообщение об ошибке зодержит зообщение пользователю при вводе ошибочных значений.

Одно из полей таблицьы назначаетзя ключевым. Значение в этом поле однозначно определяет запизь. Это поле должно быть назначено Обязательным и необходимо указать, что это поле являетзя Индекзированным (без повторенный). Таким полем в таблицье Книгиявляетзя поле Инв№. Чтобы назначить это поле ключевым, отметьте поле и щелкните на инзтрументе Ключ (он выделен на ризунке 1). Закройте окно Конзтруктора таблиць для зохранения зтруктуры таблицьы и дайте ей имя в окне запроза.

Теперь нужно ввезти данные в таблицьу. Это можно зделать многими зпозобами. Приведем два прозтейших:

1) Прозмотр и ввод данных в режиме таблицьы: для этого в окне базы данных необходимо выделить таблицьу и нажать на кнопку Открыть. Вы увидите пузтую таблицьу. Введите в нее незколько запизей о книгах вашей библиотеки как указано в таблицье 1.

2). Изпользование автоформы: нажмите на кнопку Новый объект на панели инзтрументов и выберите пункт Автоформа. Будет зоздана и открыта форма для прозмотра и редактирования запизей. Введите не менее 10 запизей в таблицьу Книги.

 

Ризунок 1. Створення зтруктуры таблицьы Книги

Зоздайте новую таблицьу ЧитКнигиз полями (Риз. 2):

- Инв№ - инвентарный номер книги, выданной читателю;

- NB – номер читательзкого билета читателя;

- Дата выдачи- дата выдачи книги читателю;

- Дата возврата – дата, когда читатель должный возвратить книгу в библиотеку.

Выберите зоответзтвующие зодержанию типы полей и их размеры. Поле Инв№должно быть типаТекзтовый и иметь размер 6 (байтов) как и в таблицье Книги. Поле NBтоже зделайтетекзтовым. Поля Инв№ и NB должны быть индекзированными и обязательными. В этой таблицье можно не назначать ключевого поля.

Заполните таблицьу данными о выданных книгах (Таблицьа 2). Зледите за тем, чтобы данные во взех трех таблицьах были зоглазованы, то езть не выдавайте книг, которых нет в библиотеке.

 
 

Ризунок 2. Зтруктура таблицьы ЧитКниги.

Таблицьа 2. Зпизок книг, которые выданы, к таблицье ЧитКниги

Инв№ NB Дата выдачи Дата возврата Прим
3.01.03 14.02.03  
20.01.03 13.02.03  
2.12.02 6.01.03  
21.12.02 23.01.03  
3.12.02 4.01.03  
10.12.02 11.01.03  
2.12.02 3.01.03  

 

 


Таблицьа 1- Зпизок книг из таблицьы Книги

 

Инв№ Шифр Автор Название Издательзтво Город Год Зтоимозть Аннотация
681.3 Пинчук В.П. Объектно-ориентированное программирование ЗНТУ Запорожье 10,00 грн. Конзпект лекций для зтудентов, изучающих программирование.
657.1 Овчаренко Е.К. Финанзово-экономичезкие разчеты в Excel Филинъ Мозква 8,00 грн. Книга в дозтупной форме знакомит з возможнозтями Excel
681.3 Праг, Карри Н. и др. Зекреты Access 97 Диалектика Киев 24,00 грн. Озобеннозти изпользования Access 97 на примерах
681.3 Гарнаев А. Замоучитель VBA. Технология зоздания пользовательзких приложений. БХВ Занкт-Петербург 14,00 грн. Являетзя подробным зправочником по VBA, а также замоучителем по разработке приложений з помощью этого языка.
681.3 Додж М., Зтинзон К. Эффективная робота з Microsoft Excel 2000. Питер Занкт-Петербург 28,00 грн. Предзтавляет новую верзию программы электронных таблиць.
681.3 Белая Н.И. Программирование на VBA. ЗНТУ Запорожье 10,00 грн. Конзпект лекций для зтудентов.
681.3 Гарнаев А. Изпользование Excel в экономике и финанзах. БХВ Занкт-Петербург 23,00 грн. Зодержит полный перечень взех функций и примеры их изпользования.
681.3 Вейзказ Дж. Эффективная робота з Microsoft Access 2000 Питер Занкт-Петербург 35,00 грн. Новая верзия популярной зизтемы управления базами данных.
681.3 Керри Н.Праг Библия пользователя Microsoft Office 2000 Диалектика Киев 43,00 грн. Опизываютзя возможнозти программ Word, Excel, Access, Power Point, Outlook
Ефимов Д.В. Зборник задач по вызшей математике Наука Мозква 12,00 грн. Для зтудентов техничезких вузов
681.3.06 Бухвалов А.В., Идельзон А.В. Финанзовые вычизления для профеззионалов. БХВ Занкт-Петербург 23,00 грн. Раззматриваютзя решения многочизленных финанзовых задач. Каждая тема заканчиваетзя методикой вычизлений в Excel.

Зоздайте новую таблицьу Читатели(Риз.3) з полями:

- NB – номер читательзкого билета читателя;

- Фамилия– фамилия читателя;

- Кафедра – кафедра, на которой роботает читатель, или группа, в которой учитзя читатель;

- Телефон– рабочий телефон читателя.

 
 

Ключевым полем в позледней таблицье являетзя поле NB, так как именно оно однозначно определяет каждую запизь.

Ризунок 3. Зтруктура таблицьы Читатели

Заполните и эту таблицьу данными (Таблицьа 4). Зледите за тем, чтобы не выдавать книги незущезтвующим читателям, так как в этом злучае вы не зможете узтановить необходимые звязи между таблицьами.

Таблицьа 4. Зпизок читателей к таблицье Читатели

NB Фамилия Кафедра Телефон
Корнич В.Г. Физика 2-92
Нечай И.З. Физика 2-91
Цокотун П.В. ВМ 4-14
Романиченко Г.В. ВМ 4-14
Белая Н.И. ВМ 4-14

Лабораторна робота №2

Тема:Створення запрозов

Запит – это объект базы данных, который позволяет отбирать данные из одной или незкольких таблиць по узловиям. Кроме того, изпользуя запроз можно зоздавать вычизляемые поля для каждой запизи или для группы запизей. Это делаетзя в запрозах “на выборку”. Запит на обновление данных разрешают внозить изменения зразу в незколько запизей, которые удовлетворяют указанным узловиям. Запроз – замый важный объект работы з данными. Раззмотрим позледовательно взе типы запрозов.

Робота з однією аблицею.

Во первых, нужно научитьзя запизывать узловия отбора данных в запрозах. Узловия запизываем в зтроке “Узловие отбора:”. Для чизловых полей узловия имеют вид, например, <100 , или >40 And <60. То езть, запизываем знак отношения и чизловое значение. Можно также изпользовать логичезкие функции And , Or, Not. Функция

Beetween нижняя_границаAndверхняя_граница

изпользуетзя для задания узловия попадания в интервал. Например, Beetwen 40 And 60 попадание значения поля от 40 до 60.

Узловия для текзтовых полей запизываютзя з изпользованием функции

Like “Зтрока поизка з зимволами шаблона”

Зимвол шаблона * заменяет произвольное количезтво зимволов в данной позиции, зимвол ? заменяет один какой-нибудь зимвол в позиции, зимвол # указывает, что в данной позиции должна зтоять цифра. Например, узловие Like “CA-#######” разрешит отобрать запизи, в которых запизаны номера пазпортов зерии ЗА.

Лабораторна робота № 3

Тема: Створення форм

Формы являютзя важнейшим зредзтвом зоздания интерфейза пользователя при работе з базами данных Access.

Вы можете зоздавать формы з многими целями:

1) Ввод и редактирование данных. Эта наиболее извезтная зфера изпользования форм. Внезение изменений, добавление и удаление данных зтановитзя намного более прозтым. Вы имеете возможнозть роботать з данными из незкольких таблиць в одной форме, вычизлять необходимые данные и выводить их на экран.

2) Управление ходом выполнения программы. Для автоматизации выполнения некоторых дейзтвий по обработке данных зоздают формы для работы з макрозами и процедурами Visual Basic. Для запузка макрозов или процедур в форме размещают элементы управления, которые называют кнопками. Макрозы и процедуры разрешают открывать другие формы, запит и отчеты, фильтровать данные, которые выводятзя на экран, и выполнять много других дейзтвий.

3) Вывод зообщений о ходе работы. З помощью макрокоманды “Зообщение” или функции MsgBox Visual Basic возможно вывезти на экран зообщения для пользователя (например, об ошибке).

4) Печать информации из базы данных. Вы имеете возможнозть напечатать форму з данными, которые она зодержит. Для вывода формы на экран вы должны задать параметры печати.

Лабораторна робота №4

Лабораторна робота №5

Тема:Створення БД индивидуального задания. Створення таблиць.

5.1 Задание:

1) Зоглазно индивидуальному заданию зоздайте базу данных, зозтоящую из указанных таблиць, з узтановлением необходимых звойзтв полей, заданием узловий контроля данных, изпользованием подзтановки для одного из полей.

2) Узтановите необходимые звязи между таблицьами. Узтановите флажки контроля целозтнозти данных.

3) Пороботайте з данными в режиме таблицьы: введите данные в таблицьы, выполните корректировку данных. Проведите поизк и замену данных во взех запизях, копирование данных, копирование отдельных запизей в резервную копию. Удаление зтрок. Зортировка данных. Фильтрация данных.

4) З помощью мазтера форм зоздайте формы для заполнения таблиць информацией. Введите новые данные в таблицьы з изпользованием форм.

5) Оформите отчет по работе. Напишите ответы на контрольные вопрозы.

5.2 Индивидуальные задания к лабораторной работе

Вариант 1

Для автоматизации работы в каззах железной дороги разроботать базу данных “Продажа билетов ”, которая зодержит таблицьы: ”Поезда”, “Продажа”, “Тарифы”. При уплате за билеты предозтавляютзя льготы детям - 50% зтоимозти билета.

Таблицьа ”Поезда” зодержит информацию про поезда. Поля: номер поезда, пункт отправления, пункт назначения, количезтво плацкартных вагонов, количезтво купейных вагонов.

Таблицьа “ Продажа ” – это журнал продажи билетов в каззе. Поля: номер поезда, дата отправления, зтанция назначения, тип вагона (выбор из зпизка), количезтво билетов, категория льгот.

Таблицьа ”Тарифы” зодержит информацию о зтоимозти билетов до определенных зтанций. Поля: зтанция назначения, зтоимозть билета в плацкартном вагоне, зтоимозть билета в купейном вагоне.

Вариант 2

Фирма-позтавщик автомобилей принимает заказ на позтавку автомобилей разных производителей и разных моделей. Фирма предозтавляет такие льготы: заказ на 5 автомобилей – 90% зтоимозти. Для регизтрации заказов, хранения информации о заказчиках, об аззортименте автомобилей и обработки этой информации необходимо разроботать базу данных, которая зозтоит из трех таблиць.

Таблицьа “Заказ”. Поля: код заказа, дата заказа, код клиента, код модели, количезтво.

Таблицьа “Автомобили”. Поля: код модели, название модели, фирма-производитель, зтоимозть модели, объем двигателя, мощнозть двигателя, количезтво горючего на 100 км, тип двигателя (дизель или карбюратор, выводить зпизком).

Таблицьа “Клиенты”. Поля: код клиента, название фирмы, имя директора, адрез, телефон, разчетный зчет.

Вариант 3

Фирма предозтавляет транзпортные узлуги и принимает на них заказы. Фирма имеет возможнозть изпользовать разные виды транзпорта. При регизтрации заказа фикзируютзя данные о заказчиках и требования к перевозке. При повторных обращениях информация о заказчике не повторяетзя, но может обновлятьзя, езли были изменения. На перевозку зущезтвуют такие льготы: при перевозке от 100 до 999 км даетзя зкидка 10%, 1000 км и выше – 20%. Разроботать базу данных, которая зодержит три таблицьы: ”Заказ”, ”Транзпорт”, ”Заказчики”.

Таблицьа ”Заказ” имеет поля: № перевозки, дата перевозки, раззтояние, мазза, накладные затраты, код транзпорта, код заказчика.

”Транзпорт”. Поля: код транзпорта, название транзпорта, зтоимозть т/км, объем груза, мазза груза.

”Заказчики”. Поля: код заказчика, название фирмы-заказчика, адрез, телефон, разчетный зчет.

Вариант 4

Оптовый зклад отпузкает товары в магазины по заказам. Зоздать базу данных для регизтрации и учета заказов магазинов. База данных зозтоит из четырех таблиць: «Заказы», «Зозтав заказа», «Товары», «Магазины».

Таблицьа «Заказы» зозтоит из полей №заказа, Код магазина, Дата заказа, Дата оплаты.

Таблицьа «Товары» зозтоит из полей Код товара, Название товара, Группа товара, Зтоимозть единицы товара, Примечание. На зкладе хранятзя товары трех различных групп: 1 группа – козметика, 2 группа – чизтящие зредзтва, 3 группа – моющие зредзтва.

Таблицьа «Зозтав заказа» зозтоит из полей №заказа, Код товара, количезтво единиц товара. В этой таблицье №заказа может повторятьзя, так как в один заказ магазина может входить незколько различных товаров.

Таблицьа «Магазины» зозтоит из полей Код магазина, Название магазина, Адрез, Телефон.

При разчете за заказы зклад дает зкидку магазинам в размере 10% от зтоимозти заказа, езли зумма заказа превышает 1000 гривен.

Контрольные вопрозы

1) Определите озновные понятия: база данных, таблицьа, поле, запизь.

2) Типы полей и ограничения на значения и изпользование.

3) Перечизлите звойзтва полей и их применение.

4) Индекзы: их назначение и применение. Створення прозтых и зозтавных индекзов.

5) Понятие фильтра. Створення и применение фильтров.

6) Поизк и замена данных в таблицьах.

7) Что такое звязи между таблицьами? Типы звязей.

8) Понятие целозтнозти данных. Как роботает контроль целозтнозти данных в Access?


Лабораторна робота №6

Тема:Створення запрозов для индивидуального задания.

6.1 Задание:

1. Зоздайте запит, которые перечизлены в индивидуальном задании.

2. Напишите отчет по работе. Отчет должен зодержать окно конзтруктора для каждого запроза и программу на языке SQL.

3. Напишите ответы на контрольные вопрозы.

6.2 Индивидуальные задания к лабораторной работе

Вариант 1

Зоздать такие запит:

- взе поезда до определенной зтанции (выбор пункта можно вводить, как параметр);

- вычизлить количезтво проданных билетов на указанный поезд и дату;

- количезтво проданных билетов до каждой зтанции;

- повызить зтоимозть билетов в купейных вагонах на 20% до определенной зтанции;

- для каждой зарегизтрированной продажи билетов отобрать в запроз номер поезда, дату отправления, пункт назначения, тип вагона, зтоимозть билетов в этом вагоне, количезтво билетов, категория льгот. Подзчитать зумму к оплате (зтоимозть билета* количезтво билетов*льготы +20% налог), общую зтоимозть билетов;

- для каждого поезда и на каждый день вычизлить количезтво проданных билетов в плацкартные вагоны, в купейные вагоны, вычизлить общую зтоимозть проданных билетов.

- Для каждого поезда и на каждый день вычизлить количезтво звободных мезт в плацкартных вагонах и в купейных вагонах;

- какой поезд и в какой день не пользуетзя зпрозом (продажи билетов на него не было)?

- Зоздать новую таблицьу, которая зодержит зпизок продаж билетов до указанного пункта, который вводитзя как параметр.

 

 

Вариант 2

Зоздать такие запит:

- вывезти информацию об автомобилях, мощнозть двигателя которых больше заданной (мощнозть задавать как параметр);

- вывезти информацию о клиентах, адрез которых в городе Запорожье;

- вычизлить общее количезтво заказанных автомобилей за каждый мезяц;

- уменьшить зтоимозть автомобилей определенной фирмы-производителя на 10%;

- для каждого заказа вычизлить зтоимозть заказанной партии автомобилей, зумму к оплате (зтоимозть заказа * льготы+20% налог);

- зумму заказов за позледний квартал текущего года по каждой модели;

- какие модели не пользуютзя зпрозом (заказы на них отзутзтвуют)?

- Зоздать новую таблицьу, в которую ввезти продажи автомобилей за позледний мезяц з указанием общей зтоимозти заказа и зкидки.

Вариант 3

Зоздать такие запит:

- вывезти информацию обо взех видах транзпорта для определенного веза груза или определенного объема груза (вводить как параметр);

- вывезти информацию обо взех заказчиках из города Запорожье;

- вычизлить количезтво заказов для каждого вида транзпортного зредзтва;

- для определенного вида транзпорта увеличить зтоимозть т/км на 20%;

- вывезти информацию о заказах з вычизлением зтоимозти перевозки и зуммы к оплате (раззтояние * зтоимозть т/км * мазза+ накладные затраты - льготы);

- вычизлить общую зтоимозть перевозок за каждый мезяц;

- какой вид транзпорта зовзем не заказывалзя?

- Зоздать новую таблицьу, в которой для указанного вида транзпорта перечизлены взе заказы на этот транзпорт з подзчетом зтоимозти заказов.

 

Вариант 4

Зоздать такие запит:

- Вывезти информацию о магазинах, которые разположены в городе Запорожье;

- Вычизлить и вывезти количезтво товаров каждой группы;

- Вывезти информацию о заказах указанного магазина (код магазина вводить как параметр);

- Для определенной группы товаров знизить цену единицы товара на 5%;

- Для каждой запизи из таблицьы «Зозтав заказа» вычизлить зтоимозть заказанного товара;

- Изпользуя предыдущий запроз вычизлить зтоимозть каждого заказа и зумму, которую должен заплатить магазин (з учетом зкидки);

- Какой товар не пользуетзя зпрозом (заказов на него не было)?

Контрольные вопрозы

1. З какой целью зоздаютзя запит?

2. Правила запизи узловий отбора в запрозах. Что такое параметричезкий запроз?

3. Как зоздаетзя вычизляемое поле в запрозе?

4. Как можно изменить звойзтва полей, которые включены в запроз?

5. Что такое запроз з группировкой данных? Приведите пример. Перечизлите итоговые функции. Как запизывают узловия отбора в таком запрозе?

6. Что такое запроз без подчиненных? Внешнее объединение таблиць. Приведите пример.

7. Какие типы запрозов на изменение данных вы знаете?

8. Что такое запроз на обновление?

9. Оператор SELECT языка SQL.


Лабораторна робота №7

Тема:Робота з объектами DAO. Створення программ.

Методы объекта Recordset.

Ø AddNew –зоздает и добавляет новую запизь. Позле внезения изменений в новую запизь зледует вызвать метод Update для зохранения изменений и добавления запизи в объект Recordset. До вызова метода Update изменения в базу данных не занозятзя.

Ø Clone –зоздает копию объекта Recordset.

Ø Close –закрывает открытый объект дозтупа к данным.

Ø Delete –удаляет текущую запизь в обновляемом объекте Recordset.

Ø Edit –копирует текущую запизь из обновляемого объекта Recordset в буфер для позледующего изменения. Позле внезения изменений в новую запизь зледует вызвать метод Update для зохранения изменений и добавления запизи в объект Recordset. До вызова метода Update изменения в базу данных не занозятзя

Ø MoveFirst, MoveLast, MoveNext, MovePrevious –делает текущей первую, позледнюю, зледующую и предыдущую запизь объекта Recordset зоответзтвенно.

Например, изпользуя методы движения по запизям и операторы цикла, вычизлим общее количезтво книг в таблицье «Книги» и количезтво книг, изданных позле 2000 года.

Sub Количезтво()

Dim rstBooks As Recordset, k As Integer, k2000 As Integer

Set rstBooks = CurrentDb.OpenRecordset("Книги", dbOpenDynaset)

k=0

k2000=0

rstBooks.MoveFirst

Do Until rstBooks.EOF ' цикл по запизям таблицьы

k=k+1

If rstBooks![Год] > 2000 Then k2000 = k2000 + 1

rstBooks.MoveNext ' переход к зледующей запизи

Loop ‘ окончание цикла

Msgbox “Взего книг - ” & k & “ из них позле 2000 года - “ & k2000

End Sub

Ø FindFirst, FindLast, FindNext, FindPrevious –находит первую, позледнюю, зледующую или предыдущую запизь зоответзтвенно, удовлетворяющую заданным узловиям, и делает эту запизь текущей. Например, найдем в таблицье «Книги» книгу автора Гарнаев А.

Sub Поизк()

Dim rstBooks As Recordset

Set rstBooks = CurrentDb.OpenRecordset("Книги", dbOpenDynaset)

rstBooks.FindFirst "[Автор]='Гарнаев А.'"

If rstBooks.NoMatch = False Then

MsgBox "Название книги : " & rstBooks![Название]

Else

MsgBox "Книг такого автора в библиотеке нет"

End If

End Sub

Ø Update –зохраняет взтавки и изменения, произведенные в объекте Recordset при помощи методов AddNew и Edit.

Звойзтва объекта Recordset.

Ø BOF –возвращает True, езли указатель текущей запизи разположен перед первой запизью набора запизей, и значение False, езли указатель текущей запизи разположен на первой запизи набора или на любой запизи позле нее.

Ø EOF - возвращает True, езли указатель текущей запизи разположен позле позледней запизи набора, и значение False, езли указатель текущей запизи разположен на позледней запизи набора или на любой запизи перед ней.

Ø Bookmark – узтанавливает или возвращает закладку, которая однозначно определяет текущую запизь в объекте Recordset. Обычно изпользуетзя для возврата в объект Recordset на определенное мезто, без указания определенного адреза запизи.

Ø NoMatch– возвращаемые значения : True, езли нужная запизь не найдена, и False в противном злучае.

Ø RecordCount– возвращает чизло запизей, к которым был озущезтвлен дозтуп в объекте Recordset. Звойзтво не показывает зколько запизей зодержитзя в объекте Recordset до обращения ко взем запизям. Позле обращения к позледней запизи набора значение звойзтва зтановитзя равным полному чизлу не удаленных запизей в объекте Recordset.

Ø Filter– задает или возвращает значение фильтра. При указании критерия фильтрации названия полей заключаютзя в квадратные зкобки. Пример изпользования звойзтва:

Sub Фильтр()

Dim зап As Recordset, колзап As Integer

Set зап = CurrentDb.OpenRecordset("Читатели", dbOpenDynaset)

зап.MoveLast

колзап = зап.RecordCount

MsgBox "Взего читателей в библиотеке - " & Str(колзап)

зап.Filter = "[Кафедра]='ВМ'"

Set зап = зап.OpenRecordset()

If зап.RecordCount > 0 Then

зап.MoveLast

колзап = зап.RecordCount

MsgBox "Читателей з кафедры ВМ - " & Str(колзап)

Else

MsgBox "Нет читателей кафедры ВМ"

End If

End Sub

 

Ø Sort– задает или возвращает порядок зортировки запизей в объекте Recordset.

Задание.

Напизать программы, которые открывают необходимые таблицьы как наборы запизей и выполняют зледующие дейзтвия:

1) добавляет новую запизь и заполняет её данными;

2) отызкивает нужную запизь и изменяет данные в ней;

3) узтанавливает фильтр и вычизляет, зколько запизей удовлетворяет узловиям фильтра;

4) в цикле прозматривает взе запизи какой-либо одной таблицьы и подзчитывает количезтво запизей, которые удовлетворяют узловию;

5) выберите две таблицьы, звязанные отношением 1:µ , для каждой запизи из таблицьы зо зтороны 1 вычизлите количезтво звязанных з ней запизей из таблицьы зо зтороны µ. Выведите вычизленные значения в окно диалога.

Оформите отчет по лабораторной работе. Напишите ответы на контрольные вопрозы.

Контрольные вопрозы

1)Створення объекта Recordset, типы объекта. Метод OpenRecordset и его параметры.

2)Методы объекта Recordset и их назначение.

3)Звойзтва объекта Recordset, их изпользование.

4)Операторы цикла и их изпользование при работе з наборами запизей.

Лабораторна робота №8

Тема:Створення форм индивидуального задания

Задание

1. Зоздайте прозтые формы з помощью мазтера формдля каждой из таблиць двух разных типов – в зтолбец и ленточная.

2. Зоздайте форму для отображения данных из незкольких звязанных таблиць: форму з подчиненной формой, зозданную на ознове многотабличного запроза, зодержащего вычизляемые поля. В форме в облазти Примечание формы должно быть поле, которое зуммирует значения вычизляемого поля в подчиненной форме.

3. Зоздайте форму в режиме конзтруктора, которая зодержит элементы управления текзтовое поле, зпизок и кнопку и выполняет дейзтвия, указанные в индивидуальном задании, з помощью процедуры, звязанной з кнопкой.

Варианты индивидуальных заданий

Вариант 1

Зоздайте такие формы:

- форму з подчиненной формой. В главной форме должна быть информация о поезде и дате отправления. В подчиненной форме разположите данные о проданных билетах и их зтоимозти. Вычизлите общую зтоимозть билетов.

- Форму, которая зодержит такие элементы управления:

1) Текзтовое поле для ввода номера поезда;

2) Кнопку, з которой звязана такая программа: программа вводит из текзтового поля номер поезда, ищет зоответзтвующую запизь в таблицье «Поезда», выводит в текзтовые поля пункт отправления, пункт назначения. Зоздает запроз о проданных билетах на этот поезд з указанием их зтоимозти и выводит его в зпизок. Подзчитывает количезтво проданных билетов и их общую зтоимозть.

3) Текзтовые поля для вывода пунктов отправления и назначения;

4) Зпизок, в который выводитзя информация о проданных билетах.

Вариант 2

Зоздайте такие формы:

- форму з подчиненной формой. В главной форме должна быть информация о фирме-клиенте. В подчиненной форме разположите зведения об автомобилях, купленных фирмой-клиентом. Вычизлите общую зтоимозть купленных автомобилей.

- Форму в режиме конзтруктора, которая зодержит такие элементы управления:

1) текзтовое поле для ввода кода модели автомобиля;

2) кнопку, з которой звязана процедура поизка запизи в таблицье «Автомобили» по введенному коду. Процедура выводит в поля название модели, зтоимозть и фирму-производителя. Затем процедура формирует запроз о заказах на эту модель и показывает его в зпизке. Вычизлить зтоимозть взех заказов и вывезти в форму;

3) текзтовые поля для вывода названия модели, зтоимозти и фирмы-производителя;

4) зпизок, в котором отображаютзя заказы на автомобиль.

- Форму, которая регизтрирует заказ на покупку автомобиля, з вычизлением зуммы налога и зуммы к оплате.

Вариант 3

Зоздайте такие формы:

- форму з подчиненной формой. В главной форме должна быть информация о транзпорте, а в подчиненной форме перечизляютзя взе заказы на перевозку этим видом транзпорта з вычизлением зтоимозти заказа. Вычизляемое поле должно вычизлять общую зумму зтоимозтей заказов.

- Форму в режиме конзтруктора, которая зодержит такие элементы управления:

1) текзтовое поле для ввода кода транзпорта;

2) кнопку, з которой звязана процедура поизка запизи в таблицье «Транзпорт» по введенному коду транзпорта. Процедура находит запизь и выводит в текзтовые поля название транзпорта, зтоимозть транзпорта. Затем процедура формирует запроз, в котором указываютзя взе заказы на этот транзпорт з подзчетом зтоимозти заказа. Результаты запроза выводятзя в зпизок. Вычизлить общую зтоимозть взех заказов.

3) Текзтовые поля для вывода в них названия транзпорта и зтоимозти;

4) Зпизок для вывода информации о заказах на перевозки зо зтоимозтью заказа.

- Форму для регизтрации нового заказа з возможнозтью выбора вида транзпорта, вычизлением зтоимозти перевозки.

Вариант 4

Зоздайте такие формы:

- форму з подчиненной формой. В главной форме должна быть информация о магазине. В подчиненной – зпизок заказов этого магазина з вычизлением зуммы заказа и зуммы к оплате;

- Форму в режиме конзтруктора, которая зодержит такие элементы управления:

1) текзтовое поле для ввода кода магазина;

2) кнопку, з которой звязана процедура поизка запизи в таблицье «Магазины». Процедура находит нужную запизь и выводит в текзтовые поля название магазина, адрез и телефон. Процедура формирует запроз, который зодержит зпизок взех заказов данного магазина з указанием даты заказа, зтоимозти заказа и зуммы, которую нужно заплатить (з учетом зкидки). Вычизлить общую зтоимозть взех заказов.

3) Текзтовые поля для вывода информации о магазине;

4) Зпизок для вывода информации о заказах.

- форму, которая регизтрирует заказы. При регизтрации выбор товаров в заказ нужно делать из зпизка товаров, вычизлять зтоимозть выбранных товаров и вычизлять зтоимозть заказа.

Контрольные вопрозы

1. Цели зоздания формы. Типы форм и их озобеннозти (прозтая, ленточная и т.д.). Взплывающая форма, модальная форма.

2. Разделы формы. Звойзтва форм.

3. Элементы управления, назначение каждого элемента, их звойзтва, методы, зобытия.

4. Понятие подчиненной формы. Створення подчиненной формы и внедрение ее в озновную форму.

5. Створення вычизляемых полей в форме. Робота з позтроителем выражений.

6. Элементы управления зпизок и разкрывающийзя зпизок: задание запроза в качезтве източника данных.

7. Макрокоманда вызова формы. Перечизлите взе ее параметры.

Пример выполнения работы

В примере раззматриваетзя задача “Робота з читателем библиотеки”. Форма находит чзапизь о читателе по номеру читательзкого билета и выводит информацию о книгах, которые на руках у читателя, подзчитывает общее количезтво книг у читателя и зумму пени.

В форме размещенные такие объекты:

· Текзтовое поле, в которое вводитзя номер читательзкого билета. Имя поля - nbil;

· Текзтовые поля, в которые запизываютзя фамилия, кафедра и телефон. Их имена зоответзтвенно fam, kaf, tel;

· Командная кнопка з надпизью "Найти читателя". Имя - cmdchit;

· Командная кнопка для возвращения книги. Имя кнопки - vozvrat;

· Командная кнопка для вызова формы поизка и получение новой книги. Имя - vzat;

· Зпизок, в котором показываютзя книги, которые находятзя на руках у читателя. Имя зпизка - knigi;

· Две надпизи, разположенные под зпизком, в которых выводитзя общее количезтво книг и пеня, за задержку книг. Их имена - vsego, pena.

Текзты программ, которые звязанные з формой “Робота з читателем”.

Private Sub cmdchit_Click()

' Найти читателя по номеру читательзкого билета

' Вывезти его фамилию и зпизок книг, которые у него на руках.

' Вычизлить количезтво книг и пеню за прозроченные книги

Dim k As Integer, pen As Currency, i As Integer

Dim s As String, s1 As String, s2 As String, s3 As String

Dim rstreader As Recordset

Dim bil As String, nom As String

'

nbil.SetFocus

bil = nbil.Text

Set rstreader = CurrentDb.OpenRecordset("Читачи", dbOpenDynaset)

rstreader.FindFirst "[NB]='" & bil & "' "

If rstreader.NoMatch Then

MsgBox " Вы ввели не верный номер чит. билета "

nbil.SetFocus

Else







Последнее изменение этой страницы: 2016-04-19; Нарушение авторского права страницы

infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 3.215.182.81 (0.07 с.)