Spanish Pasar Datos Entre Formularios

aviario

Active Member
Licensed User
Longtime User
Hola, soy nuevo en esto pero haber si te puedo ayudar ya que es lo que yo he echo en mi aplicación

1º cree un modulo
Proyect
Add New Module
Code Module y lo llame Rutinas y hay es donde voy creando todas las funciones y variables que voy necesitando te pongo el ejemplo a continuación

Sub Process_Globals
Dim Letrasanillas As Boolean
Dim Numerocriador As String
Dim Diasmirrahuevos As Int
Dim Diasnacen As Int
Dim Diasanillar As Int
Dim Diasseperar As Int
End Sub

Cuando ejecuto el programa la primera vez leo la base de datos para cargar las variables que he puesto en Process_Globals

Rutinas.Numerocriador=Cursor1.GetString("Ncriador")
Rutinas.Diasmirrahuevos=Cursor1.GetString("Diamirarhuevos")
Rutinas.Diasnacen=Cursor1.GetString("Dianacen")
Rutinas.Diasanillar=Cursor1.GetString("Diaanillar")
Rutinas.Diasseperar=Cursor1.GetString("Diaseparacion")
Rutinas.Letrasanillas=Cursor1.GetString("Letrasanillas")
Rutinas.Anocria=Cursor1.GetString("Añocria")

Y de esta forma tengo las variables desde cualquier Activity

Un saludo
Paco
 
Last edited:

anna7

Member
Licensed User
Longtime User
Las variables declaradas en Process_Globals son públicas y accesibles desde otras actividades. Por lo que si declaras una variable ahí la verás des del otro "form" (activity).
 
Top