Visual Basic > API and Miscellaneous

Give your application a splashscreen

Give your application a splashscreen

'Splash screen vb3/4
'make a form; put an image_control on it
'no caption, no clipcontrols, no systembox
'borderstyle=fixed
'vb4 = shownintaskbar=no

'put the code in the form_load event
Sub Form_Load()
    Top = (Screen.Height * 0.9) / 2 - Height / 2
    Left = Screen.Width / 2 - Width / 2
    Me.Show		'show this form
    Me.Refresh
    Load Form2		'load first form of youre application
			'meanwhile it's doning all the code in youre
			'form2.load_event
    
    Form2.Show		'ready? show form
    Unload Form1	'unload this one

End Sub

'ALSO:
'Make sure that youre StatupForm is form1
'Check it on this way:
'Tools->Options->Project (vb4)
'Options->Project->StartUp Form (vb3)

Return