给form2加上Parent属性,在调用前设置Paret属性,判断Parent类名即可
Private mfrmParent As Form
Public Property Get Parent() As Form
    Set Parent=mfrmParent
End Property
Public Property Set Parent(Byval vData As Form)
    Set mfrmParent=vData
End Property

解决方案 »

  1.   

    把代码改一改:dim frm1 as new form1
    frm1.tag=me.name
    frm1.show然后, 在form1可以随时读me.tag得到调用者的名称。
      

  2.   

    使用变量来记录:
    创建窗体时,窗体名可以用frm1,frm2,frm3...在函数那里加上变量,执行时将窗体名记录到一个变量里。
      

  3.   

    ltpao(啊炮):我试过了,设置Parent属性出错。
      

  4.   

    ltpao(啊炮):能不能再说详细点。
      

  5.   

    我认为 Wesely(无奈太多) 的方法最好。
      

  6.   

    在FORM2中定义全局变量,如果哪个实体调用该窗体,赋予相应的值。
      

  7.   

    uguess(uguess):当然有区别,比如我知道你是uguess(uguess),但是我能从你uguess得到你有多高的的信息吗?不能。不过还是谢谢你,你一直跟我的贴。只是这会就不能加分给你了。
    另问题我已经解决了,ltpao(啊炮):说的极是。