form chargée???

"TouTenN" <gelapplication[Nospam]@tiscali.fr> a écrit dans le message
de news:bqq2v1$74e$1@news-reader2.wanadoo.fr

Bonjour

Comment savoir si une form (mdichild) est chargée

merci Guy

Bonjour/soir,

Essaye ceci:

Dim AForm As Form

For Each AForm In Forms
If TypeName(AForm) = "frmMDIChild" Then
MsgBox "trouvée!"
End If
Next AForm

For Each AForm In Forms
If TypeOf AForm Is frmMDIChild Then
MsgBox "trouvée!"
End If
Next AForm

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com

Je vais essayé

Merci

--

"François Picalausa" <fpicalausa@chez.com> a écrit dans le message news:
OudHvnzuDHA.2464@TK2MSFTNGP12.phx.gbl...

"TouTenN" <gelapplication[Nospam]@tiscali.fr> a écrit dans le message
de news:bqq2v1$74e$1@news-reader2.wanadoo.fr
> Bonjour
>
> Comment savoir si une form (mdichild) est chargée
>
> merci Guy

Bonjour/soir,

Essaye ceci:

Dim AForm As Form

For Each AForm In Forms
If TypeName(AForm) = "frmMDIChild" Then
MsgBox "trouvée!"
End If
Next AForm

For Each AForm In Forms
If TypeOf AForm Is frmMDIChild Then
MsgBox "trouvée!"
End If
Next AForm

--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com