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?
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