遇到棘手的问题

Question

我做一个系统，是进行数据库管理的，遇到几个问题：
1。刚启动的时候就弹出一个登录的login窗口（通过login.show实现)
结果login窗口总是在主窗口mdiform窗口后面，
问：怎样让login窗口在主窗口前？
2。退出的时候，如果关闭主窗口，那个login窗口居然还在。
而如果先关闭login再关闭主窗口就可以结束程序，这是什么原因？？？

Answer 1

2、
模块代码：
Private Sub Main()
    ......
    MDIForm1.Show
    frmLogin.Show 1
    .......
End Sub

Answer 2

可是MDIForm1是启动窗体啊
还用写MDIFrom1.show吗？还有，这段代码是干什么的？
    Dim frm As Form
    Set frm = mdiFrm.ActiveForm
    Unload frm

Answer 3

通常是在模块里Sub Main()里添加MDIForm1.Show，然后在工程属性里把启动设为Sub Main()如上代码，这样你所提的问题就解决了。

Answer 4

“工程”－》“工程属性”：“通用”选项卡里面有一个启动对象，设为登录窗体。
在登录验证成功之后，再卸载登录窗体，显示主窗体：Mdiform1.show

Answer 5

Main()函数是什么作用
加载时就会调用吗？

Answer 6

vb exe主入口，要并且只要一个

Answer 7

你要“工程”－》“工程属性”：“通用”选项卡里选中它，你的才会从它开始。
Sub Main在模块里建的。

Answer 8

前面两条就行了，还想那么多干什么。然后在工程属性里把启动设为Sub Main()

Answer 9

程序结束的时候
end
所有的窗体就都关闭了

Answer 10

我看有的VB也没有Main()函数啊?
还有show后面的参数是什么意义?

Answer 11

窗体常数
显示参数
常数 值 描述 
vbModal 1 模式窗体 
vbModeless 0 无模式窗体 
MDI 窗体的 Arrange 方法
常数 值 描述 
vbCascade 0 层叠所有非最小化的 MDI 子窗体 
vbTileHorizontal 1 水平平铺所有非最小化的 MDI 子窗体 
vbTileVertical 2 垂直平铺所有非最小化的 MDI 子窗体 
vbArrangeIcons 3 重排所有最小化的 MDI 子窗体的图标 
WindowState 属性
常数 值 描述 
vbNormal 0 普通 
vbMinimized 1 最小化的 
vbMaximized 2 最大化的 

Answer 12

为什么总提示这样的错误？
我在属性中设置它的recordsource
然后在代码中想点另外一个按钮实现另一个recordsource，却老出错代码如下：
    Adodc1.RecordSource = "select*from table1 where name like'%孙%'"
    Adodc1.Refresh提示错误如下：
        在关键字select附近有语法错误
        对象refresh的方法IAdodc失败PS:我能确认select没有错误
        IAdodc是什么东东？