タイトル : Re^2: 既存フォームがない場合にのみフォームを起動する。 投稿日 : 2006/03/19(Sun) 12:33 投稿者 : YAS
ひろのしまさん,こんにちは。 こんな感じでしょうか?(最善の方法とは言えないと思いますが,参考まで) Dim f As Form Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) _ Handles Button1.Click If f Is Nothing OrElse Not f.Visible Then f = New Form f.Show() End If End Sub |