Запуск только одной формы без главного окошка СУБД "Microsoft Access"
Андрей Сергеев 05.06.2001
От: Андрей Сергеев 05.06.2001 4:39:21 Запуск только одной формы без главного окошка СУБД "Microsoft Access" Для экспериментов создал с помощью мастера новую базу по заготовленному в офисе шаблону - "Заказы на работы", т.к. там уже есть модули для форм.
1. Установил в свойствах формы "всплывающее окно" - да, "модальное окно" - да
2. Открыл модуль "общие программы" и дописал в конец:
Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, _ ByVal nCmdShow As Long) As Long Public Const SW_HIDE = 0 Public Const SW_NORMAL = 1
3. Так же в модуль формы "Сотрудники" дописал:
'на закрытие формы Private Sub Form_Close() ShowWindow Application.hWndAccessApp, SW_NORMAL End Sub
'на открытие формы Private Sub Form_Open(Cancel As Integer) ShowWindow Application.hWndAccessApp, SW_HIDE End Sub
4. Всё это сохранил. Указал в параметрах запуска форму "Сотрудники".
(Ошибка уже исправлена, а руководство по созданию открытой формы со скрытым окном БД получилось превосходным :)) - Прим.GS) -- С уважением, Андрей Сергеев.