IBM Lotus Symphony
|
Declara e define uma subrotina num ficheiro DLL que pretenda executar a partir do Lotus® Symphony™ Basic.
Consulte também: FreeLibrary.
Declare {Sub | Function} Name Lib "Libname" [Alias "Aliasname"] [Parameter] [As Type]
Name: Um nome diferente do nome definido no DLL, para invocar a subrotina a partir do Lotus Symphony Basic.
Aliasname: Nome da subrotina, tal como definido no DLL.
Libname: Nome do ficheiro ou sistema do DLL. Esta biblioteca é automaticamente carregada da primeira vez em que a função for utilizada.
Argumentlist: Lista de parâmetros que representam argumentos que são passados ao procedimento, quando este é invocado. O tipo e número de parâmetros depende do procedimento executado.
Type: Define o tipo de dados do valor devolvido por um procedimento da função. Pode excluir este parâmetro caso seja introduzido um carácter type-declaration após o nome.
![]() |
Para passar um parâmetro a uma subrotina como um valor em alternativa a uma referência, o parâmetro tem de ser indicado através da palavra-chave 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