Programación General > Visual Basic 6.0 e inferiores

 Saber Q Formulario Llamo

<< < (2/2)

Mollense:
No creo que puedas usar la propiedad tag porque me parece que la ventana debe estar abierta para poder modificar su valor.

A ver si esto te orienta:

F_Tanori:

--- Cita de: "RadicalEd" ---Otra puede ser crear una rutina pública en un .bas y lo que haces es llamarla desde todo formulario en el que quieras abrir el form2
--- Fin de la cita ---
eso es lo que tambien se me viene a la mente

ej.


Modulo


--- Código: Text --- Option Explicit Function AbrirVentana(ByRef frm As Form, Optional Modal As Boolean = False, Optional Propietario As Form) As StringDim Resultado    If Modal Then        If IsMissing(Propietario) Then            frm.Show vbModal, Propietario            Resultado = Propietario.Name        Else            frm.Show vbModal            Resultado = &#34;&#34;        End If    Else        frm.Show        Resultado = &#34;&#34;    End If    AbrirVentana = ResultadoEnd Function  
en un Form

--- Código: Text --- Option Explicit Private Sub Command1_Click() Dim NombreFormPropietario As String    NombreFormPropietario = AbrirVentana(Form2,,Me)        If Len(NombreFormPropietario) &#62; 0 Then        MsgBox NombreFormPropietario    End IfEnd Sub 
Saludos

Navegación

[0] Índice de Mensajes

[*] Página Anterior