Public Class main
    Shared Sub main()
        Dim splash As New startupform()
        splash.Show()
        splash.Refresh()
 
 
        Application.Run(New MDI_main())
        Application.Exit()
    End Sub
End Class