数组中包含名称的vb6调用窗体

我有一个名为Menus的数组。它包含每个元素的表单名称

如何动态调用它们

例如，如果菜单（1）=“登录”，而菜单（2）=“注销”，我需要说

Login.Show

但是我想使用数组名来实现这一点。我显然不能这样做：

Menus(X).Show

这在VB中是可能的还是有办法解决

---

提前谢谢

您可以使用以下代码：

Form form = Menus[x] as Form 
Form.show

---

实际上，您要做的是使用表单的名称来实例化和加载表单

一种方法是将带有表单名称的字符串传递给表单

集合

的

添加

函数：

Dim f As Form
Set f = Forms.Add(Menus(X))
f.Show

或者，使用VB6的功能：

Dim f As Form
Set f = CallByName(Forms, "Add", VbMethod, Menus(X))
f.Show

---

当然，这段代码甚至都不会编译，所以它不是一个特别好的“示例”…第一行是什么？我不认为这是VB语法。酷！这就成功了。我使用了第一种方法+1为您的备选方案：）