MSgbox 1sek einblenden

Forumthread: MSgbox 1sek einblenden

08.03.2004 09:57:51

michael

Hallo, kann man eine msgbox für nur eine Sek einblenden?
sie soll sich dann autom. scxhließen.
Gruß
Micha

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: MSgbox 1sek einblenden

08.03.2004 10:41:49

Andi
Danke es funkt!!! o.T.

08.03.2004 11:06:15

Michael

AW: MSgbox 1sek einblenden

08.03.2004 10:41:49

Andi

Hi Micha,
folgendes hab' ich mir mal irgendwann hier aus dem Forum rauskopiert:


Sub MsgBox3Sekunden()
' von Franz W Herber.de
' Verweis auf Microsoft Scripting Runtime
Dim WsShell
Dim intText As Integer
Set WsShell = CreateObject("WScript.Shell")
intText = WsShell.Popup("Diese Meldung wird nach 3 Sekunden geschlossen.", 3, "Automatisch...")
' Die 3 in der letzten Zeile gibt die Dauer der Öffnung an.
End Sub

hab's zwar noch nie benutzt, daher keine Garantie, aber nachdem "Von Franz W Herber" oben drinsteht, wird's wohl was taugen.
Schönen Gruß,
Andi

Danke es funkt!!! o.T.

08.03.2004 11:06:15

Michael

Forumthread: MSgbox 1sek einblenden

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread