7. Создание диаграмм.

Создайте два новых рабочих листа и присвойте им следующие имена: ДиаграммаСумма и ДиаграммаРезультаты.

Для каждого рабочего листа «ЭФ-1», «ЭФ-2», «ЭФ-3» и «ЭФ-4» создайте по две диаграммы:

1. обычная диаграмма,

2. трехмерная гистограмма.

Обычные диаграммы, созданные при помощи значений взятых из таблиц рабочих листов «ЭФ-1», «ЭФ-2», «ЭФ-3» и «ЭФ-4», сохраните на листе ДиаграммаСумма. Трехмерные гистограммы – на листе ДиаграммаРезультаты. Таким образом, на листах ДиаграммаСумма и ДиаграммаРезультаты получится по четыре диаграммы.

Сохранить изменения в файле.

8. Создание кнопочного интерфейса.

Переходим на лист «Интерфейс». На данном листе создадим 7 кнопок. Для этого необходимо сделать активной панель инструментов «Элементы управления». Данная панель будет активной, если выполнить следующие действия в меню Вид выберите пункт Панель инструментов, а затем команду – Элементы управления. На экране появиться панель инструментов «Элементы управления», содержащая элемент управления – Кнопка.

Переходим далее в режим Конструктор. Для этого на панели «Элементы управления» щелкнем на значок .

После этого щелкните на элемент управления Кнопка левой кнопкой мыши и, перетаскивая указатель мыши, нарисуйте рамку кнопки на рабочем листе. В дальнейшем размер кнопки и ее расположение можно будет изменить. На рабочем листе появилась Кнопка с названием Command Button1. Далее подведите к ней курсор мыши и щелкните правую кнопку. Из раскрывающегося списка выберите Объект Command Button→Edit. Теперь имеется возможность поменять название кнопки. Сотрите старое название и введите новое название – Список абитуриентов. Данную кнопку будем использовать для того, чтобы при нажатие на нее автоматически открывался лист Список.

Далее поменяем цвет кнопки и размер шрифта. Для этого подведите к ней курсор мыши и щелкните правую кнопку. Из раскрывающегося списка выберите Свойства. На экране появится окно Properties (Свойства). Измените следующие свойства:

• BackColor (Цвет кнопки): бледно розовый;

• Font (Шрифт): Courier New, полужирный, 12 размер.

Далее два раза мышкой нажимаем на кнопку Список абитуриентов в режиме конструктор или на кнопку на панели инструментов . Откроется окно редактора Visual Basic. Оно имеет вид:

Слева в окне редактора Visual Basic располагается Окно проекта, а справа – Окна редактора кода. В Окне проекта расположены проекты всех открытых рабочих книг. А Окно редактора кода служит редактором для ввода и изменения кода процедур.

Как определялось выше, при нажатии на кнопку «Список абитуриентов» на листе Интерфейс, должен автоматически открываться лист Список с таблицей Список абитуриентов. Для этого в проекте Visual Basic в объектах на листе 1 должна быть следующая команда

'Кнопка Список абитуриентов открывает Список

Private Sub CommandButton1_Click()

Лист2.Activate

End Sub

Окна редактора кода Лист1 должно содержать следующую команду

Пояснение. Вторая и четвертая строка появляются автоматически при первом нажатие на кнопку. Первая строка служит пояснением, поэтому начинать ее следует с ‘. Третья строка определяет, что при нажатие на кнопку1 будет активен Лист2 (Лист2.Activate). В Окне проекта видно, что Лист2 – лист Список.

Private Sub – начало подпрограммы;

CommandButton1_Click() – при нажатии на кнопку CommandButton1 на экране открывается Лист2 – Лист2.Activate;

End Sub – конец подпрограммы.

Далее на листе Интерфейс создадим еще 6 кнопок:

• Кнопка2 «Результаты экзаменов» открывает лист Абитуриенты;

• Кнопка3 «ЭФ-1» открывает лист ЭФ-1;

• Кнопка4 «ЭФ-2» открывает лист ЭФ-2;

• Кнопка5 «ЭФ-3» открывает лист ЭФ-3;

