И8-12-1 / Вариант 14 - 38

4

ДЗ № 2 (Вариант № 14 - 38)

(автор концепции студентка гр. И8-11-1 Шлифер О.А.)

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

В БД Excel Ассортимент фильмов.xls содержатся данные о дисках с фильмами, имеющимися в продаже. Файл хранится в папке C:\Фильмы. БД имеет следующую структуру:

Артикул	Фильм	Жанр	Год выпуска	Режиссёр	Качество	Цена, руб.
156598	"Побег из Шоушенка"	драма	1994	Фрэнк Дарабонт	Blu-ray	450
576345	"Форест Гамп"	драма	1994	Роберт Земекис	DVD	220
698521	"Хороший, плохой, злой"	вестерн	1966	Серджио Леоне	DVD	250
456923	"Престиж"	триллер	2006	Кристофер Нолан	Blu-ray	470
249378	"Властелин колец" (трилогия)	фэнтэзи	2001	Питер Джексон	Blu-ray	1300
126453	"Зелёная миля"	драма	1999	Фрэнк Дарабонт	DVD	250
892136	"Назад в будущее" (трилогия)	фантастика	1985	Роберт Земекис	DVD	700
459863	"Начало"	фантастика	2010	Кристофер Нолан	Blu-ray	470
189637	"Омен"	ужасы	2006	Джон Мур	DVD	260
359326	"Шестое чувство"	триллер	1989	М. Найт Шьямалан	DVD	250
598632	"Голая правда"	мелодрама	2009	Роберт Лукетич	Blu-ray	400
235897	"Смертельное оружие"	боевик	1987	Ричард Доннер	DVD	230
759863	"Служебный роман"	мелодрама	1977	Эльдар Рязанов	DVD	410
359864	"Одноклассники"	комедия	2010	Деннис Дуган	Blu-ray	430
659831	"Барт" (дилогия)	боевик	1997	Алексей Балабанов	DVD	500
879653	"Пираты Кариибского моря"(трилогия)	фэнтэзи	2003	Гор Вербински	Blu-ray	1350
276359	"Молчание ягнят"	триллер	1990	Джонатан Демме	DVD	200
379146	"Аватар" 3D	фантастика	2009	Джеймс Кэмерон	Blu-ray	580
123894	"Человек дождя"	драма	1988	Барри Левинсон	DVD	250
265946	"Иван Васильевич меняет профессию"	комедия	1973	Леонид Гайдай	DVD	220
778695	"ВАЛЛ-И"	мультфильм	2008	Эндрю Стэнтон	Blu-ray	400
493856	"1+1"	комедия	2011	Оливье Накаш	Blu-ray	450
165326	"Джентльмены удачи"	комедия	1971	Александр серый	DVD	230
786598	"Хористы"	драма	2004	Кристоф Барратье	DVD	250
659342	"Хоббит: Нежданное путешествие"	фэнтэзи	2012	Питер Джексон	Blu-ray	480
231321	"Балто"	мультфильм	1995	Саймон Уэллс	DVD	200
556963	"Блеф"	комедия	1976	Серджио Корбуччи	DVD	240
498895	"Заплати другому"	драма	2000	Мими Ледер	DVD	270
478965	"Ледниковый период"(трилогия)	мультфильм	2002	Крис Уэдж	Blu-ray	1250
125643	"Бриллиантовая рука"	комедия	1968	Леонид Гайдай	DVD	270
336593	"Крупная рыба"	фэнтэзи	2003	Тим Бертон	Blu-ray	460
256532	"Амели"	комедия	2001	Жан-Пьер Жёне	DVD	230
789858	"Труп невесты"	мультфильм	2005	Тим Бертон	DVD	230
487585	"Воображариум доктора Парнаса" 3D	фэнтэзи	2009	Терри Гиллиам	Blu-ray	560
789988	"Еще одна из рода Болейн"	драма	2008	Джастин Чадвиг	Blu-ray	420
656966	"В джазе только девушки"	комедия	1959	Билли Уайлдер	DVD	270
845484	"Искусственный разум"	фантастика	2001	Стивен Спилберг	DVD	280
798987	"Гараж"	комедия	1979	Эльдар Рязанов	DVD	250
213565	"Район №9"	фантастика	2009	Питер Джексон	Blu-ray	490

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

Список дисков с фильмами жанра-{Жанр} качества- {Качество}

Название	Артикул	Год выпуска	Режиссер	Цена

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

3. Записи конечной таблицы должны быть отсортированы по полям Название и Год выпуска.

4. Сохранить его в файле Фильмы-{жанр}.xls на листе Фильмы (например: Фильмы-триллер.xls). Книга должна иметь один лист. Название листа – текущая дата

5. Файл поместить в папку C:\Фильмы\{Качество}. При отсутствии папки – создать её.

6. Запрос на создание искомого списка реализовать с помощью формы:

7. Поле со списком Жанр фильма (ComboBox) содержит жанры фильмов и формируется из значений столбца Жанр исходной БД. Список жанров должен быть отсортирован по алфавиту. По умолчанию - первый элемент отсортированного списка.

8. С помощью переключателей (OptionButton) пользователь указывает интересующее его качество фильма. По умолчанию включен переключатель DVD.

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

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

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

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

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

ДЗ № 3

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

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

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

Требования к оформлению ДЗ 2 и 3

Отчет по ДЗ должен быть сдан в электронном и печатном виде и включать в себя:

1. Титульный лист (пустые строки недопустимы! Вспоминаем интервалы! ).

2. Оглавление.

3. Постановку задачи (задание, которое Вы получили от меня).

4. Листинг программы, напечатанный в редакторе VBA (или в редакторе Word: шрифт – Courier, 10 пунктов).

5. План тестирования программы.

6. Придуманное Вами задание.

7. Главы должны быть пронумерованы. Стиль заголовков – Заголовок 1. Если в главах имеются параграфы, то стиль заголовка должен соответствовать их уровню.

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

При невыполнении этих требований домашняя работа считается невыполненной и к защите не принимается!