Es esta entrada os enseñaré a como se puede pasar datos de un formulario a otro. Existen varios métodos, pero os voy a explicar el que me parece más simple.
Imaginamos que tenemos dos formularios (Fmain y FormPregunta)
El formulario FormPregunta, es el encargado de recibir un dato (un texto por ejemplo) por parte del usuario y lo va a enviar al formulario Fmain
En el formulario Fmain, es el encargado de mostrar el FormPregunta, y mostrar el dato recibido de este formulario.
Este es el formulario Fmain:
Este es el código del formulario Fmain:
'
Gambas class file
Public
Sub
_new()
End
Public
Sub
Form_Open()
End
Public
Sub
recibirmensaje(texto
As
String)
TextLabelMostrarDato.text
=
texto
End
Public
Sub
ButtonAbrirFormulario_Click()
FormPregunta.Show()
End
Fijaos que tenemos la funcion"recibirmensaje(texto as string)" que accesible desde todos los formularios, modulos y clases porque es una función publica (Public), y que acepta como parametro un texto.
Public
Sub
recibirmensaje(texto
As
String)
TextLabelMostrarDato.text
=
texto
Bien, ahora pasamos al Formulario que tiene un textbox llamado "TextboxMensaje" y un botón llamado "ButtonCerrar".
Este es su código:
Public
Sub
Form_Open()
End
Public
Sub
ButtonCerrar_Click()
FMain.recibirmensaje(TextBoxMensaje.text)
Me.Close()
End
Cuando hacemos click en el botón, se ejecuta el código contenido en
Public
Sub
ButtonCerrar_Click()
Fijaos que es llamado el método "recibirmensaje" del formulario Fmain:
FMain.recibirmensaje(TextBoxMensaje.text)
De esta manera, hemos pasado la información al formulario Fmain.
Código fuente del ejemplo: Codigo fuente en Box.com




















