How to unload all open forms in VB.NET?

Question

In the middle of converting VB6 code to VB.NET, I need to replace the following code, which intends to close all open forms left in the application.

'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

I replaced the function Unloadwith Close(as indicated in TFM), but the compiler complains that OpenFormsit is not a member My.Application.

Where can I open open forms?

Answer 1

The property OpenFormsreturns a FormCollection. You can iterate through the collection to process all forms.

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

Answer 2

I found this solution,

'close all sub forms
For i = System.Windows.Forms.Application.OpenForms.Count - 1 To 1 Step -1
    Dim form As Form = System.Windows.Forms.Application.OpenForms(i)
    form.Close()
Next i

... ( verbose), , .

Answer 3

Application.Exit .

AS , , .

Answer 4

My.Application.OpenForms , VB.Net (. " , , " ).

, Application.OpenForms( System.Windows.Forms).

Answer 5

Application.Windows.