Dim f as new frmNameHere
f.show()
如何查找使用上述代码创建的 frmNameHere
的所有实例?
最佳答案
例如:
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
无需 linq 也可以工作,但随后您必须迭代所有 OpenForm:
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
关于vb.net - 在 VB 2008 中查找表单的实例,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/4729895/