掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
２つのフォーム間での値のやり取りをするには？ (ID：114793)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
☆MainForm側 Module Module1 Public F1 As Form1 End Module Public aaa As Integer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load aaa = 777 Label1.Text = aaa End Sub Private Sub btnTest1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTest1.Click Dim frm2 As New Form2 frm2.Show() End Sub ☆SubForm側 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click LabelSub1.Text = Form1.Label1.Text End Sub このようにしたら コンパイルもとおり やりたかったことができました。 Labelなどでも同じようにできるみたいです。 ありがとうございました
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.