✔ Access: Button live verändern

[deusfalsus]

Hallo mal wieder,

in einem Formular soll der Start-Button nach Anklicken für die Dauer der Berechnung deaktiviert und mit einer anderen Beschriftung versehen werden:

Private Sub btn_Start_Click()
Me.txt_bis.SetFocus
Me.btn_Start.Enabled = False
Me.btn_Start.Caption = "Bitte warten ..."
Select Case Me.cbo_StatAuswahl
    
        .......

End Select
Me.btn_Start.Enabled = True
Me.btn_Start.Caption = "Start"
End Sub

Funktioniert aber nur, wenn ich das Formular manuell starte.
Wenn es über den Autostart der DB, so wie der Nutzer letztlich dran gelangt, aufgerufen wird, bleibt der Button unverändert, aber der restliche Code wird ohne Murren ausgeführt.
Woran liegt das? Was kann ich tun?

 

[deusfalsus]

Habs gelöst. So:

Private Sub btn_Start_Click()
Me.btn_Exit.SetFocus
Me.btn_Start.Enabled = False
Me.btn_Start.Caption = "Bitte warten ..."
    
start = Timer
While Timer < start + 0.1
    DoEvents
Wend
Select Case Me.cbo_StatAuswahl
...