Form to Form & Longer Splash Screen

[Jop]

1.

'Make it invisible to prevent flickering and overlaying.
Me.Visible = False
'Show FORM2
Form2.Show
'Unload the current form from the memory
Unload Me

2.

'Put a timer on the Splash screen and set the Interval to 3000 (for 3 seconds = 3000 miliseconds)
Private Sub Timer1_Timer()
'Unload the Splash Screen from the memory
Unload Me
End Sub