如何在VB.NET中卸载所有打开的表单？

发布时间：2020-12-17 07:11:41 所属栏目：百科来源：网络整理

导读：在将VB6代码转换为VB.NET的过程中,我需要替换以下代码,这些代码旨在关闭应用程序中剩余的所有打开的表单. 'close all sub formsFor i = My.Application.OpenForms.Count - 1 To 1 Step -1 'UPGRADE_ISSUE: Unload Forms() was not upgraded. Click for more:

在将VB6代码转换为VB.NET的过程中,我需要替换以下代码,这些代码旨在关闭应用程序中剩余的所有打开的表单.

'close all sub forms
For i = My.Application.OpenForms.Count - 1 To 1 Step -1
    'UPGRADE_ISSUE: Unload Forms() was not upgraded. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="875EBAD7-D704-4539-9969-BC7DBDAA62A2"'
    Unload(My.Application.OpenForms(i))
Next i

我已经用Close替换了Unload函数(如TFM所示),但是编译器抱怨OpenForms不是My.Application的成员.

我在哪里可以访问开放表格？

解决方法

OpenForms属性返回FormCollection.您可以遍历集合来处理所有表单.

For each f as Form in My.Application.OpenForms
 f.Close()
Next

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!