处理在 MainForm 选项卡中打开的表单

Question

我有一个 MainForm，其中有选项卡控件和几个独立的表单。我在主窗体的选项卡中打开每个“个人发件人”。 MainFrom 上的“关闭选项卡”按钮关闭当前选项卡，其实现如下。

这将关闭当前选项卡，但我还需要处理关闭选项卡的 From，但我不确定如何获取表单的实例。

如有任何帮助，请提前致谢。

'Close the current tab
  Private Sub CloseCurrentTab()
    'Close the current tab 

      Dim tabPageSave As TabPage
      tabPageSave = tcDisplayDetails.SelectedTab
      tcDisplayDetails.TabPages.Remove(tabPageSave)

结束子

Answer 1

是的，您需要处理选项卡页中的所有控件。该窗体并不特殊，当您将其 TopLevel 属性设置为 false 时，它​​只是一个子控件。让它看起来像这样：

  Dim tabPageSave As TabPage
  tabPageSave = tcDisplayDetails.SelectedTab
  While tabPageSave.Controls.Count > 0
      tabPageSave.Controls(0).Dispose()
  End While
  tcDisplayDetails.TabPages.Remove(tabPageSave)

表单的 Dispose() 方法将自动处理它拥有的任何子控件，不需要额外的帮助。

Answer 2

我建议在主表单中保留对表单的引用。因此，我有一个 frmPageSave，当我打开 PageSave 选项卡的表单时，我将引用存储在该变量中，然后在 CloseCurrentTab 方法中添加如下内容：

IF frmPageSave IsNot Nothing Then
    frmPageSave.Close()
    frmPageSave = Nothing
End If