Declare Sub ExitWindowsDialog Lib "shell32" Alias "#60" (ByVal hwndOwner As Long) As Long
Функция ExitWindowsDialog официально не задокументирована. ExitWindowsDialog запрашивает пользователя с диалоговым окном "Завершение работы Windows". Это то же самое диалоговое окно, которое появляется при выборе пользователем "Завершение работы" в меню кнопки Пуск. К сожалению, не имеется никакого способа узнать, что пользователь выбрал в диалоговом окне.
Функция не возвращает никаких значений.
' Добавьте код в нужное место ExitWindowsDialog Form1.hWnd 'Все!