Saber si un form esta abierto

[meula]

Hola,

yo eso, de toda la vida, lo he hecho con variables globales. Aunque si alguien tiene una forma mejor, bienvenida sea

dim frmXAbierto as boolean

abrir()
{
if(frmXAbierto) exit sub
frmXAbierto=True
addhandler..... ****
frmX.show()
}

***delegas el evento cerrar del frmX en el form Padre , y: frmXAbierto=False
(Disculpa no tengo sintaxis a mano, ni se de memoria

CerrarX()
{
frmXAbierto=False
}