Cómo saber el nombre del formulario origen en Visual Basic 6

[lucasiramos]

Hola. Te comento lo que podes hacer.

En el formulario 3, el modal, defini una variable pública como string

Public VengoDe as String


Entonces al momento de llamar desde los formularios 1 o 2, antes del Show, modifica la variable VengoDe asignandole el string que quieras. Quedaria algo asi:

'En el form1, este sería el boton que llame al formulario3

Private Sub LlamarForm3_Click()
Form3.VengoDe = "Form1"
Form3.Show vbModal, Me
End Sub


'En el form2, este sería el boton que llame al formulario3

Private Sub LlamarForm3_Click()
Form3.VengoDe = "Form2"
Form3.Show vbModal, Me
End Sub


Entonces en el load del Form 3 pondrias esto (o lo que necesites vos...)

Private Sub Form_Load()
If VengoDe="Form1" Then
MsgBox "Vengo del formulario 1"
Else
MsgBox "Vengo del formulario 2"
Endif
End Sub

Espero te sirva. Saludos. Lucas