Dim f2 As New Form2 f2.Label1.Text = "文字" f2.Show()
Public Class Form1 Dim f2 As Form2 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click f2 = New Form2 f2.Show() End Sub Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click f2.Label1.Text = "文字" End Sub End Class