Apúntate...


Consultas, desarrollo de programas y petición de presupuestos:

jueves, 27 de febrero de 2014

Pasar información de un formulario a otro

Pasar información de un formulario a otro


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 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)

Este parametro que recibe, lo va a asignar al textlabelMostrarDato.
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

2 comentarios:

A falta de donativos... un poco de publicidad