Start a new project and add a command button to the form, and then add a splash screen form and place a Timer control on the splash screen with an interval of 5000 then drop in this code in the main form
Private Sub Command1_Click()
frmSplash.Show
End Sub
and add this code to the splash screen
Private Sub Timer1_Timer()
Unload Me
End Sub
Hope this helps.
If you choose to battle wits with the witless be prepared to lose.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.