on-line-teaching.com

[avensis]

[list=]
1. В базе данных Excel Отели Москвы.xls содержатся данные об отелях. БД хранятся в папке C:\ Отели и содержат следующую информацию:
Таблица 1. Фрагмент БД Отели:



Отель Рейтинг Округ Адрес Телефон Описание Дополнительный сервис
Аррарат-Хаят 5 ЦАО ул. Никольская д.1 (495)755-77-77 Фитнес зал, бассейн, мини бар, душ, телевизор, сейф, интернет, телефон балкон 3 ресторана, салон красоты, конференц связь, индивидуальный пошыв одежды, услуги такси, услуги консьержа, аптека. Частная парковка
Марриотт-Тверская 5 ЦАО ул. Тверская д.7 корп.1 (495)788-01-02 фитнес зал, мини бар, душ, телевизор, сейф, интернет, телефон, балкон салон красоты, конференц связь, химчистка, услуги такси. конференц зал
Марриотт-Петровка 5 ЦАО ул. Петровка д.4 (495)335-7272 фитнес зал, мини бар, душ, телевизор, сейф, интернет, телефон ресторанная зона, ателье, салон красоты, заказ такси, заказ ресторанов, конференц зал
Кебур-Паллас 4 ЦАО ул. Остоженка д.32 (495)789-32-62 бассейн, мини бар, душ, телевизор, сейф, интернет, телефон балкон экскурсионные услуги, салон красоты, массаж, заказ такси, проведение конференций,
Украина 3 ЦАО Кутузовский проспект д.2 (499)620-54-54 мини бар, душ, телевизор, сейф, телефон 2 ресторана, заказ такси, услуги консьержа, заказ экскурсий
Пекин 3 ЦАО Садовническая улица д.15 (495)766-01-01 мини бар, душ, телевизор, сейф, телефон услуги конференц-зала, офисный центр, химчистка, салон красоты
Балчуг 4 ЦАО Петровский проезд д.5 (495)333-35-35 мини бар, душ, телевизор, сейф, интернет, телефон салон красоты, ресторан, услуги такси, услуги личного консьержа
Метрополь 5 ЦАО Старая площадь д.1 (495)781-25-71 Фитнес зал, бассейн, мини бар, душ, телевизор, сейф, интернет, телефон ресторанная зона, ателье, салон красоты, заказ такси, заказ ресторанов, конференц-зал
Акварель 4 ЦАО Столешников пер. д.12 (495)124-58-57 мини бар, душ, телевизор, сейф, интернет, телефон, балкон ресторан, такси, консьерж, салон красоты
Президент отель 5 ЗАО ул. Якиманка д.7 (495)777-81-81 Фитнес зал, мини бар, душ, телевизор, сейф, интернет, телефон, балкон конференц-зал, офис услуги. Заказ такси, услуги консьержа, услуги бронирования, услуги дома быта
Клуб 27 3 СЗАО Краснопресненская набережная д.32 (495)736-52-79 мини бар, душ, телевизор, сейф, интернет, телефон конференц-зал, заказ такси, услуги консьержа,
Салют 3 ЗАО Ленинский проспект д.126 (499)498-57-89 мини бар, душ, телевизор, телефон салон красоты, 5 ресторанов, заказ такси, продажа ж/д. и авиа билетов
Паллада 3 ЮЗАО Островитянова д.3 (495)561-59-74 мини бар, душ, телевизор, телефон ресторан, парковка
Измайловское 3 САО ул. Измайловская д.15 (495)455-89-68 мини бар, душ, телевизор, телефон салон красоты, 3 ресторана, заказ такси
Шереметьево 4 САО Аэропорт Шереметьево (Ленинградское шоссе) (495)122-25-25 мини бар, душ, телевизор, сейф, интернет, телефон 4 ресторана, химчистка. Бронирование авиа - и ж/д. билетов, заказ такси, услуги консьержа, ателье, аптека
Домодедово 4 ЮВАО Аэропорт Домодедово (495)956-12-12 мини бар, душ, телевизор, сейф, интернет, телефон 5 ресторана, конференц-залы, химчистка, бронирование авиа - и ж/д. билетов, заказ такси, услуги консьержа, ателье, аптека


Требуется (с помощью средств VBA) разработать программное обеспечение, позволяющее получать список отелей в зависимости от рейтинга:
Отели {административный округ} Рейтинг {кол-во звёзд}


№ п.п.
Отель
Адрес
Телефон
Описание Дополнительный сервис




3. Сохранить его в файле Отели-{кол-во звёзд}.xls на листе Отели (например: Отели 3 звезды.xls). Книга должна иметь один лист.
4. Файл поместить в папку C:\Отели\{административный округ}.
5. При отсутствии папки – создать её.
6. В поле со списком Округ: пользователь указывает интересующий его округ.
7. Список поля Округ: должен содержать названия округов, встречающихся в БД, и отсортирован по алфавиту.
8. В группе переключателей рейтинга пользователь указывает интересующий его рейтинг. По умолчанию выбран переключатель 3 звезды (***).
9. Кнопку ОК связать с клавишей [Enter], кнопку Отмена – с клавишей [Escape].
10. Программа должна находиться в файле Программа Отели.xls.
11. Предусмотреть обработку событий, связанных с различными состояниями исходного и конечного файла: закрыт, открыт, не существует. При наличии конечного файла выдать запрос на его замену.
[/list]