|
Действия ...
Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
29.10.2004, 14:08:57
|
|||
|---|---|---|---|
|
|||
Кнопка "выход из базы" на панели инструментов... |
|||
|
#18+
Подскажите как сделать кнопку на панели инструментов, чтобы выполнялось что-то типа: If MsgBox(" Вы хотите выйти? ", vbCritical + vbOKCancel + vbDefaultButton2, "Выход") = vbOK Then Application.quit acQuitPrompt End If а не стандартный выход с помощью, например, макроса. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
29.10.2004, 14:35:07
|
|||
|---|---|---|---|
Кнопка "выход из базы" на панели инструментов... |
|||
|
#18+
Напиши в модуле Function Выход() If MsgBox(" Вы хотите выйти? ", vbCritical + vbOKCancel + vbDefaultButton2, "Выход") = vbOK Then Application.Quit acQuitPrompt End If End Function Создай макрос ЗапускПрограммы Выход() Сделай на панели кнопку для запуска макроса ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
29.10.2004, 14:46:42
|
|||
|---|---|---|---|
Кнопка "выход из базы" на панели инструментов... |
|||
|
#18+
2 Roma R А что, без макроса функции не запускаются из кнопок меню?:) Функцию в модуле достаточно Public объявить - вот и всё... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=45&tablet=1&tid=1670676]: |
0ms |
get settings: |
9ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
26ms |
get topic data: |
9ms |
get forum data: |
3ms |
get page messages: |
37ms |
get tp. blocked users: |
1ms |
| others: | 213ms |
| total: | 319ms |
| 0 / 0 |
