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

タイトル FORM間の値渡し
投稿日: 2007/10/09(Tue) 19:37
投稿者びぎ
 こんばんは。

こちらのサイトの内容を参考に得意先コード索引を
作りたいと思うのですが、
子フォームには選択ボタンと終了ボタンがあり
選択ボタンをクリックした時のみ、親フォームに選択した値を
セットしたいのです。

下記のコードですが
f2_Closingで lbl.Text = f2.MyForm2TextBoxと
親フォームのlblに値をセットしています。
これだと、選択ボタン、終了ボタン両方セットしてしまいます。

子フォームのほうで
終了ボタンクリックならTextBox1.Text = ""
として対処するような方法はおかしいでしょうか?

また、多くの方がコード検索のプログラムを作成しているかと思いますが
親フォームでコードを受け取るのはf2_Closingで行うのが一般的なのでしょうか?

下記にコードを載せます。

親フォーム
Private Sub btnTOMES_Click(ByVal sender As Object, _
            ByVal e As EventArgs)
              If f2 Is Nothing OrElse f2.IsDisposed Then
            f2 = New Form2
        End If
        f2.StartPosition = FormStartPosition.CenterParent
        f2.ShowDialog()

    End Sub
  
    Private Sub f2_Closing(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles f2.Closing
        lbl.Text = f2.MyForm2TextBox
    End Sub

子フォーム
Public Property MyForm2TextBox()
        Get
            Return TextBox1.Text
        End Get
        Set(ByVal value)
            TextBox1.Text = value
        End Set
    End Property

ご教授の程、宜しくお願いします。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

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