如何打开一个窗体但窗体名是变量

Question

你是不是想动态创建窗体，还是说你的窗体是已经设计好了的？
如果是动态创建窗体，那么可以用
sub ListView_ItemClick()
Dim yourform as new Form1
yourfrom.showend sub如果是已设计好的窗体，就可以在
sub ListView_ItemClick()Dim yourform as 你已设计好的窗体名称
set yourform = 你已设计好的窗体名称
yourform.show 
end sub不知道你说的是不是这个意思？

Answer 1

你是不是想动态创建窗体，还是说你的窗体是已经设计好了的？
如果是动态创建窗体，那么可以用
sub ListView_ItemClick()
Dim yourform as new Form1
yourfrom.showend sub如果是已设计好的窗体，就可以在
sub ListView_ItemClick()Dim yourform as 你已设计好的窗体名称
set yourform = 你已设计好的窗体名称
yourform.show 
end sub不知道你说的是不是这个意思？

Answer 2

我的想法如下：
    由于VB里没有宏替换，只能靠枚举法，将字符串与对应关联起来。这样，可以定义一个过程，该过程传递一个窗体名参数，用Select Case...语句实现，如：
    Select case psFormName
        case "Form1"
             Form1.show
        case "Form2"
             Form2.show
        ...
     End Select     

Answer 3

dim frm as formselect case fName
  case "form1"
    set frm=new form1
    frm.show  case "form2"
    set frm=new form2
    frm.show   case else
end select