Declare Statement

Используется для объявления и определения подпрограммы, расположенной в файле DLL, которая должна выполняться из LibreOffice Basic.

См. также: FreeLibrary

Синтаксис

Declare {Sub | Function} Имя Lib "Имя_библиотеки" [Alias "Псевдоимя"] [Аргументы] [As Тип]

Параметры:

Имя. Имя, отличающееся от имени, определенного в библиотеке DLL, предназначенное для вызова подпрограммы из LibreOffice Basic.

Псевдоимя. Имя подпрограммы, определенное в библиотеке DLL.

Имя_библиотеки. Файловое или системное имя библиотеки DLL. Эта библиотека автоматически будет загружена при первом использовании функции.

Аргументы. Список параметров, являющихся аргументами вызываемой процедуры. Тип и количество параметров зависят от вызываемой процедуры.

Тип. Определяет тип возвращаемого функцией/процедурой значения. Этот параметр можно исключить, если дескриптор типа вводится после имени.

Значок предупреждения

Параметры должны сопровождаться ключевым словом ByVal, если их необходимо передавать в вызываемую процедуру по значению, а не по ссылке.


Пример:

Declare Sub MyMessageBeep Lib "user32.dll" Alias "MessageBeep" ( Long )

Sub ExampleDeclare

Dim lValue As Long

    lValue = 5000

    MyMessageBeep( lValue )

    FreeLibrary("user32.dll" )

End Sub