.NETで、Form1で入力してForm2で確認する画面を作りたいのですが、
どうしてもForm2の確認画面のLabel1にForm1のTextBox1が表示できません。
'Form1の入力
Private Sub Button1_Click()
Dim F2 As New Form2
F2.ShowDialog(Me)
Private Sub Form1_Load()
Dim F1 As New Form1
F1 = Me
'Form2の入力
Private Sub Form2_Load()
Dim F1 As New Form1
Label1.Text = F1.TextBox1.Text
'Module1の入力
Module Module1
Public F1 As Form1
End Module
色々調べて試しましたが、うまくいきません。
よろしくお願いします。
結論から言うと、
Dim F1 As New Form1
が不要では。
せっかくF1をグローバルで宣言してるのに、
更にローカルで宣言してる。
グローバルで宣言せずに、
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles MyBase.Load
Me.Label1.Text = DirectCast(Me.Owner, Form1).TextBox1.Text
End Sub
と言う手もありかな。
返信ありがとうございます。
始めて3日目なもので・・・
ご教授ありがとうございます。
Dim F1 As New Form1は消しました。
色々といじくっていたら、Form2の
Dim F1 As New Form1を消したところ
表示できました!!
参考になりました。
ありがとうございました。m(_ _)m
ツイート | ![]() |