VBScript: MsgBox mit Timeout

Juli 6, 2009 - VBScript - Tagged: , , - Keine Kommentare

Bei der MsgBox-Funktion wird eine Nachricht in einem Dialogfenster angezeigt. Es wird solange gewartet bis der Benutzer auf eine Schaltfläche klickt und dann ein Wert zurück geliefert, auf was der Benutzer geklickt hat.

VBScript MsgBox


Wenn der Benutzer nicht auf eine Schaltfläche klickt, läuft das Script nicht weiter.

Hier nun ein kleiner Codeschnipsel mit Dialogfeld und (10 Sekunden) Timeout.

Set WshShell = WScript.CreateObject( "WScript.Shell" )
 
IF WshShell.Popup("1 + 2 = 3?", 10, "Info", vbYesNo + vbQuestion + vbSystemModal) = vbYes Then
	WScript.Echo "Richtig"
ELSE
	WScript.Echo "Falsch"
End If

Download: MsgBox-Test.vbs
MsgBox Function