Создание информационной системы ведения учебной документации в учебном заведении

 

Курсовая работа

Создание информационной системы ведения учебной документации в учебном заведении

Введение

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

Целью курсовой работы является разработка информационной системы ведения учебной документации в учебном заведении.

Для достижения цели поставлены следующие задачи:

-Провести обзор литературных источников.

-Провести обзор существующих систем управления базами данных (СУБД).

-Изучить основные характеристики языка программирования MS Visual Basic 2010.

-Создать базу данных для хранения информации об успеваемости студентов.

-Запрограммировать основные модули программы и разработать интерфейс пользователя.

. Теоретическая часть

.1 Обзор существующих систем управления базами данных

программирование системный интерфейс пользователь

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

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

Рассмотрим распространенные системы управления базами данных (СУБД).

Microsoft Access - СУБД реляционного типа общего назначения. Это комплекс программных средств, предназначенных для создания структуры новой базы данных, наполнения её содержимым, редактирования содержимого, отбора данных в соответствии с заданными критериями, их упорядочивания, оформления, печати. Access работает под управлением Windows.

В Access база данных обозначает файл, содержащий набор информации. Каждая база данных в Access состоит из основных объектов: таблиц, запросов, форм, отчётов, страниц, макросов и модулей. Access может работать одновременно только с одной базой данных. Но одна БД Access может включать сотни таблиц, форм, запросов, отчётов, макросов и модулей, которые хранятся в одном файле с расширением mdb.

1С: Предприятие - это система программ, предназначенная для автоматизации различных областей экономической деятельности предприятий, организаций и учреждений, независимо от их вида деятельности и формы собственности, с различным уровнем сложности учета. За счет своей универсальности она используется для автоматизации самых разных участков экономической деятельности предприятия: бухгалтерский, кадровый, оперативный торговый, складской и производственный учет, а также расчет заработной платы, учет товарных и материальных средств, взаиморасчетов с контрагентами.
1С: Предприятие представляет собой систему прикладных решений (конфигураций), построенных по единым принципам и на единой технологической платформе. Технологическая платформа определяет потенциальные возможности системы для решения задач автоматизации предприятий-заказчиков.
Конфигурации ориентированы на автоматизацию определенной сферы экономической деятельности, они работают на основании соответствующих технологических платформ. Предприятие может приобрести ту конфигурацию, которая соответствует его актуальным потребностям. Продукты 1С ориентированы в основном на создание программ для малых и средних предприятий.

Oracle. Современная СУБД Oracle это мощный программный комплекс, позволяющий создавать приложения любой степени сложности. Ядром этого комплекса является база данных, хранящая информацию, количество которой за счет предоставляемых средств масштабирования практически безгранично. C высокой эффективностью работать с этой информацией одновременно может практически любое количество пользователей (при наличии достаточных аппаратных ресурсов), не проявляя тенденции к снижению производительности системы при резком увеличении их числа.

MySQL - свободная система управления базами данных(СУБД). MySQL является собственностью компании Oracle Corporation, получившей её вместе с поглощённой Sun Microsystems, осуществляющей разработку и поддержку приложения. Распространяется под GNU General Public License или под собственной коммерческой лицензией. Помимо этого разработчики создают функциональность по заказу лицензионных пользователей, именно благодаря такому заказу почти в самых ранних версиях появился механизм репликации.является решением для малых и средних приложений. Входит в состав серверов WAMP, AppServ, LAMP и в портативные сборки серверов Денвер, XAMPP. Обычно MySQL используется в качестве сервера, к которому обращаются локальные или удалённые клиенты, однако в дистрибутив входит библиотека внутреннего сервера, позволяющая включать MySQL в автономные программы.

Гибкость СУБД MySQL обеспечивается поддержкой большого количества типов таблиц: пользователи могут выбрать как таблицы типа MyISAM, поддерживающие полнотекстовый поиск, так и таблицы InnoDB, поддерживающие транзакции на уровне отдельных записей. Более того, СУБД MySQL поставляется со специальным типом таблиц EXAMPLE, демонстрирующим принципы создания новых типов таблиц. Благодаря открытой архитектуре и GPL-лицензированию, в СУБД MySQL постоянно появляются новые типы таблиц.

