在VB6中,有什么办法可以不知道窗体的name属性来调用窗体?例如,我只知道窗全的caption属性, 如何使该窗体show出来?该工程是这样设计的,从后端数据库中读出程序的菜单,如"员工资料管理","部门资料管理","薪资设置","参数设置"等,和对应的窗口名字,如何在双击菜单的时候,把窗体show出来,又不想写select case 来体现菜单和窗口.show的对应关系.

解决方案 »

  1.   

    遍历所有窗体
      
      Dim frm As Form
      For Each frm In Forms
        If frm.name = "员工资料管理" Then      。。    End If
      Next frm
      

  2.   

    上边得写错了  Dim frm As Form
      For Each frm In Forms
        If frm.Caption = "员工资料管理" Then      。。    End If
      Next frm
      

  3.   

    同意楼上:
      Dim frm As Form
      For Each frm In Forms
        If frm.Caption = "员工资料管理" Then
          frm.show  
        End If
      Next frm
      

  4.   

    不是啊,兄弟们,FORMS集合里,只是已经加载的窗体,如何能遍历未加载的程序中的窗体?
      

  5.   

    如果知道窗体的name,可以用类似下面的代码动态加载
    dim frm as form
    set frm = forms.add("form1")
    frm.show
    如果连name都不知道,好像只有全部load以后再遍历show需要的窗体。
      

  6.   

    开心海说的是,正是要这个方法
    但若只知道caption 能不能有办法把窗体show出来?
      

  7.   

    用ScriptControl控件的ExecuteStatement方法