VB使用构造函数进行窗体传值

源窗口SmobilerForm1：点击事件，把Button1的值传进目的窗口SmobilerForm2的构造函数中

Private Sub Button1_Press(sender As Object, e As EventArgs) Handles Button1.Press

        Dim frm As New SmobilerForm2(Button1.Text)

        Show(frm)

End Sub

 

 

 

目的窗口SmobilerForm2：

重载一个带参数的构造函数，接受new创建对象时传进来的参数，赋值给SmobilerForm2中的Label1

Public Sub New(ByVal test As String)

        InitializeComponent()

        Label1.Text = test

End Sub