.2 Основные характеристики языка программирования

Visual Basic 2010

Visual Basic - это последняя версия одного из популярных языков программирования. В настоящее время с помощью Visual Basic можно быстро создавать приложения, работающие в среде Windows для любой области компьютерных технологий: бизнес-приложения, мультимедиа, приложения типа клиент - сервер и приложения управления базами данных. Кроме того, Visual Basic является встроенным языком для приложений Microsoft Office. Многие разработчики приложений также используют Visual Basic в качестве внутреннего языка своих приложений.Basic представляет собой интегрированную среду разработки, которая содержит набор инструментов, облегчающих и ускоряющих процесс разработки приложений. Причем процесс разработки заключается не в написании программы (программного кода), а в проектировании приложения. Приложение формируется средствами графического редактирования (компоновки), что позволяет свести процесс создания программного кода к минимуму.

Как и во всех современных системах визуального проектирования, в Visual Basic применяется объектно-ориентированный подход к программированию. Любое приложение, написанное на Visual Basic, представляет собой совокупность объектов.

Объект - некая сущность, которая четко проявляет свое поведение и является представителем некоторого класса подобных себе объектов. Почти все, с чем производится работа в VB, является объектами. Например: Форма, Командная кнопка, Текстовое поле и т.д.

Каждый объект характеризуется:

свойствами;

методами;

событиями.

Свойство - это имеющий имя атрибут объекта. Свойства определяют характеристики объекта (цвет, положение на экране, состояние объекта).

Методы - это действия или задачи, которые выполняет объект (то, что можно делать с объектами).

Классом объектов в объектно-ориентированных языках программирования называется общее описание таких объектов, для которых характерно наличие множества общих свойств и общих действий, которые способны выполнять эти объекты (например, класс Командная кнопка - общее описание кнопок в окнах приложений). Они должны иметь множество общих свойств и других характеристик (например событий, одинаковых для всех этих объектов: щелчок мышью).

Приложение, создаваемое в среде Visual Basic, называется проектом. Программный проект - это совокупность частей, составляющих будущее WINDOWS-приложение. Любой проект должен обязательно состоять из экранных форм (хотя бы одной) и программных модулей (хотя бы одного). Visual Basic хранит каждый проект в отдельном файле с расширением vbp.

Экранная форма - это графическое представление WINDOWS-приложения вместе с содержанием этого окна. Содержание включает в себя:

совокупность свойств этого окна с их значениями;

совокупность, объектов, находящихся в этом окне;

совокупность свойств этих объектов с их значениями.

В Visual Basic экранная форма хранится в отдельном файле с расширением frm.

Программный модуль - это хранящийся в отдельном файле программный код (текст некоторой программы). Он может использоваться при решении чаще всего одной, а иногда и нескольких задач. Имя этого файла имеет расширение bas.

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

В Visual Basic программный код почти всегда привязывается к какому-либо событию, которое является сигналом к началу работы программы. Например, щелчок мыши по какому-либо объекту экранной формы; загрузка новой экранной формы; перемещение указателя мыши вдоль полосы прокрутки; нажатие какой-либо клавиши на клавиатуре.

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

Событие - это характеристика класса объекта, описывающая внешнее воздействие, на которое реагирует объект этого класса во время работы приложения.

Большинство процедур, из которых состоит программный код VB, привязаны к событиям и называются процедурами-событиями.

Создание любого приложения состоит из следующих этапов.

Постановка задачи. Описание принципа работы будущего приложения, видов экранных форм (окон) этого приложения.

Разработка интерфейса. Создание экранных форм приложения со всеми находящимися на этих формах объектами и свойствами этих объектов.

Программирование. Определение того, какие события будут происходить в процессе работы приложения, составление алгоритмов процедур для этих событий и написание программы (программных кодов) этих процедур.

Отладка программы. Устранение логических ошибок в процедурах и достижение того, чтобы приложение работало удовлетворительно в среде проектирования.

