SplashScreen is my startup form...
after it show up few second, it close itself and load frmlogin...
but it will be end the application after the frmlogin show..........
Code:Private Sub SplashScreen1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Me.FormBorderStyle = FormBorderStyle.None Timer1.Enabled = True End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Timer1.Enabled = False If Me.Opacity > 0 And Me.Opacity <= 1 Then Me.Opacity = Me.Opacity - 0.1 Timer1.Enabled = True Else Me.Close() frmLogin.Show() End If End Sub




Reply With Quote