？？？我不知道这个问题该怎么问：（？？？

Question

例子：
在工程里面添加三个窗体 form1,form2,form3在form1里这样写Private Sub Form_Load()
    Load Form2
    Load Form3
End SubPrivate Sub Command1_Click()
    Dim f   As Form
    For Each f In Forms
        '//这行就是判断窗口名字的
        If f.Name = "Form2" Then f.Show
    Next
End SubPrivate Sub Form_Unload(Cancel As Integer)
    Unload Form2
    Unload Form3
End Sub另：有谁知道为什么我的星星变成了一个三角型的，郁闷中...

Answer 1

To: viperstorm(你也真调皮呀，都叫你不要到处乱扔东西…) 
   因为各版分开计分了，以前是合计的。
To:longpeom() 
   要不就定义一个数组对照:
type xx
   Name as string
   itform as form
end type
xt(20) as xx
xt(0).Name="第一个窗体"
set xt(0).itform=form1
xt(1).Name="第二个窗体"
set xt(1).itform=form2
显示时找出与数据表中记录的名称相对应的xt数组索引k，xt(k).itform.Show即可。