• Кнопка6 «ЭФ-4» открывает лист ЭФ-4;

• Кнопка7 «Выход» служит для выхода из ИС.

Первые 5 кнопок создаются аналогично кнопке «Список абитуриентов». Поместите их недалеко друг от друга и объедините общей рамкой при помощи меню Формат пункт Ячейки вкладка Границы.

Кнопка «Выход» в Окне редактора кода Лист1 должна содержать следующую команду:

‘ Кнопка Выход

Private Sub CommandButton7_Click()

Workbooks.Close

End Sub

Пояснение. Workbooks.Close означает закрыть рабочую книгу (Workbooks).

Сохранить изменения в файле.

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

Далее создадим на других листах кнопки.

При нажатии на кнопку «Список абитуриентов» открывается лист Список (лист 2). Создадим на листе Список две кнопки:

• Кнопку1 «Интерфейс», которая будет возвращать нас на лист Интерфейс;

• Кнопку2 «Результаты экзаменов», при помощи которой открывается лист Абитуриенты.

Для этого в окне редактора кода Лист2 необходимо ввести соответствующие команды.

Лист будет выглядеть так

При нажатии на кнопку «Результаты экзаменов» открывается лист Абитуриенты (лист 3). Создадим на этом листе:

• Кнопку1 «Интерфейс», которая будет возвращать нас на лист Интерфейс;

• Кнопку2 «Сводная таблица», при помощи которой открывается лист Сводная таблица;

• Кнопку3 «Список абитуриентов», открывающая лист Список.

Для этого в окне редактора кода Лист3 необходимо ввести соответствующие команды.

Лист будет выглядеть так:

При нажатии на кнопку «ЭФ-1» открывается лист ЭФ-1 (лист 6), на кнопку «ЭФ-2» - лист ЭФ-2 (лист 7), на кнопку «ЭФ-3» - лист ЭФ-3 (лист 8), на кнопку «ЭФ-4» - лист ЭФ-4 (лист 9). Создадим на этих листах:

• Кнопку1 «Интерфейс», которая будет возвращать нас на лист Интерфейс;

• Кнопку2 «Диаграмма сумма балов», при помощи которой открывается лист ДиаграммаСумма;

• Кнопку3 «Диаграмма результаты экзаменов», при помощи которой открывается лист ДиаграммаРезультаты.

Для этого в окне редактора кода Лист6, Лист7, Лист8, Лист9 необходимо ввести соответствующие команды.

Например, лист ЭФ-1 будет выглядеть так:

На листе «Сводная таблица» создадим кнопку «Назад», которая будет возвращать нас на лист Абитуриенты.

На листах ДиаграммаСумма и ДиаграммаРезультаты создадим

• Кнопку1 «Назад ЭФ-1» около диаграммы, относящейся к ЭФ-1, которая будет возвращать на лист ЭФ-1;

• Кнопку2 «Назад ЭФ-2» около диаграммы, относящейся к ЭФ-2, которая будет возвращать на лист ЭФ-2;

• Кнопку3 «Назад ЭФ-3» около диаграммы, относящейся к ЭФ-3, которая будет возвращать на лист ЭФ-3;

• Кнопку4 «Назад ЭФ-4» около диаграммы, относящейся к ЭФ-4, которая будет возвращать на лист ЭФ-4.

Например, лист ДиаграммаСумма может выглядеть так:

Сохранить изменения в файле.

Таким образом, в процессе выполнения лабораторной работы был создан файл, содержащий следующие листы:

• Лист 1 «Интерфейс»;

• Лист 2 «Список»;

• Лист 3 «Абитуриенты»;

• Лист 4 «Проходной балл»;

• Лист 5 «Сводная таблица»;

• Лист 6 «ЭФ-1»;

• Лист 7 «ЭФ-2»;

• Лист 8 «ЭФ-3»;

• Лист 9 «ЭФ-4»;

• Лист 10 «ДиаграммаСумма»;

• Лист 11 «ДиаграммаРезультаты».

Каждый лист, кроме «Проходной балл», должен содержать элемент управления «Кнопка».

Предъявить полученные результаты преподавателю.

19