Visual Basic - impedir el unload de un formulario

Holas Samigosss!!!
mi problema es el siguiente:

Tengo un formulario en el cual el usuario tipea en un textbox un codigo de producto y el formulario si lo encuentra trae todos los datos de ese codigo , pero si no llama a otro formulario que realiza la busqueda por nombre , mi problema es retornar el valor del codigo desde el formulario de busqueda , porque no se cuando se descarga el formulario de busqueda ¿como puedo saber esto? y la manera de impedirlo para que no me traiga datos nulos.

gracias

Danix

No entiendo bien lo que quieres hacer, pero para evitar que un formulario se descargue es por medio del evento Unload del Form, este evento ocurre cuando el usuario cierra el formulario o cuando se cierra con la instrucción UNLOAD

Private Sub Form_Unload(Cancel As Integer)
Cancel = 1
End Sub

Ponle a "Cancel" cualquier valor diferente de cero y el formulario no se cerrará.

Ahora bien, si vas a acceder a variables declaradas en un formulario, desde otro formulario, éstas variables tienen que ser públicas..:

(En el FormularioA)
Public Var1 as Integer

.... en cualquier Sub
Var1 = 1

(DESDE EL FormularioB accedes a una variable del FormularioA)

Valor1_de_FormA = FormularioA.Var1

Espero esto te sea de utilidad, saludos

no hay otra forma , en vez de usar variables publicas, que es muuuy inseguro?

Yo no considero que sea inseguro definir variables públicas, siempre y cuando hagas buen uso de ellas.

Otra forma de pasar parámetros es por medio de alguna Función o Sub.

Otra forma es que en un módulo definas VARIABLES PUBLICAS

Por ejemplo... en un módulo define

Public Valor1 as Variant
Public Valor2 as Variant
Public Valor3 as Variant

En el Formulario A (de donde tomas los valores para formulario B)
Valor1 = Text1.Text
Valor2 = Text2.Text
Valor3 = Text3.Text

Ya en el Formulario B le pones
Lo_que_sea1 = Valor1
Lo_que_sea2 = Valor2
Lo_que_sea3 = Valor3

Las variables VALOR1, VALOR2 y VALOR3 se consideran variables GLOBALES, puedes usarlas en cualquier FORM de tu proyecto, para esto te recomiendo que en FORM inicial le asignes el valor de 0

Aunque yo hiciera esto..:
Lo_que_sea1 = FormA.Text1.Text
Lo_que_sea2 = FormA.Text2.Text
Lo_que_sea3 = FormA.Text3.Text

Es todo lo que se me ocurre hasta ahora referente a PASO DE PARAMETROS...

Espero te sea de utilidad...