10 lines
357 B
Plaintext
10 lines
357 B
Plaintext
x = MsgBox("Computer is not responding",16,"Error")
|
|
x = MsgBox("Would you like to shutdown?",vbYesNo+vbInformation,"Error")
|
|
if x =6 then
|
|
yes = MsgBox("Sutting down.",48,"Shutdown Error")
|
|
run shutdown.bat
|
|
End if
|
|
|
|
if x =7 then
|
|
no = MsgBox("Are you sure? If you don't turn off the computer you could lose any unsaved files.",32,"Are you sure?")
|
|
end if |