LISTAR FORMS DO PROJETO

USUARIO.EXCLUIDOS 14/04/2004 22:35:10
#20610
Pessoal , to querendo saber como faço para :

-listar todos os formularios do projeto

-Dentro de uma função num modulo eu quero listar quantas labels tem em um determinado form ... o codigo é mais ou menos esse :


Dim ctl As Control
For Each ctl In form.controls
If TypeOf ctl Is Label Then
cont = cont + 1
End If
Next

ta dando erro no form.controls

Agradeço desde já !!!

Falowz
USUARIO.EXCLUIDOS 15/04/2004 07:57:56
#20634
Resposta escolhida
com relacao a listagem de todos os forms - algumas opcoes....

dar load em todos os forms (sugerido em outro post - ainda nao verifiquei se isso pode prejudicar em relacao a recursos)
Load Form1
Load Form2
Load FormN

desta forma vc pode a qualquer momento pegar a lista a partir de
dim Frm as Form
for each Frm in Forms
Debug.print Frm.Name
next frm

outra opcao - cria uma base de dados ou arquivo texto com a relacao e pega os dados desta relacao
Tópico encerrado , respostas não são mais permitidas