switching forms

[Negative0]

Create a new module and add a Sub Main in there. Change your startup object to Sub Main.

In sub main just have:

Sub Main()
dim f as new frmAsiSplash
f.ShowDialog()
dim fMain as new frmMain
fMain.showDialog()
 
End sub

Then in frmAsiSplash, just have this:

Private Sub tmrAsiSplash_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tmrAsiSplash.Tick
 
Dim Main As New frmMain
Main.Show()
Me.Close()
 
End Sub