我有一个带有列表框的表单,我希望能够用同一应用程序的所有打开表单来填充它。但是,我希望能够从列表框中选择一个项目,并能够关闭与列表框中该项目关联的表单。这可能吗?
最佳答案
我找到了问题的答案。以下代码有效:
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim myForms As FormCollection = Application.OpenForms
For Each frmName As Form In myForms
ListBox1.Items.Add(frmName.Name.ToString)
Next
End Sub
Private Sub ListBox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
If Not ListBox1.SelectedIndex = -1 Then
Dim myForm As Form = Application.OpenForms(ListBox1.Text)
myForm.Close()
End If
End Sub
ListBox1_SelectedIndexChanged
下的代码可以很容易地放在按钮中。
关于vb.net - 如何使用所有打开表单的列表填充列表框,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/17387080/