Как выключить компьютер, перезагрузить его или выйти из системы с помощью Visual Basic 2010

Даже не ожидал, что у Visual Basic 2010 есть такие возможности. Там есть метод, который запускает команду Windows для выключения компьютера. Метод такой:

Для выключения: Shell("Shutdown -s -f -t 00")

Для перезагрузки: Shell("Shutdown -r -f -t 00")

А вот для выхода из системы код немного другой. После Public Class Form1 код должен быть такой:

Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

Без него нельзя. Но для собственно выхода нужен другой код (этот тоже оставьте). Его писать в том месте, где надо выйти. Вот такой:

ExitWindowsEx(0, 0)

Выглядеть будет так:

Как выключить компьютер, перезагрузить его или выйти из системы с помощью Visual Basic 2010 Visual basic, 2010, Программа, Выключение, Перезагрузка, Выход, Система, Видео

Это работает!!!!!! А вот видео:

Лучшие посты за сегодня
8890

Обещанный 10 лет назад анекдот

Обещанный 10 лет назад анекдот Анекдот, Обещание, Длиннопост, Комментарии на Пикабу, Скриншот, Украина
Обещанный 10 лет назад анекдот Анекдот, Обещание, Длиннопост, Комментарии на Пикабу, Скриншот, Украина
Показать полностью 2
7056

Тяжело наверное на такой работе...

Тяжело наверное на такой работе...
6772

Ответ на пост «Бывает»

6725

Неожиданность

6267

Просто фото

Просто фото Мобилизация, Фотография, Дети, Грусть
Показать полностью 1
5434

Обижаешь кого-то — будь готов на ответку

5143

Спец отряд астматиков

5021

Похвастаться чисто

5006

Накануне в Италии на выборах победила ультраправая партия

4997

"Ревдинскому рабочему" не до креатива...

"Ревдинскому рабочему" не до креатива... СМИ и пресса, Ревдинский рабочий, Газеты, Мобилизация
Показать полностью 1
4743

Пассивная агрессия Пятёрочки

Пассивная агрессия Пятёрочки Скриншот, Комментарии, Пятерочка, Юмор, Повтор, Пассивная агрессия
Показать полностью 1
4711

Ответ на пост «Спасибо США?»

Ответ на пост «Спасибо США?» Политика, Военные, СВО, Газ, Нефть, Газопровод, Украина, Россия и Украина, Текст, Мат, Ответ на пост
Показать полностью 1
4695

Когда понял, что халявная еда закончилась, и придётся всё делать самому

Когда понял, что халявная еда закончилась, и придётся всё делать самому Юмор, Забавное, Тигр, Неожиданно
4334

Однажды Эрнест Хемингуэй поспорил, что напишет самый короткий рассказ, способный растрогать любого. Он выиграл спор:

Однажды Эрнест Хемингуэй поспорил, что напишет самый короткий рассказ, способный растрогать любого. Он выиграл спор:
4242

Ответ на пост «Ахиллес»

4160

Этот товар в магазине стоит более миллиона рублей за килограмм

Этот товар в магазине стоит более миллиона рублей за килограмм Шафран, Специи, Приправы, Магазин
Показать полностью 1
3950

Капитализм с другим лицом

Капитализм с другим лицом
3925

Ответ на пост «Лысые с травматом на дороге»

Ответ на пост «Лысые с травматом на дороге» Негатив, Конфликт, Авто, Травматическое оружие, Вдв, Чувашия, Ответ на пост
Показать полностью
3868

Два варианта

Два варианта
3795

Жду военный конвой с мигалками

Похожие посты закончились. Возможно, вас заинтересуют другие посты по тегам: