vb. Bir formun örneklerini bul 2008

Question

Dim f as new frmNameHere 
f.show() 

Yukarıdaki kodu kullanarak oluşturulan frmNameHere tüm örneklerini nasıl bulabilirim? Örneğin

Answer 1

:

For i As Int32 = 1 To 10 
    Dim frm As New frmNameHere() 
    frm.Show() 
Next 
Dim openForms = Application.OpenForms.OfType(Of frmNameHere)() 
While openForms.Any() 
    openForms.First.Close() 
End While 

İşleri da linq olmadan, ama o zaman tüm OpenForms yinelemenize vardır:

Dim forms As FormCollection = Application.OpenForms 
For Each form As Form In forms 
    If TypeOf form Is frmNameHere Then 
     'do something with your frmNameHere-Form' 
    End If 
Next