タイトル : Re^2: Form2からForm1のテキストボックスの内容を取得するほかの方法を教えて下し 投稿日 : 2004/08/08(Sun) 03:33 投稿者 : tomi
[OSのVer]:Windows [VBのVer]:VB.NET 2003 花ちゃんへ 回答ありがとうございます 試してみたのですがどうもうまくいきません。 私のコードの書き方が悪いのかも・・・・・一応、コードを記入しておきます。 フォーム1コード Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click 'Form1からForm2のラベルのテキストに記入 frm2.textbox1.Text = TextBox1.Text End Sub Private Sub Form1_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load 'Form2 を表示 frm2 = New Form2 frm2.Show() End Sub モジュール1コード Private frm2 As Form2 'モジュールレベルで宣言 このやり方ですと、frm2が宣言されてないというエラーが出てしまいます。 又、今回の質問のフォーム2のボタンイベントを発生させて、フォーム1のテキストボックス1内のテ キストを、フォーム2のテキストボックス1に表示させようとしているコードは下記のように記入しま したが、やはり、フォーム1、テキストボックス1内のプロパティーに直接記入しているテキストしか 表示できませんでした。 フォーム1テキストボックスプロパティーは a となっています フォーム1コード Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Text = "b" End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim frm2 As New Form2 frm2.Show() End Sub フォーム2コード Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click TextBox1.Text = frm1.TextBox1.Text End Sub モジュール1コード Public frm1 As New Form1 以上のようなコードなのですが、デバックした際、フォーム1のテキストボックスには bと表示さ れ、ボタンを押した際、フォーム2が表示されます。このときフォーム2のテキストボックスにはフォ ーム2テキストボックスの、初期値のTextBox1が表示されています。そして、フォーム2のボタンをク リックすると、テキストボックスの中には a が表示されます。 大変ご迷惑をおかけいたしますが、今一度、よろしくお願い致します。 |