MessageBoxen?

29/10/2011 - 18:54 von Lothar Geyer | Report spam
Kann man irgendwie erfahren, dass vom Programm gerade eine (modale)
Messagebox angezeigt wird?

Unsere Anwendung reagiert auf viele Timer- und auch externe Events. Nun
kommt es ab und zu vor, dass gerade eine MsgBox angezeigt wird, wàhrend
eine MDIchild-Form angezeigt werden soll. Der Fehler 401 kommt aber erst
in der Form, nicht schon in der startenden Routine.

Lothar Geyer
 

Lesen sie die antworten

#1 W. Wolf
30/10/2011 - 08:36 | Warnen spam
"Lothar Geyer" schrieb
Kann man irgendwie erfahren, dass vom Programm gerade eine (modale)
Messagebox angezeigt wird?



[...]

Alternativer Lösungsansatz:
Schau dir mal den Thread von Susann (15.02.2011)
"Nachbildung der MsgBox-Funktion" an. Hier wàre es
total einfach, eine glabale Variable zu setzen bevor die
Box angezeigt wird. Kannst natürlich mit der VB-MsgBox
auch machen, indem Du die Box immer über eine globale
Funktion aufrufst:

myMsgBox.bas:

Public MyBoxIsVisible As Boolean
Public Function MyMsgBox(Prompt, _
Optional Buttons As VbMsgBoxStyle = vbOKOnly, _
Optional Title, _
Optional HelpFile, _
Optional Context) As VbMsgBoxResult
MyBoxIsVisible = True
MyMsgBox = MsgBox(Prompt, Buttons, Title, HelpFile, Context)
MyBoxIsVisible = False
End Function

Jetzt brauchst Du nur noch ein IDE-Suchen&Ersetzen in deinem
Code: MsgBox ersetzen durch MyMsgBox.

Diese Funktion kann wunderbar erweitert werden, z.B. mit einen
weiteren Parameter, der festlegt, ob die Message auch gelogt werden
soll.


Schönen Gruß
W. Wolf

Ähnliche fragen