Dim cmd Dim obj cmd = ("shutdown -s -t 60 -f") obj = CreateObject("WScript.Shell") obj.run(cmd)
Dim cmd Dim obj cmd = ("shutdown -s -t" & val(textbox1.text) * 60 "-f") obj = CreateObject("WScript.Shell") obj.run(cmd)
Dim cmd Dim obj cmd = ("shutdown -s -t " & val(textbox1.text) * 60 " -f") obj = CreateObject("WScript.Shell") obj.run(cmd)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)