Pasar Datos de un Formulario a Otro

[freegirl]

Por ejemplo a través de propiedades.


FORM2

Código:

Public Property MiTextoQuePaso as String

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnEnviar1.Click 
      MiTextoQuePaso= txtNombre1.Text  
        Me.DialogResult = DialogResult.Ok
    End Sub

FORM PRINCIPAL

Código:

If Form2.ShowDialog = DialogResult.Ok Then
    MessageBox.Show("Recibo este texto: " & Form2.MiTextoQuePaso)
End If