If Tables("系统设置").Current("是否提醒") = True Then
    Forms("主窗体").Open()
 Forms("提醒窗体").TopMost = True
    Forms("提醒窗体").Open()
Else
    Forms("主窗体").Open()
End If

运行后提醒窗体怎么不置顶呀？

想同时显示主窗体和提示窗体并且是提醒窗体置顶

If Tables("系统设置").Current("是否提醒") = True Then
    Forms("主窗体").Open()
    Forms("提醒窗体").Open()

    Forms("提醒窗体").TopMost = True
Else
    Forms("主窗体").Open()
End If

msgbox(Forms("提醒窗体").TopMost)

试试，不行就做个例子上来

If Tables("系统设置").Current("是否提醒") = True Then

    msgbox(123)
    Forms("主窗体").Open()

    Forms("提醒窗体").TopMost = False
    Forms("提醒窗体").Open()

    Forms("提醒窗体").TopMost = True
Else
    Forms("主窗体").Open()
End If

原来主窗体和提醒窗体都是模式窗体不行，我将主窗体改成独立就可以了，为什么？主窗体应该是模式窗体呀！怎么解决这个问题

方法一：如果主窗体是模式窗口，那么，你必须打开提醒窗口后，才能打开主窗口。而且提醒窗口，不能是模式窗口

方法二：如果两个都是模式窗口，必须在主窗口的AfterLoad事件写代码打开提示窗口，才行。