别人的一个程序,工程中设置第一个启动窗口为MainFrm,但是运行时,先出现了登陆窗口,问一下这是怎么实现的???

解决方案 »

  1.   

    用VB应用程序向导做一个:新建工程------VB应用程序向导-----下一步------下一步最后选上“启动应用程序时的展示屏幕”----------------------------------------
    Public fMainForm As frmMain
    Sub Main()
        frmSplash.Show
        frmSplash.Refresh
        Set fMainForm = New frmMain
        Load fMainForm
        Unload frmSplash
        fMainForm.Show
    End Sub
      

  2.   

    用VB应用程序向导做一个:新建工程------VB应用程序向导-----下一步------下一步最后选上“启动应用程序时的展示屏幕”
    "登陆窗口"
    ----------------------------------------
    Public fMainForm As frmMain
    Sub Main()
        frmSplash.Show
        frmSplash.Refresh
        Set fMainForm = New frmMain
        Load fMainForm
        Unload frmSplash
        fMainForm.Show
    End Sub