I've decided my app needs a splash screen while it pre-loads a bunch of controls in different forms.
frmSplash is called from frmMain's load event.
frmSplash has one label that says "Loading" and beside it is another label(lblDot).
Then there's a timer to change the number of periods in lblDot.
The timer is enabled and set to 500 ms.
But it only fires once.
I've tried moving the timer to frmMain, but it's still not working.
Do timers require DoEvents before they'll work?
Any other ideas?
Code:Private Sub tmrLoad_Timer() Static lCnt As Long lCnt = lCnt + 1 If lCnt > 9 Then lCnt = 1 End If frmSplash.lblDot.Caption = String$(lCnt, ".") End Sub




Reply With Quote