Список читаемых дисциплин

Дисциплина	Преподаватель	Группа	Вид нагрузки (часы)
Лекции	Практич.	Лаб.
. . .	. . .	. . .	. . .	. . .	. . .
. . .	. . .	. . .	. . .	. . .	. . .

 

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

4. В список выводятся записи только с аудиторной нагрузкой, т.е. если в поле Вид нагрузки (в БД) содержатся следующие значения: Лекции; Лабораторные; Практич., семин.

5. Сохранить его в файле {Номер семестра} cеместр-9999.xls на листе Нагрузка (например, для 3-его семестра 2012 года название конечного файла 3 cеместр-2012.xls). Книга должна иметь один лист.

6. Файл поместить в папку C:\Институт.

7. Запрос на создание распределения дисциплин по преподавателям реализовать с помощью формы, которая имеет следующий вид:

8. В списке Учебный год пользователь выбирает нужный ему год. На основе выбранного года формируется имя открываемой БД.

9. По умолчанию в поле Учебный год установить пусто. Список поля Учебный год должен содержать 4 элемента: пусто, номер предыдущего года, текущего и следующего.

10. Список поля Семестр: содержит значения от 1 до 10. По умолчанию установить 1.

11. Кнопку ОК связать с клавишей [Enter], кнопку Отмена – с клавишей [Escape].

12. Программа должна находиться в файле Программа Дисциплины.xls.

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

14. Оформить программу согласно требованиям, изложенным на лекциях.

15. Для отладки программы прилагается файл Кафедра-2012.xls.

16. Придумать свой вариант задания.

Домашнее задание №3

Модифицировать программу Программа Дисциплины.xls следующим образом:

1. При открытии файла с программой в стандартном меню Excel должно появляться меню Учебный процесс с командами:

1.1. Дисциплины, читаемые в семестре, которая предназначена для вызова формы, реализованной в ДЗ № 2.

1.2. О программе. При щелчке по команде О программе на экране должна появляться форма с данными о разработчике программы.

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

Вариант 4.

Домашнее задание №2

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

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

1. В базе данных Excel Кафедра-9999.xls содержатся данные о кафедральной нагрузке. 9999 – формат года (например, для 2012 года имя БД: Кафедра–2012.xls). БД хранится в папке C:\Институт и имеет следующую структуру:

Таблица 1. Фрагмент БД Кафедра:

Семестр	Дисциплина	Группа	Студентов	Вид нагрузки	Часы	Преподаватель
	Офисные програм. пакеты	И8-12-1		Лабораторные	102,0	Муратова С.Ю.
	Офисные програм. пакеты	И8-12-1		Контрольн. и д.з.	17,5	Муратова С.Ю.
	Офисные програм. пакеты	И8-12-1		Зачеты	7,5	Муратова С.Ю.
	Офисные програм. пакеты	И8-12-3		Лабораторные	102,0	Муратова С.Ю.
	Офисные програм. пакеты	И8-12-3		Контрольн. и д.з.	16,8	Муратова С.Ю.
	Офисные програм. пакеты	И8-12-3		Зачеты	7,2	Муратова С.Ю.
	Информатика			Лекции	34,0	Смирнов А.П.
	Информатика	И8-12-1		Лабораторные	68,0	Смирнов А.П.
	Информатика	И8-12-1		Контрольн. и д.з.	17,5	Смирнов А.П.
	Информатика	И8-12-1		Экзамены	12,5	Смирнов А.П.
	Информатика	И8-12-1		Консульт. экз.	2,0	Смирнов А.П.
	Информатика	И8-12-3		Лабораторные	68,0	Смирнов А.П.
	Информатика	И8-12-3		Контрольн. и д.з.	16,8	Смирнов А.П.
	Информатика	И8-12-3		Экзамены	12,0	Смирнов А.П.
	Информатика	И8-12-3		Консульт. экз.	2,0	Смирнов А.П.
	Информатика	И8-12-4		Лабораторные	68,0	Смирнов А.П.
	Информатика	И8-12-4		Контрольн. и д.з.	17,5	Смирнов А.П.
	Информатика	И8-12-4		Экзамены	12,5	Смирнов А.П.
	Информатика	И8-12-4		Консульт. экз.	2,0	Смирнов А.П.
…	…	…	…	…	…	…

 

