フォームを複数回開くことはできますか?同じフォームを複数回開く
押しform2.show
ボタン1 ボタン1 Form2が
押しボタン1をもう一度可能であれば、別のForm2が古いのForm2に次の
を開き、Form1のボタンはすべて殺すことができ 開きますForm2のウィンドウが開きますか?
フォームを複数回開くことはできますか?同じフォームを複数回開く
押しform2.show
ボタン1 ボタン1 Form2が
押しボタン1をもう一度可能であれば、別のForm2が古いのForm2に次の
を開き、Form1のボタンはすべて殺すことができ 開きますForm2のウィンドウが開きますか?
もちろん可能です。同じフォームの2つのインスタンスだけを暗くします。
Public Class Form1
Private m_WindowList As New List(Of Form2)
Private Sub OpenWindowButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenWindowButton.Click
OpenWindow()
End Sub
Private Sub CloseWindowsButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CloseWindowsButton.Click
CloseWindows()
End Sub
Private Sub OpenWindowsButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenWindowsButton.Click
Dim WindowCount As Int32
If Int32.TryParse(WindowCountTextBox.Text, WindowCount) Then
OpenWindows(WindowCount)
End If
End Sub
Private Sub OpenWindow()
Dim NewWindow As New Form2
m_WindowList.Add(NewWindow)
NewWindow.Show()
End Sub
Private Sub OpenWindows(ByVal Count As Int32)
For i = 1 To Count
OpenWindow()
Next
End Sub
Private Sub CloseWindows()
For Each Window In m_WindowList
Window.Close()
Window.Dispose()
Next
m_WindowList.Clear()
End Sub
End Class
Dim MyNewForm2 = New Form2
MyNewForm2.Show
オブジェクト参照がオブジェクトのインスタンスに設定されていません。 m_WindowList.Add(NewWindow) その行の問題 – SirAudens
ああ、申し訳ありませんが、m_WindowListの宣言に追加してください。私は上記の答えでそれを修正しました。 –
甘い。あなたはすごいね! – SirAudens