关闭多个新表单 [VB.NET]

Question

我的 sw 有问题：我有三种形式：主要形式 (A)、次要形式 (B) 和第三种形式 (C)。表格 A 必须始终可见且可用，表格 B 从表格 A 打开，表格 C 从表格 B 打开。 我需要打开表单 C 的多个实例（我不知道有多少实例），我在表单 B 的命令按钮中使用此代码：

            Dim newform As New modifica_normale
            newform.LoadOrders(commessa_da_modificare, id_da_modificare, False)
            newform.Show()

当表单 B 关闭时，我需要关闭表单 C 的所有多个实例，因此在关闭事件中我尝试放置：

            modifica_normale.Close()

但不工作。 我知道我可以将 newform 定义为全局变量并调用 newform.close()，但我不知道用户将打开多少个 newform。

谢谢，彼得罗。

Answer 1

这段代码只会关闭表单的公共实例，而不是每个新实例化的表单对象：

 modifica_normale.Close()

相反，您可以尝试在创建每个表单时将表单添加到表单集合中。 在表单 B 上创建表单级列表。

 Dim currentForms As List(Of Form) = New List(Of Form)

每次创建表单 C 的实例时添加它

Dim fNew As New modifica_normale
currentForms.Add(fNew)

当你想关闭它们时，循环返回关闭每个实例的表单集合。

For Each frmCheck As Form In currentForms
    frmCheck.Close
Next