Содержание.

Введение…………………………………………………………………………. .2

1.Создание и заполнение базы данных…………………………………………..3

1.1.Создание БД……………………………………………………….. 3

               1.2.Вывод таблиц в формы……………………………………………6         1.3.Формирование различного вида запросов……………………….  7

               1.4.Вывод запросов на формы…………………………………….. …10

               1.5.Создание отчёта с итогами…………………………………….. ...12

               1.6.Создание меню управления базой  данных……………………….13

2.Экспорт  данных в Visual Basic 6.0 (с использованием  элементов управления DATA и MSFlexGrid)……………………………………………………………15

Заключение………………………………………………………………………25

Список  использованной литературы…………………………………………..26 
 
 
 
 
 

Введение

 

     Как известно, большинство современных  компьютеров работают под управлением  операционной системы Windows и оснащены, как правило, пакетом приложений Word, Excel, Access и Visual Basic семейства MS Qffice. В настоящее время практически повсеместно используется пакет прикладных программ Microsoft Office, в стандартный набор которого входит MS Access – мощная система управления базами данных. Access интегрирован с прочими приложениями пакета, что позволяет применять богатые возможности компонентов. Office. Access позволяет создавать дружественный интерфейс, а также – решать специальные задачи при помощи программирования на языке Visual Basic for Application (VBA), в основе которого лежит язык Basic. Visual Basic стал очень популярным в последнее время благодаря лёгкости создания программных продуктов, удобству и быстроте доступа к базам данных и глубокой интеграции с Microsoft Office, что способствует развитию навыков объектного и визуального проектирования.

1. Создание и заполнение базы данных.

1.1. Создание БД.

 

Таблица  1 в режиме конструктора 

 

 Поле  «Kod» (Код города) - ключевое. Через него будет связь со второй таблицей. 

Таблица  2 в режиме конструктора 

     

 
 

Связывание  таблицы 1 и таблицы 2

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

     «Обеспечение  целостности данных» 

     «Каскадное  обновление связанных полей»

     «Каскадное  удаление связанных записей»

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

       

       
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Открываем таблицы и заполняем их:

 

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

1.2. Вывод таблиц в формы

Для вывод  на формы используем конструктор, на котором формируем необходимые  текстовые поля с привязкой в  полям таблиц и метками для подписи данных.

Форма в режиме конструктор:

 

Форма в рабочем состоянии.

 

1.3. Формирование различного вида запросов

1) Вывести  города и районы , у которых расход воды за предыдущий период был больше задаваемой величины 

Конструктор запроса:

 

Запрос 1 на языке SQL:

SELECT Tab1.Nazv, Tab2.[Nazv r], Tab1.Ras2

FROM Tab1 INNER JOIN Tab2 ON Tab1.Kod = Tab2.Kod

WHERE (((Tab1.Ras2)>[задать величину])); 

Результат выполнения запроса:

 

2)  Вывести информацию о городах, где суммарный расход  ресурсов увеличился по сравнению с предыдущем периодом хотя бы для одного ресурса.  

Конструктор запроса:

Вспомогательный запрос:

 

основной запрос:

 

Запрос 2 на языке SQL:

Вспомогательный запрос:

SELECT Tab2.Kod, Sum(Tab2.Rn1) AS Sum1, Sum(Tab2.Rn2) AS Sum2, Sum(Tab2.Rn3) AS Sum3, Sum(Tab2.Rn4) AS Sum4, Sum(Tab2.Rn5) AS Sum5

FROM Tab2

GROUP BY Tab2.Kod; 

Основной запрос:

SELECT Tab1.Kod, Tab1.Nazv

FROM Tab1 INNER JOIN zap21 ON Tab1.Kod = zap21.Kod

WHERE (((zap21.Sum1)>[ras1])) OR (((zap21.Sum2)>[ras2])) OR (((zap21.Sum3)>[ras3])) OR (((zap21.Sum4)>[ras4])) OR (((zap21.Sum5)>[ras5])); 

Результат выполнения запроса 

Вспомогательный запрос:

 

основной  запрос:

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

1.4. Вывод запросов на формы. 

Как в  пункте 2.2. создаём формы в конструкторе и выводим туда результаты запросов. 

Форма запроса 1 в режиме конструктор:

 
 
 
 
 
 

Форма запроса 2 в режиме конструктор:

 
 
 
 
 
 
 
 

Форма запроса 1 в рабочем состоянии:

 

Форма запроса 2 в рабочем состоянии:

 
 
 
 

1.5. Создание отчёта с итогами по группам записей.

     Для создания отчёта также можно воспользоваться  конструктором или мастером создания отчётов.

Отчёт в режиме конструктора:

 

Результат составления отчёта:

 
 
 

1.6. Создание меню управления базой данных.

Для создания меню откроем конструктор и расположим на нём командные кнопки и метки к ним.

 

Для того чтобы меню заработало, необходимо указать действие для каждой кнопки. Щёлкнув два раза левой кнопкой  мышки, открываем окно параметров, выбираем «нажатие кнопки» и указываем, что  необходимо выполнить процедуру.

Пример  процедуры для кнопки «Информация  о предприятии»

Private Sub Кнопка0_Click()

On Error GoTo Err_Кнопка0_Click 

    Dim stDocName As String

    Dim stLinkCriteria As String 

    stDocName = "Tab1"

    DoCmd.OpenForm stDocName, , , stLinkCriteria 

Exit_Кнопка0_Click:

    Exit Sub 

Err_Кнопка0_Click:

    MsgBox Err.Description

    Resume Exit_Кнопка0_Click

   

End Sub

Аналогично  указываем процедуры других кнопок. 

Меню  в рабочем состоянии:

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

2.Экспорт данных в Visual Basic 6.0 (с использованием элементов управления DATA и MSFlexGrid) 

     Разработать форму и программный код в  Visual  Basic, обеспечивающий доступ к базе данных (через элемент Data) и позволяющий: 

3. Для  каждого города и  района вывести информацию о ресурсах с минимальным расходом.(ресурс, расход).
4. По выбираемым ресурсам вывести информацию о  районе и городе с максимальным расходом.

 

     Для работы с базой данных в программном  средстве Visual Basic необходимо сохранить созданную базу данных в формате 1997 года (сервис - служебные программы - преобразовать в Access97), затем выйти из Access и уже ее подключать в программе VB6 к элементу Data, найдя имя БД в списке его свойства DatabaseName. 

Форма до запуска программы:

 

Используемые элементы управления: