如何使用按钮关闭 Visual Basic 中打开的表单？

Question

我正在开发一款游戏，它有一个简单的菜单系统。 其中一个按钮，简称为“Button1”，应关闭菜单窗体并加载游戏 window。 当它打开游戏 window 时，它不会关闭菜单 window。 有没有办法让它关闭一个表格并打开另一个表格。

游戏 window 名称 = GameBoard

菜单 window 名称 = Form2

代码：

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim Form2 As New GameBoard
    Form2.ShowDialog()
    Me.Close()
End Sub

Answer 1

表单没有关闭的原因是因为Form2是用ShowDialog()打开的：

Form2.ShowDialog()
' This will not execute until Form2 is closed
Me.Close()

根据ShowDialog()的文档，这将暂停Button1_Click中代码的执行，直到Form2关闭后：

将表单显示为模式对话框。

或者，您可以只执行Form2.Show() ，它不会将其作为对话框打开并允许其余代码运行：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim Form2 As New GameBoard
    Form2.Show()
    Me.Close()
End Sub

或者，在打开Form2之前关闭当前表单：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim Form2 As New GameBoard
    Me.Close()
    Form2.ShowDialog()
End Sub