2. Требуется (с помощью средств VBA) разработать программное обеспечение, позволяющее получать список дисциплин, читаемых в определенные семестры, следующего вида:

Название семестра Учебный год:…

Список читаемых дисциплин

Дисциплина	Преподаватель	Группа	Вид нагрузки (часы)	Примечание
Лекции	Практич.	Лаб.

3. В список выводятся записи только с аудиторной нагрузкой, т.е. если в поле Вид нагрузки (в БД) содержатся следующие значения: Лекции; Лабораторные; Практич., семин.

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

1. Сохранить его в файле Осень или Весна-9999.xls на листе Нагрузка (например, для осеннего семестра 2012 года название конечного файла Осень-2012.xls). Книга должна иметь один лист.
2. Файл поместить в папку C:\Институт.
3. Запрос на формирование списка дисциплин, читаемых в осеннем или весеннем семестре, реализовать с помощью формы, которая имеет следующий вид:

1. В списке Учебный год пользователь выбирает нужный ему год. На основе выбранного года формируется имя открываемой БД.
2. По умолчанию в поле Учебный год установить пусто. Список поля Учебный год должен содержать 4 элемента: пусто, номер предыдущего года, текущего и следующего.
3. С помощью командной кнопки Осень сформировать список дисциплин, читаемых осенью, кнопкой Весна – список дисциплин, читаемых весной.
4. Кнопку Осень связать с клавишей [Enter], кнопку Отмена – с клавишей [Escape].
5. Программа должна находиться в файле Программа Дисциплины.xls.
6. Предусмотреть обработку событий, связанных с различными состояниями исходного и конечного файлов: закрыты, открыты, не существуют. При наличии конечного файла выдать запрос на его замену.
7. Оформить программу согласно требованиям, изложенным на лекциях.
8. Для отладки программы прилагается файл Кафедра-2012.xls.
9. Придумать свой вариант задания.

Домашнее задание №3

Модифицировать программу Программа Дисциплины.xls следующим образом:

1. При открытии файла с программой в стандартном интерфейсе Excel должна появляться панель инструментов с кнопками О программе и Дисциплины. При щелчке по кнопке О программе на экране должна появляться форма с данными о разработчике программы. Вторая кнопка предназначена для вызова формы, реализованной в ДЗ № 2.

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

Вариант 5.

Домашнее задание №2

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

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

1. В базе данных Excel Афиша.xls содержатся данные о кинопоказах. БД хранятся в папке C:\Синема и содержат следующую информацию:

Название фильма	Жанр	Продолжительность (мин.)	Кинотеатры	Дата	время сеанса	цена
V значит Вендетта	трилллер		Ноябрь	12.04.13	10.00
V значит Вендетта	трилллер		Алмаз	11.04.13	09.00
V значит Вендетта	трилллер		Синема-парк	11.05.13	11.30
Босиком по мостовой	мелодрамма		Октябрь	11.04.13	10.00
Звонок	ужасы		Перекрксток	12.04.13	11.30
Звонок	ужасы		Витязь	12.04.13	15.00
Звонок	ужасы		Звездный	12.04.13	14.30
Иван Васильевич меняет профессию	комедия		Калужский	12.04.13	15.00
Иван Васильевич меняет профессию	комедия		Витязь	12.04.13	16.10
Иван Васильевич меняет профессию	комедия		Перекрксток	11.04.13	16.00
Иллюзия полета.avi	мелодрамма		Аврора	11.04.13	16.30
Миссия невыполнима 3	боевик		Калужский	12.04.13	17.40
Миссия невыполнима 3	боевик		Алмаз	12.04.13	18.00
Миссия невыполнима 3	боевик		МДМ	11.04.13	17.30
Миссия невыполнима 3	боевик		Аврора	11.05.13	17.10
Нокаут (По прозвищу Золушка)	мультфильм		Перекресток	11.05.13	19.00
Форест Гамп	детектив		Синема-парк	12.04.13	20.00
Форест Гамп	детектив		Аврора	12.04.13	21.20
Форест Гамп	детектив		Витязь	11.05.13	20.40
Эйс Вентура - поиск пропавших животных	комедия		МДМ	12.04.13	23.05
Эйс Вентура - поиск пропавших животных	комедия		Звездный	11.04.13	23.30
Эйс Вентура - поиск пропавших животных	комедия		Калужский	11.05.13	22.10
ЭонФлакс	фантастика		Звездный	12.04.13	22.35
ЭонФлакс	фантастика		МДМ	11.04.13	00.00
ЭонФлакс	фантастика		Аврора	11.05.13	23.00
Яма	трилллер		Витязь	12.04.13	21.15
Яма	трилллер		Звездный	12.04.13	20.50
Яма	трилллер		МДМ	11.04.13	21.09

2. Требуется (с помощью средств VBA) разработать программное обеспечение, позволяющее получать список сеансов следующего вида:

Список предлагаемых сеансов на {дата}. Жанр: {жанр}

№ п.п.	Название фильма	Время сеанса	Кинотеатр	Цена билета

3. Сохранить его в файле Жанр.xls (где Жанр – название жанра,) на листе Сеансы. Книга должна иметь один лист.

4. Файл поместить в папку C:\Синема.

5. Запрос на создание списка сеансов реализовать с помощью формы, которая имеет следующий вид:

6. В списке Выберите дату: пользователь указывает дату.

7. Список поля Выберите дату: должен содержать 7 дат, начиная с текущей. По умолчанию – текущая дата.

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

9. В случае отсутствия фильмов запрашиваемого жанра на конкретную дату конечный файл не формировать, а выдать информационное сообщение следующего вида: «Фильмы жанра {жанр} на {дата} не найдены!»

10. Кнопку ОК связать с клавишей [Enter], кнопку Отмена – с клавишей [Escape].

11. Программа должна находиться в файле Программа-Фильмы-Дата.xls.

12. Предусмотреть обработку событий, связанных с различными состояниями исходных БД и конечного файла: закрыты, открыты, не существуют. При наличии конечного файла выдать запрос на его замену.

13. Оформить программу согласно требованиям, изложенным на лекциях.

14. Придумать свой вариант задания.

Домашнее задание №3

Модифицировать программу Программа-Фильмы-Дата.xls следующим образом:

1. При открытии файла с программой в стандартном интерфейсе Excel должна появляться панель инструментов с кнопками О программе и Фильмы. При щелчке по кнопке О программе на экране должна появляться форма с данными о разработчике программы. Вторая кнопка предназначена для вызова формы, реализованной в ДЗ № 2.

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

Библиография

1. Муратова С.Ю. Макросы и приложения. Курс лекций. – Москва, издательский Дом МИСиС, 2013, 157 с.
2. Гарнаев А.Ю. VBA: в подлиннике.– СПб.: BHV – Санкт-Петербург, 2005. – 848 с.
3. Гарнаев А.Ю. Microsoft Excel 2000: Разработка приложений. – СПб.: BHV – Санкт-Петербург, 2000. – 576 с.: ил.

 

[1] Термины «программа», «подпрограмма» и «процедура» часто используются как синонимы. Все они определяют один и тот же элемент — фрагмент кода VBA от ключевого слова Sub до ключевого слова End Sub.

[2] В данном примере ключевые слова выделены полужирным начертанием. В окне VBA они также выделены, но цветом, как и все остальные ключевые слова. Синий цвет свидетельствует, что слова введены правильно и редактор распознал их. Если введенное Вами ключевое слово не выделено цветом, проверьте, правильно ли оно набрано.

[3] Вспомним, что Workbooks – это семейство ОТКРЫТЫХ книг, а книга Мои таблицы.xls закрыта.

[4] или одноименными командами меню Отладка (Debug)

[5] Эта кнопка известна вам под названием Запуск подпрограммы/Формы (Run Sub/UserForm). После того как вы запустили программу, она будет называться Продолжить (Continue).

[6] Изменить настройки редактора VBA можно, воспользовавшись командой Сервис / Параметры / Форматы (Tools/Options/Editor Format)

[7] Понятно, что Ваш макрос будет выглядеть несколько по-другому.

[8] которую мы не изменяли.

[9] равно как и все остальные.

[10] Эта команда равносильна следующей записи:

If Num1 = "" Then Exit Sub

[11] Напомню, что в первой форме мы отбирали сотрудников кафедры АСУ, а во второй – кафедру. Объединим эти две формы в одну и создадим универсальный диалог для выбора кафедры и её преподавателей.

[СЮМ1]Модернизация - оформление?

[СЮМ2]Модернизация - оформление?

[M3]Добавить процедуру Оформление?

[СЮМ4]Упомянуть в Ошибках