Сохранение проекта и при желании - компиляция (превращение проекта в исполняемое приложение, способное работать самостоятельно за пределами среды проектирования).

Приложение может работать в режиме компиляции или интерпретации. В режиме интерпретации все инструкции на языке БЭЙСИК, из которых состоит программа, будут выполняться системой Visual Basic непосредственно в процессе их чтения компьютером строка за строкой в среде разработки.

В режиме компиляции сначала производится отладка программы с помощью интерпретатора, затем она полностью транслируется (переводится) с языка высокого уровня (Бейсика) на язык низкого уровня (язык машинных команд компьютера), т.е. компилирует.

Скомпилированная программа помещается в файл с расширением ехе. Этот файл может быть запущен на исполнение самостоятельно, без поддержки среды Visual Basic.

2. Практическая часть

.1 Создание базы данных для хранения информации об успеваемости студентов

Среда Visual Basic предоставляет возможность создавать файлы в формате системы Мicrоsоft Access. Это программная система, которую можно отнести к категории СУБД - систем управления базами данных.

В нашем распоряжении будет заложенная в Access технология, которая называется Мiсrоsоft Jet Database Еngine (сокращённо Jet Engine). Она обеспечивает возможность работы с базами данных различных форматов. Имена файлов баз данных в формате Access имеют расширение mdb.

Воспользуемся программой MS Access для создания таблиц, которые в дальнейшем будут хранить данные о студентах и их успеваемости. В режиме «Конструктор» создадим два объекта типа таблица: «Студенты» и «Успеваемость». Таблица «Студенты» должна содержать информацию о фамилии, имени и отчестве, группе, курсе, а так же факультете на котором обучаются студенты. Вторая таблица - «Успеваемость» будет содержать поля: предмет, оценка, преподаватель. Укажем типы данных для созданных полей (Рис. 1, Рис. 2).

Рис. 1. Назначение типов данных таблицы «Студенты»

Рис. 2. Назначение типов данных таблицы «Успеваемость»

.2 Программирование основных модулей программы и создание интерфейса пользователя

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

Решать эту задачу будем следующим способом.

Для начала создадим на экранной форме проекта два объекта класса DataGridView и шесть объектов класса Button (Кнопка), которые пригодятся нам в дальнейшем. Переименуем объекты класса Кнопка: «Добавить», «Редактировать», «Удалить» (Рис. 3).

Рис. 3. Разработка пользовательского интерфейса

Рис. 4. Пользовательский интерфейс

Теперь необходимо связать базу данных, созданную в MS Access с нашей программой в Visual Basic 2010. Для этого сначала добавляем новый элемент - модуль, оставим данное ему по умолчанию имя «Module1.vb» (Модули необходимы для объявления глобальных переменных). Напишем код модуля. Создаем публичную функцию FillGrid. Для связи базы данных с нашей программой будем использовать класс OleDbConnection, который представляет открытое подключение к источнику данных.

Рис. 5. Программный код модуля «Moduel1.vb»

Следующим шагом добавим возможность заполнять базу данных MS Access данными через пользовательский интерфейс нашей программы. Добавим новую форму и разместим на ней четыре объекта типа Label, TextBox и два объекта типа Button. Теперь напишем программный код для кнопки «Добавить» на форме Form1. Объявляем четыре переменные, которые будут хранить данные введенные в TextBoxы. Для вывода на экран диалогового окна Form2 используем оператор Form2. ShowDialog(). С помощью следующих четырех строк данные введенные в TextBox будут добавляться в базу данных.

Dim c As New OleDbCommand. Connection = conn. CommandText = «insert into Студенты (Ф.И.О., Группа, Курс, Направление) values ('» & s1 & «', '» & s2 & «', '» & s3 & «', '» & s4 & «')»

c. ExecuteNonQuery()

Рис. 4. Программный код кнопки «Добавить»

Рис. 5. Диалоговое окно заполнения таблицы «Студенты»

Используя тот же способ, создаем форму диалогового окна для заполнения таблицы «Успеваемость».

Рис. 6. Диалоговое окно заполнения таблицы «Успеваемость»

