VB6.0问题请教，用变量作为窗体名 ，打开！

VB6.0问题请教，用变量作为窗体名 ，打开！

不能，可以通过Select 语句
Select case ActiveMenu.Name
case "Form1
Form1.Show
Case "Form2
Form2.Show
End Select

或者事选把窗体添加进集合中
Dim col As new Collection
private sub Form_Load()
col.add Form1,"Form1"
col.add Form2,"Form2"
end sub
private sub 设置系统()
col.item(ActiveMenu.Name).Show
end sub追问可是，有50多个菜单，及窗体追答没发现过其它处理方法，追问唉，，自学VB有些日子了，如果问题在百度已无法解决，是不是证明我已经入门了？？追答我也是这么觉得的，不过一次有偶然性，要多次才能说明你触及的问题有一定深度了。追问Private Sub 窗口_Click(Index As Integer) ’点击对应名称的菜单 打开窗体
A = 窗口(Index).Caption
frms.Item(2).Show 照您的方法 提示 要求对象？
frms.Item(A).Show
End Sub追答可能关键字不对吧，集合的关键字大小写敏感的。看看我的附件。