タイトル : Re: フォーム間の変数の受け渡し 投稿日 : 2005/10/11(Tue) 21:17 投稿者 : なおこ(・∀・)
お世話になります。 ソースをみると、 Form2に引数つきのコンストラクタを1つ追加してやれば 解決しそうな感じですね。 こんな感じでしょうか。 ■Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _ Handles Button1.Click Dim callform2 As New Form2(2) Me.Hide() … ■Form2 Private m_bbb As Integer Public Sub New(ByVal bbb As Integer) Me.New() m_bbb = bbb End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _ Handles Button3.Click If Me.m_bbb = 1 Then Dim callform5 As Form5 = New Form5 callform5.ShowDialog(Me) ElseIf … それと、Form2のPrivate Sub Button3_Clickの中で callform1=New Form1 としてますが、 これは、自分自身(Form2自身)を表示したForm1インスタンスとは 別物だ、という事はお分かりですよね。 |