Теперь напишем программный код кнопок «Удалить». Объявляем переменную k (Dim k As Integer) в которую будет записываться код выделенной строки - k = Grid2. CurrentRow. Cells («Код»).Value. Создаем запрос на удаление, который удаляет записи из одной или нескольких таблиц, перечисленных в выражении FROM и удовлетворяющих условию предложения WHERE. «delete from Успеваемость where Код =» & k - Удалить из таблицы «Успеваемость», условие отбора - Код (числовое значение кода храниться в переменной k).

Последний шаг написать программный код для кнопки «Редактировать». Для редактирования будем использовать диалоговое окно добавления данных. Мы можем использовать программный код кнопки добавить, но необходимо заменить одну строку. Теперь вместо инструкции INSERT, которую мы использовали для добавления данных в таблицу, будем использовать инструкции UPDATE, которая создает запрос на обновление, изменяющий значения полей заданных таблиц на основании заданных условий. Синтаксис инструкции UPDATE:таблица
SET новое_значение
WHERE условия_отбора;
Описание частей инструкции:
Таблица - имя таблицы, содержащей данные, которые требуется изменить.

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

Условия_отбора - выражение, определяющее записи для обновления. Обновляются только записи, удовлетворяющие этому выражению.

Вписываем строку - «update Студенты set Ф.И.О. ='» & s1 & «', Группа ='» & s2 & «', Курс ='» & s3 & «', Направление ='» & s4 & «' where Код =» & k.

Рис. 7. Программный код кнопки «Редактировать»

Выводы

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

Цель курсовой работы достигнута.

Сделаны следующие выводы:

-Проведён обзор литературных источников.

-Проведён обзор существующих систем управления базами данных (СУБД).

-Изучены основные характеристики языка программирования MS Visual Basic 2010.

-Разработана база данных для хранения информации об успеваемости студентов.

-Запрограммированы основные модули программы и разработан интерфейс пользователя.

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

1)Грекул В.И., Денищенко Г.Н., Коровкина Н.Л. Проектирование информационных систем. Интернет-университет информационных технологий - ИНТУИТ.ру, 2009 - 304 с.

)Нейбург Э.Д., Максимчук Р.А. Проектирование баз данных с помощью UML. - М.: Издательский дом «Вильямс», 2012 - 288 с.

)Лилия Козленко - Проектирование информационных систем. - КомпьютерПресс 9'2010.

)Вендров А.М. Проектирование программного обеспечения экономических информационных систем, 2010.

)Ипатова Э.Р., Ипатов Ю.В. Методологии и технологии системного проектирования информационных систем. Учебник - Москва: Флинта, 2009.

)Кузнецов С.Д. Основы баз данных. - 3-е изд. - М.: Интернет-университет информационных технологий; БИНОМ. Лаборатория знаний, 2010.

)#"justify">Приложение

Код модуля Moduel1

Module Module1

Public conn As OleDbConnection

Sub FillGrid (ByVal Grid1 As DataGridView, ByVal cmd As String, ByVal TableName As String)c As New OleDbCommand. Connection = conn. CommandText = cmd

ds As New DataSetda As New OleDbDataAdapter(c). Fill (ds, TableName). DataSource = ds. DataMember = TableName

SubModule

Код формы Form1Class Form1

'Private Sub Button1_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click

' RefreshGrid()

'End SubSub RefreshGrid()

'Dim c As New OleDbCommand

'c. Connection = conn

'c. CommandText = «select * from Фирмы»

'Dim ds As New DataSet

'Dim da As New OleDbDataAdapter(c)

'da. Fill (ds, «Фирмы»)

'Grid1. DataSource = ds

'Grid1. DataMember = «Фирмы»

'Grid1. Columns («Код»).Visible = False(Grid1, «select * from Студенты», «Студенты»). Columns («Код»).Visible = FalseSub

