有没有特定的参数?

解决方案 »

  1.   

    if [表单名].Visible  = True  then
       '没有被LOAD上
      

  2.   

    Dim ObjForm as FormFor Each ObjForm In Screen.Forms
       if ObjForm.Name = "AAA" then
          msgBox "窗口AAA已经被装载 !"
          Exit For
       endif
    Next
      

  3.   

    Dim ObjForm as FormFor Each ObjForm In Forms
       if ObjForm.Name = "AAA" then
          msgBox "窗口AAA已经被装载 !"
          Exit For
       endif
    Next
      

  4.   

    Option Explicit
    Dim f As Form2Private Sub Command1_Click()
        If f Is Nothing Then
            Set f = New Form2
        End If
        f.Show
    End Sub
      

  5.   

    倒!上面两位都可以,但窗体名字如果是英文,要注意大小写
    ----------------------------------------------- carefulman(我要进步!) 的代码也可以吗?
    与本问题,风马牛不相及呀!同意 Begin2008(重头再来)
      

  6.   

    一个简单的问题,如果用户修改了FORM2的窗体标题怎么办?
    到哪里区找这个窗体呢?
    同样时限制一个窗体只被显示LOAD一次,不知道你的“风马牛不相及”结论怎么来的
      

  7.   

    frm.show vbmodal
    这样就不怕了。嘿嘿。你试试