Preciso De Ajuda

[Guest SMURF]

Por favor estou fasendo um programa de gerenciamento de uma pousada...... sou novo no negocio e esse é o meu primeiro programa......

eu estou tentando criar um código q faça +ou- o seguinte..... para cada form aberto feche esse form.... menos o MDIprincipal q tem q continuar aberto (todos os form são MDIchild)..... esse codigo é enserido em um botao........

eu tinha pensado em algo mais ou menos assim.......

----dim janela as form

----

----for each janela in MdiPrincipal

---- unload janela

----next

mas não deu certo........

Agradeço se alguém poder me ajudar o mais rapido possivel........ com esse problema........

[kuroi]

assim deve dar:

dim janela as form

for each janela in Forms
 if janela.name <> "MDIprincipal" Then unload janela
next