求助,我已经编写了sub main()仍然弹出必须有启动窗体或sub main()
如题,sub main()是在模块中写的,代码如下,求大神看看,这个是照着教程上面写的,不知道有什么问题。Sub maim()
Dim frmlog As New frmlogin
strdb = "\人员管理.mdb"
conn = "provider=microsoft.jet.4.0;data source=" & App.Path + strdb + ";persist secrurity info=fasle"
flogin.Show vbModal
If Not flogin.ok Then
End
End If
Unload flogin
Set fmainform = New frmmain
Load fmainform
fmainform.Show
End Sub