呼び出すフォームに引数を渡すには？ (ID:120653)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 何か難しいことを考えていないかな。 Form1では Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim F2 As New Form2 F2.i = 10 F2.Show() End Sub Form2では Friend i As Integer Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TextBox1.Text = i.ToString End Sub で良いのでは。 どうしても引数で渡したいなら Form1側 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim F2 As New Form2 'インスタンスの追 F2.Show() F2.hogehoge(10) End Sub Form2側 Friend Sub hogehoge(ByVal i As Integer) TextBox1.Text = i.ToString End Sub こんな方法もあるし、いくらでも方法は。