Contenu
Index 🔎︎

# Instruction Declare

Déclare et définit une sous-routine dans un fichier DLL à exécuter à partir de LibreOffice Basic.

Voir aussi : FreeLibrary

## Syntaxe :

    Declare {Sub | Function} Name Lib "Libname" [Alias "Aliasname"] [Parameter] [As Type]

## Paramètres :

Name : nom différent de celui défini dans le DLL, de manière à appeler la sous-routine à partir de LibreOffice Basic.

Aliasname : nom de la sous-routine tel que défini dans le DLL.

Libname : nom de fichier ou nom système du DLL. Cette bibliothèque est chargée automatiquement à la première utilisation de la fonction.

Argumentlist : liste des paramètres représentant les arguments transmis à la procédure lorsque celle-ci est appelée. Le type et le nombre de paramètres dépendent de la procédure exécutée.

Type : définit le type de données de la valeur renvoyée par une procédure Function. Vous pouvez omettre ce paramètre si un caractère de déclaration de type est saisi après le nom.

Pour transmettre un paramètre à une sous-routine en tant que valeur plutôt qu'en tant que référence, le paramètre doit être spécifié par le mot-clé ByVal.

## Exemple :

    Declare Sub MyMessageBeep Lib "user32.dll" Alias "MessageBeep" ( Long )
    Sub ExampleDeclare
    Dim lValue As Long
        lValue = 5000
        MyMessageBeep( lValue )
        FreeLibrary("user32.dll" )
    End Sub