No lo he probado.. pero podria funcionar.
For I = 1 To _Screen.FormCount
IF Screen.Forms(I).NAME = “MIFORMABIERTO” THEN
_Screen.Forms(I).Metodo
ENDIF
ENDIF
Saludos.
Yvan Carranza
La forma más fácil es crear una variable pública en tu primer form y a esa variable asignarle el form actual…. Por ejemplo en el INIT del form pones:
Public formularioA
formularioA = this
Luego desde el formulario B puedes acceder a cualquier método o control del formulario A, tan solo poniendo: formularioA.nombreControl.value o formularioA.algunMetodo()
La otra opción es utilizar _screen.forms(idForm)… y el tratamiento es el mismo
Saludos,
Wladimir
--
ovariable=createobject("custom")
ovariable.addproperty("Retorno1",0)
ovariable.addproperty("Retorno2","")
asi sucesivamente de acuerdo a los datos que necesites obtener del form2
do form miform2 with ovariable
*/para que funcione sin problema debo suponer que el miform2 es modal
cuando regresa ya tienes actualizado los datos de la variable ovariable y
tomas los datos que deseas para visualizarlos o procesar o lo que desees
hacer con ellos.
si tuviera que mostrarlos en un textbox
thisform.text1.value=ovariable.retorno1
thisform.text2.value=ovariable.retorno2
...
asi sucesivamente
en tu form2 en el ini
lparameters oVariable as object
thisform.ovariable=ovariable
debes crear una propiedad ovariable inicializada en .NULL. y lo asignas
cuando entras el valor del parametro a la propiedad del formulario (puedes
emplear en nombre de la variable o propiedad cualquier nombre que deseas)
porque la variable del parametro del ini solo existe en ese metodo sales del
metodo adios variable asi que de esa forma queda existiendo, ademas como es
un objeto el tipo de paso es por referencia y no por valor (en el caso por
referencia no pasa el valor de la variable si no la referencia de la
direccion de memoria donde se ubica esa variable, eso quiere decir que
cualquier dato que actualices en la variable objeto se reflejara en el
origen).
En tu boton salir del form2 pones los datos que deseas que retorno en tu
objeto
thisform.ovariable.retorno1=thisform.text1.value
thisform.ovariable.retorno2=thisform.text2.value
y solucionado tu problema de retornar mas de un dato desde otro form