Sub Form1_Load (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles MyBase. LoadDBpath As String= Application. StartupPath & «\BD1.accdb»= New OleDbConnection. ConnectionString = «Provider=Microsoft.ACE.OLEDB.12.0; Data Source=» & DBpath &»; Persist Security Info=False;». Open()()Sub

Sub Button2_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Clicks1, s2, s3, s4 As Stringr As DialogResult. ShowDialog()= Form2. TextBox1. Text= Form2. TextBox2. Text= Form2. TextBox3. Text= Form2. TextBox4. Text

= Form2. DialogResult. Close()

r <> DialogResult.OK ThenSubIf

c As New OleDbCommand. Connection = conn. CommandText = «insert into Студенты (Ф.И.О., Группа, Курс, Направление) values ('» & s1 & «', '» & s2 & «', '» & s3 & «', '» & s4 & «')». ExecuteNonQuery()

()Sub

Sub Button3_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button3. Clickk As Integerc As New OleDbCommand. Connection = conn= Grid1. CurrentRow. Cells («Код»).Value. CommandText = «delete from Студенты where Код =» & k. ExecuteNonQuery()()SubSub Grid1_CellClick (ByVal sender As Object, ByVal e As System. Windows. Forms. DataGridViewCellEventArgs) Handles Grid1. CellContentClick()SubSub RefreshGrid2 ()k As Integer= Grid1. CurrentRow. Cells («Код»).Value(Grid2, «select * from Успеваемость where ID_студента =» & k, «Студенты»). Columns («Код»).Visible = False. Columns («ID_студента»).Visible = FalseSub

Sub Button5_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button5. Clicks1, s2, s3, s4, s5 As Stringr As DialogResult. ShowDialog()= Grid1. CurrentRow. Cells («Код»).Value= Form3. TextBox2. Text= Form3. TextBox3. Text= Form3. TextBox4. Text= Form3. TextBox5. Text= Form3. DialogResult. Close()

r <> DialogResult.OK ThenSubIf

Dim c As New OleDbCommand. Connection = conn. CommandText = «insert into Успеваемость (ID_студента, Предмет, Оценка, Преподаватель, Семестр) values ('» & s1 & «', '» & s2 & «', '» & s3 & «', '» & s4 & «', '» & s5 & «')». ExecuteNonQuery()

()Sub

Sub Button7_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button7. Clicks1, s2, s3, s4 As Stringr As DialogResultk As Integer= Grid1. CurrentRow. Cells («Код»).Value. TextBox1. Text = Grid1. CurrentRow. Cells («Ф.И.О.»).Value. TextBox2. Text = Grid1. CurrentRow. Cells («Группа»).Value. TextBox3. Text = Grid1. CurrentRow. Cells («Курс»).Value. TextBox4. Text = Grid1. CurrentRow. Cells («Направление»).Value. ShowDialog()

= Form2. TextBox1. Text= Form2. TextBox2. Text= Form2. TextBox3. Text= Form2. TextBox4. Text= Form2. DialogResult. Close()

If r <> DialogResult.OK ThenSubIf

c As New OleDbCommand. Connection = conn. CommandText = «update Студенты set Ф.И.О. ='» & s1 & «', Группа ='» & s2 & «', Курс ='» & s3 & «', Направление ='» & s4 & «' where Код =» & k. ExecuteNonQuery()

()Sub

Sub Button4_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button4. Clickk As Integerc As New OleDbCommand. Connection = conn= Grid1. CurrentRow. Cells («Код»).Value. CommandText = «delete from Успеваемость where ID_студента =» & k. ExecuteNonQuery()()Sub

Sub Button1_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click

SubClass

Код формы Form2Class Form2

Sub Form2_Load (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles MyBase. Load. AcceptButton = Button1. CancelButton = Button2Sub

Sub Button1_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click. DialogResult = DialogResult.OK. Close()Sub

Sub Button2_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Click. DialogResult = Windows. Forms. DialogResult. Cancel. Close()SubClass

Код формы Form3Class Form3

Sub Form3_Load (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles MyBase. Load. AcceptButton = Button1. CancelButton = Button2Sub

Private Sub Button1_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click. DialogResult = DialogResult.OK. Close()Sub

Sub Button2_Click (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Click. DialogResult = Windows. Forms. DialogResult. Cancel. Close()

End Sub

Курсовая работа Создание информационной системы ведения учебной документации в учебном заведении

Больше работ по теме: