クイズのようなものを作っています。質問のランダマイザーを作成しました。したがって、1 つの質問 (フォーム) がポップアップし、正しい答えをクリックすると、新しいフォームがポップアップし、ラベルとボタンが 1 つ表示されます。続行ボタンをクリックすると次の質問(フォーム)がポップアップするようにしましたが、前のフォームも閉じたいのですが、名前を付ける方法や何をすべきかわかりません。
Dim rn As New Random
TextBox1.Text = rn.Next(1, 4)
If TextBox1.Text = 1 Then
Form4.Show()
Form4.Timer1.Start()
End If
If TextBox1.Text = 2 Then
Form7.Show()
Form7.Timer1.Start()
End If
If TextBox1.Text = 3 Then
Form8.Show()
Form8.Timer1.Start()
End If
If TextBox1.Text = 4 Then
Form12.Show()
Form12.Timer1.Start()
End If