Разработка программы в системе Microsoft Office Access на языке MVB

Введение

Задачей данной курсовой работы является написание программы в среде Microsoft Access на языке Microsoft Visual Basic, решающую следующую задачу: перенесение данных из таблицы Word в таблицу базы данных.

Если говорить о среде написания программ для решения задач – Microsoft Visual Basic for Application – то это сочетание одного из самых простых языков программирования и всех вычислительных возможностей такой многогранной системы, как Access. С помощью VBA можно легко и быстро создавать разнообразные приложения даже не являясь специалистом в области программирования. VBA содержит относительно мощную графическую среду, позволяющую наглядно конструировать экранные формы и управляющие элементы. В общем Visual Basic for Application позволяет с легкостью решать многие задачи.

VBA встроен в любое приложение MicrosoftOffice, поэтому, нет необходимости устанавливать дополнительные пакеты прикладных программ. Тексты программ сохраняются в соответствующих приложениях, и, следовательно, их можно переносить с одного компьютера на другой, не задумываясь о необходимости создания исполняемых файлов, достаточно наличия на компьютерах пакета MicrosoftOffice.

Visual Basic считается хорошим средством быстрой разработки прототипов программы, для разработки приложений баз данных и вообще для компонентного способа создания программ, работающих под управлением операционных систем семейства Microsoft Windows.

Название Visual Basic говорит само за себя. Visual Basic, в отличие от традиционных систем программирования, представляет совершенно иной стиль программирования. Уже по слову “Visual” можно догадаться, что в Visual Basic реализован визуальный стиль программирования. Здесь мы даже не программируем, а проектируем приложение. Наша первая задача при этом – создать рабочую среду, прежде чем начать набирать первую строку кода.

Слово Basic в названии указывает на то, что синтаксис программ и операторы опираются на язык высокого уровня Basic (Beginners Atlpurpose Symbolic Instruction Code – многоцелевой код символических команд для начинающих), но заметно от него отличается.

1. Постановка задачи

1. Создать в базе данных Microsoft Office Access таблицу “Закупаемые компоненты” в соответствии с заданием

2. Разработать форму для работы с таблицей “Закупаемые компоненты “

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

2. Описание алгоритма решения задачи в виде текстового описания

1. Создать таблицу “Закупаемые компоненты” при помощи Конструктора и задать имя, тип, размер, формат каждого поля таблицы

2. Создать при помощи Мастера форму с полями для ввода информации

3. Поместить на форме кнопку “Расчет”

4. Щелкнув правой кнопкой мыши по кнопке “Расчет”, выбрать в контекстном меню строку Обработка событий

5. В открывшемся окне MicrosoftVisualBasic написать программу для расчета незаполненных полей

3. Описание базы данных (структура таблиц, схема)

Таблица 1 – Описание структуры таблицы “Закупаемые компоненты”

Имя поляТип данныхРазмер поляИндексированное поле
СкладЧисловойДлинное целоеДа(Совпадения допускаются)
ИзделиеЧисловойДействительноеНет
ОписаниеТекстовой50Нет
Наличный запасЧисловойДействительноеНет
Задержанный запасЧисловойДействительноеНет
Заказанный запасЧисловойДлинное целоеНет
Распределенный запасЧисловойДлинное целоеНет
Свободный запасЧисловойДействительноеНет
ЕдиницыТекстовой50Нет

Рисунок 1 – Таблица ” Закупаемые компоненты ” в режиме Конструктор

Рисунок 2- Таблица “Закупаемые компоненты

Таблица 2 – Описание структуры таблицы “Склад”

Имя поляТип данныхРазмер поляИндексированное поле
СкладЧисловойДлинное целоеДа(Совпадения не допускаются)
Тип складаТекстовой50Нет
КластерТекстовой50Нет

Рисунок 3 – Таблица “Склад” в режиме Конструктор

Рисунок 4- Таблица “Склад”

Рисунок 5 – Запрос в режиме конструктора

Рисунок 6 – Запрос в режиме SQL

4. Копии с экрана форм для работы с базой данных при разработке их в конструкторе

Рисунок 7 – Экранная форма в режиме конструктор

Рисунок 8 – Экранная форма

5. Текст разработанной программы

Private Sub Кн1_Click()

On Error GoTo Err_Кн1_Click

Dim rs As New ADODB. Recordset

S_sql = “SELECT [Закупаемые компоненты].* FROM [Закупаемыекомпоненты]”

Rs. Open s_sql, CurrentProject. Connection, adOpenDynamic, adLockOptimistic

With rs

.MoveFirst

Do Until. EOF

.Fields(“Свободный запас”) = .Fields(“Наличный запас”) – .Fields(“Задержанный запас”) – .Fields(“Заказанный запас”) – .Fields(“Распределенный запас”)

.Update

.MoveNext

Loop

Me. Refresh

Exit_Кн1_Click:

Exit Sub

Err_Кн1_Click:

MsgBox Err. Description

Resume Exit_Кн1_Click

End With

End Sub

6. Подробное описание работы программы

Option Compare Database

Private Sub Кнопка 1_Click() ‘ процедура обработки события

‘On Error GoTo Err_ Кн 1_Click ‘ Значение ошибки

On Error Resume Next ‘автоматическое завершение программы при возникновении ошибки будет предотвращено и появится возможность выполнить некоторые дополнительные действия

Dim rs As New ADODB. Recordset ‘создается таблица, для каждого столбца которой определяется тип данных и значения в этом столбце должны соответствовать этому типу данных.

S_sql = “SELECT Spect.* FROM Spect”

Rs. Open s_sql, CurrentProject. Connection, adOpenDynamic, adLockOptimistic ‘ создается динамический с оптимистической блокировкой записей

With rs ‘Выполняет группу операторов для объекта Recordset

Do Until. EOF ‘повторяет блок команд, пока условие не станет верным

.Fields(0) = fld(0) ‘код специальности

.Fields(1) = fld(1) ‘наименование специальности

.Update ‘для сохранения изменений и добавления записи в объект Recordset

.MoveNext ‘перемещает текущую позицию в объекте Recordset на следующую запись

Next ‘выход из цикла

EndWith

Me. Refresh ‘Обновляет объекты в семействе в соответствии с текущими изменениями в схеме базы данных.

Exit_Кн1_Click: ‘конец обработки события

Exit Sub ‘конец объявления процедуры

Err_Кн1_Click:

MsgBox Err. Description ‘описание ошибки

Resume Exit _Кн1_ Click ‘продолжает выполнение программы после завершения процедуры обработчика ошибок

End Sub ‘конец обработки события 7. Примеры работы программы

Рисунок 9 – Экранная форма до выполнения расчета

Рисунок 10 – Экранная форма после выполнения расчета

Заключение

База данные таблица word

В процессе выполнения данной курсовой работы была написана программа в среде Microsoft Access на языке Microsoft Visual Basic, решающая следующую задачу: перенесение данных из таблицы Word в таблицу базы данных.

Список литературы

1. А. С. Грошев Информатика: Учебник для вузов. – Архангельск, 2009.

2. А. С. Грошев Программирование на VBS. Методические указания к выполнению лабораторных работ. – Архангельск, 2009.


1 Star2 Stars3 Stars4 Stars5 Stars (No Ratings Yet)
Loading...
Разработка программы в системе Microsoft Office Access на языке MVB