送分小问题3－如何判断一个form是否已经装入？还是必须用一个变了记录是否装入？

Question

if frmMyForm is nothing then 没有load

Answer 1

用变量吧
Chice_wxg(VS.NET = 光驱烤肉，我也入网了)的方法好像不行 

Answer 2

说明：对于不是
dim f as form1
set f=new form1
方法生成的窗口，我的办法当然不行。
但是，如果直接访问form1，系统无论如何都会自动加载窗口，这样
无论怎么检测，窗口都是加载的。（与VB的窗口/类管理有关）所以我认为我的办法是正确的。

Answer 3

回复人： Chice_wxg(VS.NET = 光驱烤肉，我也入网了) (  ) 信誉：97  2002-07-11 12:40:00  得分:0  
 
 
  
if frmMyForm is nothing then 没有load
--------------------------------------
有点想当然了吧......
 
 

Answer 4

Dim frmT As Form
    Dim b As Boolean
    b = False
    For Each frmT In Forms
        If frmT.Name = yourform.Name Then 
            b = True
            exit for
         End if
    Next

Answer 5

TO  griefforyou(为你伤心) 看我的解释现在看来，daviddivad(你真行，居然比我还快！) 的方法似乎是很好的，呵呵，看了受益非浅啊~~~~~~~

Answer 6

TO  griefforyou(为你伤心) 看我的解释现在看来，daviddivad(你真行，居然比我还快！) 的方法似乎是很好的，呵呵，看了受益非浅啊~~~~~~~

Answer 7

daviddivad(你真行，居然比我还快！) 
你真行，居然比我还快！
你真行，你才是对的！

Answer 8

如果有很多yourForm的实例给怎么办呢，你真行的办法好像也失效了。
算了，还是用最容易想到的方法作吧。555555

Answer 9

在FORM启动时输入FORM的TAG数据（唯一值，如：时间戳）。
============================
Dim frmT As Form
    Dim b As Boolean
    b = False
    For Each frmT In Forms
        If frmT.Tag = yourform.Tag Then 
            b = True
            exit for
         End if
    Next==================================
这样可以了吗？？？？？

Answer 10

SORRY,上面写的行不通，除非用数组来存放每个FORM的TAG值。

Answer 11

我试验过了，
form一般不会是动态的吧，写tag还是可以的，随机就不必要了，弄个序号就可以了。毕竟一般不会随机随地产生form