Question

In the middle of converting VB6 code to VB.NET, I need to replace the following code that intends to close all open forms remaining 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’ve replaced the Unload function with Close (as indicated by TFM), but the compiler complains that OpenForms is not a member of My.Application.

Where can I access the open forms?

Answer 1

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

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