1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6

Compter le nb de form [Résolu]

Signaler
Messages postés
104
Date d'inscription
jeudi 25 juillet 2002
Statut
Membre
Dernière intervention
28 septembre 2006
 -
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
 -
Bonjour ,

dans mon code , j'ai :

Dim f As frmPopUp

    Set f = New frmPopUp
    f.Show
   
    Set f = New frmPopUp
    f.Show

Comment connaitre le nombre de form "frmPopUp" ouverte ?

Merci

4 réponses

Réponse 1 / 4
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
 68
Dim nCount as long
Dim F as Form

For Each F in Forms
    If TypeOf F Is frmPopUp
      nCount = nCount +1
    End If
Next F

Renfield
Admin CodeS-SourceS- MVP Visual Basic
Réponse 2 / 4
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
 56
Salut,

Dans un Module tu peux mettre une Variable Public

Public NbrForm As Integer

Et dans l'événement Load de FrmPopUp
NbrForm = NbrForm + 1

Mais le seul truc c'est que jhe ne sais pas quand faire le NbrForm = NbrForm -1

@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée, Règlement/FONT>
Réponse 3 / 4
Messages postés
104
Date d'inscription
jeudi 25 juillet 2002
Statut
Membre
Dernière intervention
28 septembre 2006
Allez  je suis grand prince , je met reponse acceptée (meme s'il manque le Then !)
Je plaisante.

Merci.
Réponse 4 / 4
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
 68
le genre d'oubli qui arrive, quand on écrit de tête ^^

Renfield
Admin CodeS-SourceS- MVP Visual Basic
Répondre Posez votre question