Question

嘿，伙计们，至少对我来说，我有一个好头脑。我需要找到一种用字符串打开表单的方法。我有这个......

    Dim asm = System.Reflection.Assembly.GetExecutingAssembly
    Dim myTypes As Type() = asm.GetTypes()
    Dim frm As Form
    For Each t As Type In myTypes
        If t.IsSubclassOf(GetType(System.Windows.Forms.Form)) AndAlso Me.Label4.Text = t.Name Then
            frm = CType(Activator.CreateInstance(t), Form)
            frm.Close()                
            frm.Hide()
        End If
    Next

但它没有关闭程序甚至隐藏它我不知道吗？

问题：“我需要找到一种用字符串打开表单的方法”

提前致谢。

Answer 1

在我看来，就像你创建了一个类型的新表单实例并尝试关闭/隐藏它，但我看不到它被显示。

如果您尝试关闭现有表单，则不希望使用Activator.CreateInstance创建新实例。相反，您需要以某种方式找到已打开的表单的现有实例，并关闭该特定实例。

Answer 2

您发布的代码近似于将按类型名称创建表单的新实例的代码，然后关闭/隐藏表单。

（如果您想按名称关闭已打开的表单，我会这样做：

For Each f As Form In My.Application.OpenForms
  If f Is My.Forms.NameOfFormThatIWantToClose Then f.Close()
Exit For

）

但我认为您希望按名称打开新表单。如果是这样，您将需要使用反射。 This page似乎完全符合您的要求。

如何用字符串关闭表单

2 个答案: