Вопрос : Командование VBS MsgBox PPT Taskkill

Мне нужно добавить командование убийства к внизу MsgBox. Если Cancel, то щелчков потребителя, котор я хочу ppt на настольный компьютер к stop.

Here будет командование убийства: strMbox strMbox


Taskkill /f /im POWERPNT.EXE

Dim = MsgBox («вы имеете 10 дней для того чтобы принять тренировку или ваш учет будет заперт. Щелкните О'КЕЙОМ для того чтобы начать Cancel тренировки или щелчка для того чтобы принять тренировку на следующее имя пользователя. », vbQuestion _
+ vbOKCancel, «
ВАЖНОЙ необходимой тренировки» _
) class=

Ответ : Командование VBS MsgBox PPT Taskkill

Настолько затем добавьте это к вашей объявленной перемеююому:
Затемните oShell

После этого добавьте это под последней линией вашего сценария:

Если strMbox = «vbcancel» после этого
Установите oShell = WScript.CreateObject («WSCript.shell»)
oShell.run «cmd /c Taskkill /f /im POWERPNT.EXE»
Установите oShell = ничего
Закончитесь если