Splash Screen Help Needed

I am a newbie and am trying to get my splash screen at the begggining of the program going. Ive checked out the help file in VB 6 and pretty much followed the supplied code with a few modification

Private Sub Start()
' Show the splash screen.
frmSplash.Show
' Add your startup procedures here.
…
' Show the main form and unload the splash screen.
frmStart.Show
Unload frmSplash
End Sub

Where frmSplash is the Splash screena and frmStart is meant to be the next screen.

Unfortunately when I run the program the splash screen appears and sits there forever.

Any ideas???

Obie

The easiest way to use a splash screen is with the timer control.
Instead of Sub start(), use Sub Main()
In the timer control, set the interval to about 3050
(3.5 sec) and enter
Unload Me

So the whole code would be...
Sub Main()
Load frmSplash
frmSplash.Show
'procedures
load FrmStart
frmStart.Show
end sub

i hope this works

All I did is make a form splash screen. Put in a timer with 5 sec interval, and end of timer load next form, and next form in Form.Load disable the timer on the splash screen.
Like this
<font color=blue>Form1 (Splash Screen)</font color=blue>
<font color=red>Controls: Timer1 (Set interval 5000 ms in properties)
Private Sub Timer1_Timer()
Form1.Hide
Form2.Show
End Sub</font color=red>
<font color=blue>Form2 (Main Form)</font color=blue>
<font color=red>Private Sub Form_Load()
Form1.Timer1.Enabled = False
End Sub</font color=red>

And that's it!!!


CornEmpire Board Administrator
<A HREF="http://www.geocities.com/thecornmaster/" target="_new">http://www.geocities.com/thecornmaster/</A>