Savoir si une form est chargée

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 733 fois - Téléchargée 41 fois

Contenu du snippet

Merci à sylvain garnier pour ce code, VisualBasicFrance, c2i.fr

IsLoaded prend en paramètre le nom de la form et renvoie True si elle est chargée (Flase si elle ne l'est pas) exemple : IsLoaded("frmMain") me renverra True si ma form est chargée...

Source / Exemple :


Option Explicit

'Publié par 69VobD3 (DivX-Paradise.net)

'Permet de détecter si une form est chargée
Public Function IsLoaded(FormName As String) As Boolean
    'Definit une form virtuelle
    Dim frm As Form
    'Flag non
    IsLoaded = False
    'Pour chaque form
    For Each frm In VB.Forms
        'Si son nom est celui que l'on cherche
        If frm.Name = Trim(FormName) Then
            'Flag oui
            IsLoaded = True
            'Quitte
            Exit Function
        'fin si
        End If
    'boucle
    Next frm
End Function

A voir également

Ajouter un commentaire Commentaire
Messages postés
206
Date d'inscription
mercredi 30 janvier 2002
Statut
Membre
Dernière intervention
4 décembre 2007

Oups j'avais pas vu ta source ! j'ai fait la même chose que toi, dsl je vais l'enlever !

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.