Abriendo y recogiendo informacion Form

Formulario Principal:
(llama al formulario secundario cuando hacemos click en un boton)

Private Sub Button1_Click(byval sender as object...) handles Button1.Click
dim formulario as new FormSecundario
formulario.showDialog
msgbox("El valor devuelto es: " & formulario.Valor)
formulario.Dispose
formulario=Nothing
end Sub



Formulario Secundario:

Private ValorAux as String

Public Property Valor() as String
Get
Return ValorAux
End Get
Set Value as String
ValorAux=Value
End Set
End Property

Por tanto, el valor que guardes en la variable ValorAux será accesible desde
el formulario principal