菜鸟提问！！！！！求高手解答

Question

我做了一个东东，每个窗体是一个工程，最后要整合到一起使用，别人告诉我要新建一个汇总的工程，将以前所有窗体add进去，启动是要把汇总工程属性设置为sub Main启动，具体怎么做 啊，sub Main()怎么写啊，请高手教一下啊。最好有代码实例讲解a

Answer 1

sub Main()是启动函数，使类似于c中的main()函数。sub Main()
'在里面写启动的的窗口
'例如 FrmLogin.showend sub

Answer 2

1、先建立一个新模块，把类似下面这段Sub Main加入；
Sub Main()
  If App.PrevInstance Then MsgBox "您早已经运行了本系统！": End
    
  Screen.MousePointer = 11
  frmStartup.Show
  frmStartup.Refresh
  frmMainMenu.Show
  frmStartup.Show
  frmStartup.Refresh
  Unload frmStartup
  Screen.MousePointer = 0
End Sub2、在工程菜单中选择工程属性，在通用－－启动对象中选择Sub Main