|
Офисное программированиеPrivate Sub Workbook_BeforeClose(Cancel As Boolean) Application.Caption = Empty 'Установка заголовка окна приложения по умолчанию Application.CommandBars(«Standard»).Visible = True Application.CommandBars(«Formatting»).Visible = True End Sub Теперь сохраните все изменения и закройте Excel. Далее при открытии файла с базой вы увидите новый интерфейс приложения и подгруженную форму с регистрацией клиента. Задача на закрепление материала Пример 60.[8] Создать базу данных «Общежитие». Для этого разработать приложение с диалоговым окном «Общежитие», в котором: счетчик управляет вводом продолжительности проживания; в раскрывающемся списке выводятся три типа номеров: одноместный, двухместный, люкс, стоимость проживания в которых равна соответственно 550, 400 и 750Pруб. в сутки; если постоялец заказывает завтраки в номер, то суточная оплата возрастает на 75Pруб.; при нажатии на кнопку ОК в поле Стоимость проживания выводится суммарная стоимость проживания клиента, и все данные из диалогового окна должны выводиться в базу данных, создаваемую на рабочем листе; кроме того, происходит автоматическое сохранение рабочей книги на диск ...» | Код для вставки книги в блог HTML
phpBB
текст
|
|