ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ  РФ

     КАМСКАЯ ГОСУДАРСТВЕННАЯ  ИНЖЕНЕРНО-ЭКОНОМИЧЕСКАЯ  АКАДЕМИЯ

     Кафедра  ММИТЭ 
 
 
 

     КУРСОВАЯ  РАБОТА 

     По  дисциплине «Информатика и программирование» 

     На  тему «Информационно-аналитическая  система аптечного управления»

     Вариант №14 
 

Выполнил:

студент     гр. 5114Б

ФИО: Хабибуллина Алсу Абузаровна 

     Проверил:

     К.т.н., доцент

     Каляшина  А.В. 
 
 

     г. Набережные Челны

     2009

Содержание:

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

2. Исходные  данные                                                                                                                   4

3. Используемые  методы обработки                                                                                  6

                        3.1 Используемые функции                                                                                                6

                        3.2 Макросы                                                                                                                               7

                        3.3 Управление данными  с помощью объекта UserForm                                     9

                                                      3.3.1 Добавление данных в таблицу                                                                          9

                                                      3.3.2 Удаление данных  из таблицы                                                                         14

                                            3.3.3 Сортировка данных                                                                                              15

                                            3.3.4 Фильтрация данных                                                                                             15

                                                      3.3.5Построение диаграммы                                                                                       16

                                                      3.3.6 Сводные таблицы                                                                                                  17

4. Система меню                                                                                                                        25

5. Проверка данных                                                                                                                  26

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

Приложение                                                                                                                                 28 
 
 
 
 

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

      Информационно-аналитическая  система аптечного управления.

Исходная  информация содержится в трех таблицах:

• «Лекарства» (Код лекарства, название лекарства, дата изготовления, срок годности, цена за единицу, номер аптеки, адрес).
• «Аптеки» (номер аптеки, адрес аптеки)
• «Справочник» (код лекарства, название лекарства)

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

 
 

     2. Исходные данные

      Таблица «Аптеки» состоит из следующих столбцов:

• Номер аптеки;
• Адрес аптеки;

        Столбцы «Номер аптеки», «Адрес аптеки» содержат исходную информацию и набираются вручную. Таблица имеет следующий вид (полный вид таблицы приводится в Приложении): 
 

Таблица «Лекарства» состоит из следующих столбцов:

• Код лекарства;
• Название лекарства;
• Дата изготовления;
• Срок годности;
• Цена за единицу;
• Номер аптеки;
• Адрес;

       Столбец «Название лекарства» таблицы «Лекарства» подставляется с помощью формулы ВПР и ЕСЛИ из таблицы «Справочник». Это реализовано с помощью следующей формулы: =ЕСЛИ(RC[-1]=0;" ";ВПР(RC[-1];'Справочник'!R1C1:R10C5;2)). Причем выбрать можно только те лекарства, которые существуют в таблице «Справочник». При удалении лекарства из таблицы «Справочник», удаляются все сведения для этого лекарства из таблицы «Лекарства».

       Столбец «Цена лекарства» высчитывается с помощью формулы ВПР, которая просматривает таблицу «Справочник» и по произведению цены игрушки на количество проданных единиц высчитывается нужное значение. Формула: =ЕСЛИ(RC[-3]=0;" ";ВПР(RC[-3]; 'Справочник'!R1C1:R10C5; 4)*RC[-1]). 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

       3. Используемые методы обработки

       3. 1 Используемые функции

             Функция ЕСЛИ

       Возвращает  одно значение, если заданное условие  при вычислении дает значение ИСТИНА, и другое значение, если ЛОЖЬ.

       Функция ЕСЛИ используется для условной проверки значений и формул.

       Синтаксис:

       =ЕСЛИ (RC[-3]=0; ВПР(RC[-3]; 'Справочник' !R1C1:R10C5; 4) * RC[-1]).

       Функция ВПР

       Ищет  значение в крайнем левом столбце  таблицы и возвращает значение в  той же строке из указанного столбца  таблицы. Функция ВПР используется вместо функции ГПР, когда сравниваемые значения расположены в столбце слева от искомых данных.

       Синтаксис:

       = ВПР(RC[-3]; 'Аптеки' !R1C1:R10C5; 4) 
 
 
 
 
 
 
 
 
 

       3. 2 Макросы

       Общие сведения

       Если  какое-то действие часто повторяется, его выполнение можно автоматизировать с помощью макроса. Макрос — это серия команд и функций, хранящихся в модуле Visual Basic. Их можно выполнять всякий раз, когда необходимо выполнить данную задачу.

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

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

       Запись  макроса

             В меню Сервис выберите подменю Макрос и выберите команду  Запись.

       Введите имя для макроса в соответствующее поле.

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

           Чтобы выполнить  макрос с клавиатуры с помощью  сочетания клавиш, введите соответствующую  букву в поле Сочетание клавиш. Для строчных букв используется сочетание CTRL+ буква, а для заглавных — CTRL+SHIFT+ буква, где буква — любая клавиша  на клавиатуре. Буква, используемая в сочетании клавиш, не может быть цифрой или специальным символом. Заданное сочетание клавиш будет заменять любое установленное по умолчанию в Microsoft Excel, пока книга, содержащая данный макрос, открыта.

           В поле «Сохранить» в книге выберите книгу, в которой должен быть сохранен макрос.  Нажмите кнопку OK.

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

     Пример макроса:

     ActiveSheet.ShowAllData

         Range("A1").Select

         Range("A1:D8"). Sort key1:=Range("A1"), order1:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= xlTopToBottom,   DataOption1:=xlSortNormal

           Нажмите кнопку «Остановить запись»   на соответствующей панели инструментов.

      Выполнение  макроса в Microsoft Excel

     1)  Откройте книгу , которая содержит макрос.

     2) В меню Сервис установите указатель на пункт Макрос и выберите команду Макросы.

     3)  В поле Имя макроса введите имя того макроса, который нужно выполнить.

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

3. 3 Управление данными с помощью объекта UserForm

      Общие сведения

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

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

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

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

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

           3. 3. 1 Добавление данных в таблицы

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