tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]　 [ワード検索]　 [Home]

タイトル ： 単純にこうすればいいんですね
投稿日： 2007/08/01(Wed) 11:55
投稿者： ひでと
fom をForm型でなくObjectとして宣言する

Public Class Form1
    Dim fom As Object
    Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Select Case TextBox1.Text
            Case "0" : fom = Form2
            Case "1" : fom = Form3
        End Select
        fom.ShowDialog()
    End Sub

    Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        fom.Buttun_Click()
    End Sub
End Class

Public Class Form2
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Buttun_Click()
    End Sub
    Public Sub Buttun_Click()
        '処理
    End Sub
End Class
脆弱な処理なのかもしれませんが、これでいいわけですね。
目が覚めました。申し訳ありませんでした。
- 関連一覧ツリー （ をクリックするとツリー全体を一括表示します）

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