{VB} ถามเรื่องส่งค่าข้ามฟอร์มจากฟอร์ม 1 > 2 , 2 > 3 และ 1>3 ครับ

 Private Sub Listbox1_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles Listbox1.SelectedIndexChanged
        ComboBox1.Items.Clear()

        Select Case Listbox1.SelectedIndex.ToString
            Case "0"
                Me.CenterToScreen()
                ComboBox1.Items.Add(" ")
                ComboBox1.Items.Add(" ")
                ComboBox1.Items.Add(" ")
                ComboBox1.SelectedIndex = 0
                ComboBox1.DropDownStyle = ComboBoxStyle.DropDownList

                Label2.Text = " "
                Label3.Text = " "
                Label4.Text = " "
                PictureBox4.ImageLocation = " "
                PictureBox5.ImageLocation = " "
                PictureBox6.ImageLocation = " "

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
  Me.DialogResult = DialogResult.OK
    End Sub

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim frmForm3 As New Form2
        frmForm3.ShowDialog()
        If frmForm3.DialogResult = Windows.Forms.DialogResult.OK Then
            TextBox1.Text = frmForm3.Listbox1.Text
            TextBox2.Text = frmForm3.ComboBox1.Text
        End If

    End Sub