Информационно-аналитическая система для контроля хода литейного производства

2. ПРОЕКТИРОВАНИЕ И РАЗРАБОТКА АЛГОРИТМОВ

2.1 Начало работы с программой

Объект UserForm представляет собой окно или диалоговое окно, являющееся составной частью интерфейса пользователя в приложении.

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

Формы пользователя также могут реагировать на события, инициированные пользователем или запущенные системой.

Например, пользователь может написать подпрограмму обработки события Initialize (Инициализация) для UserForm, чтобы инициализировать переменные уровня модуля до того, как UserForm будет выведена на экран.

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

Например, можно использовать метод Move для изменения положения и размера формы UserForm.

Практически во всех приложениях MS Office используются пользовательские диалоговые окна. Диалоговые окна в VBA называются формами (объект UserForms). Каждому объекту UserForm присущи определенные свойства, методы и события, которые он наследует от класса объектов UserForms.

Диалоговые окна (формы) и элементы управления составляют основу современного визуального интерфейса. Все элементы управления и технология работы с ними в основном стандартизованы и похожи для разных платформ и программных сред. Эти объекты помещены в специальную библиотеку MS Forms.

Выделим основные моменты, которые следует иметь в виду при создании визуального интерфейса.

· Все загруженные диалоговые окна представляют коллекцию UserForms со стандартными методами и свойствами. Элемент коллекции - объект класса UserForm - задает отдельное окно.

· Для каждого типа элементов управления в библиотеке MS Forms имеется класс объектов, имя которого совпадает с именем элемента управления (его типа). Например, есть класс TextBox.

· Диалоговые окна создаются, как правило, не программно, а визуально. Вначале создается само окно, а затем оно наполняется элементами управления при помощи соответствующей панели элементов. Этот этап называется этапом проектирования, и его следует отличать от этапа выполнения, когда приложение выполняется и конечный пользователь взаимодействует с приложением, в частности через диалоговые окна и их элементы управления. Как только создается диалоговое окно и помещается в него тот или иной элемент управления, в этот же самый момент автоматически в программе появляется объект соответствующего класса, с которым можно работать, вызывая его методы и изменяя его свойства.

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

При конструировании форм пользователя следует задать свойство BorderStyle для определения границ и свойство Caption для занесения текста в область заголовка. В программе можно использовать методы Show и Hide, чтобы делать форму соответственно видимой и невидимой во время выполнения.

Рис. 2.1 («Меню»)

Кнопка «Меню» вызывает форму «Меню». Алгоритм работы данной кнопки в конструкции VBA:

Sub Кнопка1_Щелчок()

UserForm6.Show

End Sub

Кнопка «Начать работу» вызывает вторую форму «Добавление данных». Алгоритм работы данной кнопки в конструкции VBA:

Private Sub CommandButton1_Click()

UserForm6.Hide

UserForm3.Show

End Sub

Кнопка «Поиск» вызывает форму «Поиск». Алгоритм работы данной кнопки в конструкции VBA:

Private Sub CommandButton4_Click()

UserForm6.Hide

UserForm5.Show

End Sub

Кнопка «Выход» позволяет завершить работу с программой, скрывая пользовательскую форму. Алгоритм работы данной кнопки в конструкции VBA:

Private Sub CommandButton3_Click()

End

End Sub

таблица данные программа алгоритм

Кнопка «Поиск» на форме «Поиск» служит для поиска из таблицы «Отливки» данные о каждой из позиции. Результат поиска отображается на отдельных для каждого значения полях. Например, для TextBox2 соответствует значение столбца «Наименование».

Рисунок 2.3

Код программы поиска:

Private Sub CommandButton1_Click()

Лист1.Activate

Do

i = i + 1

Loop Until Cells(i, 1) = Empty

If a <> 1 Then

TextBox6 = TextBox7

a = 1

End If

Лист1.Activate

Do

i = i + 1

Loop Until Cells(i, 1) = Empty

For i = 1 To j

Next i

j = TextBox6.Text

TextBox6.Text = i

If TextBox6.Text <> "" Then

TextBox6.Text = TextBox7

End If

If TextBox7 = TextBox6.Text Then

TextBox2.Text = Cells(i + j, 2)

End If

If TextBox7 = TextBox6.Text Then

TextBox3.Text = Cells(i + j, 3)

End If

If TextBox7 = TextBox6.Text Then

TextBox4.Text = Cells(i + j, 4)

End If

If TextBox7 = TextBox6.Text Then

TextBox5.Text = Cells(i + j, 5)

End If

End Sub

3. ПРОЕКТИРОВАНИЕ ПОЛЬЗОВАТЕЛЬСКОГО ИНТЕРФЕЙСА

3.1 Главное меню программы

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

Поиск - открывает форму для поиска позиций по индивидуальному коду;

Начать работу - открывает форму для работы с таблицами на листах с 5-го по 12-й;

Об авторе - Открывает форму с информацией об авторе;

Выход- с помощью оператора End закрывает форму «Меню»

Форма главного меню выглядит следующим образом (Рисунок 3.1):

Рисунок 3.1

3.2 Основные формы программы

Рисунок 3.2 а

Эта пользовательская форма (рис. 3.2 а) позволяет работать с таблицей, содержащей исходные данные. Исходные данные для этой формы находятся на листе «Отливки». Эта форма позволяет вводить пользователю минимум данных для заполнения таблиц «Январь», …, «Декабрь».

3.3 Этапы загрузки данных

Например таблица «Март»

3.4 Справочная система

ЗАКЛЮЧЕНИЕ

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

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

1. Практикум по информатике. Учебное пособие Е.В.Михеева 3-е изд. стер. М.ИЦ. Академия 2006.

2. Информатика. Учебник И.И. Сергеева М.ФОРУМ ИНФРА-М. 2009.

3. Кузьменко В.Г. VBA: учебник, Бином, 2009.

4. Роман С. Использование макросов в Excel. - 2-е изд., Спб.: Питер, 2004.

5. Гладких А.А., Чиртик А.А. Excel. Трюки и эффекты. - СПб.: Питер, 2011.

Размещено на Allbest.ru