Savoir si une form est chargée

Commenter

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

S'inscrire maintenant

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.

Du même auteur (DivXPVobD)