Office: (Office 2010) MsgBox nach 10 Sekunden automatisch schließen

Morgen zusammen,

wie kann ich eine MsgBox nach 10 Sekunden automatisch schließen?

:)

 

Eine normale MsgBox blockiert die Codeausführung in Access komplett. Somit hast du keine Möglichkeit die MsgBox automatisch wieder zu schließen.
Du könntest dir ein eigenes Formular erstellen, das aussieht wie eine MsgBox und dieses stattdessen anzeigen. Darin kannst du dann eigenen Code unterbringen, der ausgelöst durch einen Timer das Form nach einer gewissen Zeit wieder schließt.

 

Ein Timer ist nicht davon betroffen, das Event wird vom Betriebssystem ausgelöst. (Das ist meiner Meinung nach wichtig zu wissen)
Theoretisch könnte man per APi Timer Callback das Form schließen. Allerdings ist das sicher aufwendiger, wie ein Formular selbst zu erstellen, da man dem Formular auch noch viele weitere Eigenschaften mit auf den Weg geben kann.

LG Markus

 

Ok, danke erstmal für eure Antworten.

Der Hintergrund ist eigt. der, dass ich eine DB bei Wartung nicht ohne Vorwarnung schließen möchte, sondern eine MsgBox anzeigen lasse. Die Idee mit dem Formular gefällt mir eigt gut:

Code:

Beim Öffnen des Hauptformulars wird ein Timer gesetzt (alle 60 Sek wird geprüft ob das txt-Dokument verfügbar ist).

Wie bekomme ich es hin, nach dem Öffnen des Formulars "FrmDBschliessen" ein Warten von 5 Minuten einzubauen, bis der Code weiter ausgeführt wird, d.h. ich will dem User 5 Minuten Zeit zu geben, seine Daten zu sichern und rauszugehen.

 

Hallo rainerZZ,

zu dem Thema siehe auch im DBWiki:
VBA Tipp: Eine Meldung zeitgesteuert anzeigen

Gruß
Josef

 

\@Joss,

habs ausprobiert, klappt auch. Das Problem ist nur, dass nachdem das Formular (oder in deinem Bsp. die Timerbox) geöffnet wird, soll x Sekunden der Code angehalten werden. Das klappt leider nicht. D.h. so:

Code:

 

Diese Aussage solltest du überprüfen. Ich kann das so nicht bestätigen.

 

Bei DB-Wiki gibts alles *Smilie

https://dbwiki.net/wiki/VBA_Tipp:_Pr...m_unterbrechen

Jetzt muss ich nur noch wissen, wie ich in dem geöffneten Formular in einer Textbox den runterzählenden Timer anzeige...

 

Habs jetzt kurz getestet.
Was mir dabei aufgefallen ist:
Der normale Timer eines anderen Formulars wird ganz normal ausgelöst, während die Msgbox offen ist. Wenn ich es aber über die API aufrufe, wird der Timer nicht ausgelöst.

Man müsste also den Timer eines anderen Forms verwenden, den Rest werde ich wenn ich Zeit habe genauer unter die Lupe nehmen.

LG Markus

 

Hallo rainerZZ,

geht es so nicht?

Code:

Vielleicht habe ich auch einen Denkfehler drin. *wink.gif*

Gruß
Josef

 

Hallo rainerZZ,

ich hab mal noch was "gebastelt".
Vielleicht kannst du es brauchen? *wink.gif*

Code:

Gruß
Josef

 

Hallo!

Apropos "Ich hab mal was gebastelt": *wink.gif*
http://forum.access-codelib.net/view...php?f=14&t=414
Feature: Maske kann teiltransparent dargestellt werden.

mfg
Josef

 

\@ Joss,

danke für deine Mühe! Funktioniert auch *Smilie

 

MsgBox kann man auch schließen.

Code:

Ist jetzt mal nur ein kurzes Beispiel.
Gruß