[VB]Como detectar una modificación de variable global

[alarga]

Hola a tod@s

Tengo un módulo que contiene una función con un bucle do DoEvents loop while NOT Salir y una variable global Salir de tipo booleano que inicialmente vale TRUE.

La variable se modifica solamente cuando ocurre el evento Form_Click() ; en el código asociado a dicho evento, la variable Salir pasa a tomar el valor de FALSE.

El problema es que cuando hago click en el formulario el bucle no termina, sigue ejecutandose infinitamente, y no se porqué.

He puesto mensajes chivatos en varios lugares para ver si se detecta el evento de hacer click sobre el formulario y, efectivamente, así ocurre, en ese momento la variable cambia de valor, pero el bucle sigue ejecutandose.

¿Alguna solución o idea?

Gracias.

[alarga]

¿tan dificil es la pregunta?

[SunDarK]

Prueba en el evento Form_Click() ; poner
End Sub o End While a ver si te vale,saludos

[alarga]

Puesssss..., no entiendo muy bien esa solución

El código del evento Form_Click() es de la siguiente manera:

Código:

Private Sub Form_Click()
    salir = True
End Sub

logicamente hay un End Sub ya que es obligatorio que esté puesto, pero no hay ningun End While al no haber ningún While de por medio, puesto que no es necesario.

[alarga]

¡Asunto resuelto!

Se me había olvidado declarar la variable Salir como Public por eso el bucle no reconocía el cambio de valor.

Gracias de todos modos

Saludos.

[SunDarK]

Jejejee de todas formas entendi mal la pregunta la andaba releyendo :$,venga saludos y suerte