MDIFORM - COMO SABER SE ELE FOI CARREGADO.

USUARIO.EXCLUIDOS 28/09/2004 12:55:59
#43758 Resposta escolhida

vamos supor que voce tenha um MDIForm chamado "MDIForm1"

dim FrmAberto as boolean
dim Frm as Form

for each Frm in Forms
if ucase$(Frm.Name) = "MDIFORM1" then
FrmAberto = true
set frm = nothing
exit for
endif
next Frm