Datumsauswahl anzeigen

[gsaccess]

In der Anlage noch die Testdatei mit dem importierten Modul und dem Code

Code [Auswählen] Erweitern

    If Not Keyboardstate.Numlock Then
        Keyboardstate.Numlock = True
    End If beim Verlassen von Arbeitstag.

Ich hoffe ich habe das richtig verstanden.
Günther

[PhilS]

Ich hoffe ich habe das richtig verstanden.

Ja, du hast das richtig verstanden.

Danke für deine Testdatei.
Ich kann das von dir beschriebene Verhalten nachvollziehen. :-/

Hier gibt es tatsächlich ein Problem mit meinem Klassenmodul. Es liegt kein Fehler unmittelbar in dem Klassenmodul selbst vor, sondern die verwendete Windows-API-Funktion GetKeyboardState liefert teilweise(?) falsche Ergebnisse, wenn der NUMLOCK-Zustand durch SendKeys ("%{DOWN}") geändert wurde.
Das gilt analog ebenso für die GetKeyState und GetAsyncKeyState APIs.

Nach einer ersten Recherche ist mein Verdacht, dass in den problematischen Situationen der globale Zustand des Keyboards und die Kopie dieses Zustands für den aktuellen Thread nicht übereinstimmen.

Für weitere Schlussfolgerungen und eventuelle Lösungsansätze brauche ich etwas mehr Zeit.
 

[gsaccess]

Vielen Dank für deine Rückmeldung. Ich bin schon gespannt ob es dazu wirklich eine Lösung gibt.
Günther

[Trombomaniac]

Vielleicht hilft ja dieses Video:
https://www.youtube.com/watch?v=m3s3dmbuv-8

Gruss