VBレスキュー(花ちゃん) の Visual Basic 2010 用掲示板(VB.NET 掲示板)

タイトル： Re^2: 既存フォームがない場合にのみフォームを起動する。

投稿日： 2006/03/19(Sun) 12:42

投稿者： 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 f.IsDisposed Then
            f = New Form
        End If
        If Not f.Visible Then
            f.Show()
        End If
    End Sub

- 関連一覧ツリー （

をクリックするとツリー全体を一括表示します）

既存フォームがない場合にのみフォームを起動する。

ひろのしま

No.3323

Re: 既存フォームがない場合にのみフォームを起動する。 - ひろのしま 03/19-00:59 No.3324
- Re^2: 既存フォームがない場合にのみフォームを起動する。 - YAS 03/19-12:33 No.3325
- Re^2: 既存フォームがない場合にのみフォームを起動する。 - YAS 03/19-12:42 No.3326
  - Re^3: 既存フォームがない場合にのみフォームを起動する。 - ひろのしま 03/19-20:58 No.3328

タイトル	： Re^2: 既存フォームがない場合にのみフォームを起動する。
投稿日	： 2006/03/19(Sun) 12:42
投稿者	： YAS

古いスレッドにレスはつけられません。