A*******t
发帖数: 40 | 1 有两个form，头一个是login window，输入User Name/Password后按Login，希望
frmLogin消失，frmWKIT出现。
现在问题是，每次一按“F5”后，App一启动，frmLogin根本不显示 -- 在Windows的
System Bar上能够看到一个就象窗口最小化的那样的条条，可是不管怎么点击那个条，窗
口frmLogin也不出现。
下面是MainModule的源码，大虾们请出手指点一二。多谢！
*************************
Module MainModule
Dim frm1 As New frmLogin()
Dim frm2 As New frmWKIT()
Sub Main()
。。。。。。
Startapplication()
End Sub
Sub Startapplication()
Application.Run(frm1)
If Not OK Then
Exit Sub
|
|
