Frage : PPT Taskkill Befehl VBS MsgBox

Ich muss einen Tötungbefehl dem below MsgBox hinzufügen. Wenn das Benutzerklicken Löschen, das ich wünsche, ist das ppt auf dem Schreibtisch zu stop.

Here der Tötungbefehl: Taskkill /f /im POWERPNT.EXE

Dim strMbox


strMbox = MsgBox („Sie haben 10 Tage, zum des Trainings zu nehmen, oder Ihr Konto ist verschlossen. O.K. anklicken, um das Training oder Klicken-Löschen zu beginnen, um das Training am folgenden LOGON zu nehmen. “, _
vbQuestion + vbOKCancel, _
„WICHTIGES vorgeschriebenes Training“)

Antwort : PPT Taskkill Befehl VBS MsgBox

Dieses Ihrer erklärten Variable so zunächst hinzufügen:
oShell verdunkeln

Dieses unter der letzten Linie Ihres Indexes dann hinzufügen:

Wenn strMbox = „vbcancel“ dann
oShell = WScript.CreateObject („WSCript.shell“) einstellen
oShell.run „cmd /c Taskkill /f /im POWERPNT.EXE“
oShell einstellen = nichts
Beenden wenn