|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Forms/MDI)
|
|
 |
Título da Dica: Contando o número de formulários abertos en Run-Time
|
 |
|
|
|
Postada em 15/10/2003 por ghost_jlp
Para saber quantos forms estão abertos, coloque assim:
Dim FrmCtl As Form
Dim i as integer
Private Sub Command1_Click()
For Each FrmCtl In Forms
i = i + 1
Next
Msgbox "Existe(m) " & i & " form(s) aberto(s)"
End Sub
Qualquer form aberto é contado. Forms que existem mas que não estão abertos não são contados!!
Simples não?! :-D
|
|
|
|
|
