Declare Statement

āĻāĻ•āĻŸāĻŋ DLL āĻĢāĻžāĻ‡āĻ˛ā§‡āĻ° āĻŽāĻ§ā§āĻ¯ā§‡ āĻāĻ•āĻŸāĻŋ āĻ¸āĻžāĻŦāĻ°ā§āĻŸāĻŋāĻ¨ āĻĄāĻŋāĻ•ā§āĻ˛ā§‡ā§ŸāĻžāĻ° āĻāĻŦāĻ‚ āĻ¨āĻŋāĻ°ā§āĻ§āĻžāĻ°āĻŖ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡ āĻ¯āĻž āĻ†āĻĒāĻ¨āĻŋ LibreOffice āĻŦā§‡āĻ¸āĻŋāĻ• āĻĨā§‡āĻ•ā§‡ āĻšāĻžāĻ˛āĻžāĻ¤ā§‡ āĻšāĻžāĻ¨āĨ¤

āĻ†āĻ°āĻ“ āĻĻā§‡āĻ–ā§āĻ¨: FreeLibrary

āĻ¸āĻŋāĻ¨āĻŸā§āĻ¯āĻžāĻ•ā§āĻ¸:


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

āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°:

āĻ¨āĻžāĻŽ: DLL āĻ āĻ¨āĻŋāĻ°ā§āĻ§āĻžāĻ°āĻŋāĻ¤ āĻāĻ•āĻŸāĻŋ āĻ­āĻŋāĻ¨ā§āĻ¨ āĻ¨āĻžāĻŽ, LibreOffice āĻŦā§‡āĻ¸āĻŋāĻ• āĻĨā§‡āĻ•ā§‡ āĻ¸āĻžāĻŦāĻ°ā§āĻŸāĻŋ āĻ•āĻ˛ āĻ•āĻ°āĻžāĻ° āĻœāĻ¨ā§āĻ¯āĨ¤

āĻ‰āĻĒāĻ¨āĻžāĻŽ: DLL āĻ āĻ¨āĻŋāĻ°ā§āĻ§āĻžāĻ°āĻŋāĻ¤ āĻ¸āĻžāĻŦāĻ°ā§āĻŸāĻŋāĻ¨ā§‡āĻ° āĻ¨āĻžāĻŽāĨ¤

Libname: DLL āĻāĻ° āĻĢāĻžāĻ‡āĻ˛ āĻ…āĻĨāĻŦāĻž āĻ¸āĻŋāĻ¸ā§āĻŸā§‡āĻŽā§‡āĻ° āĻ¨āĻžāĻŽāĨ¤ āĻĢāĻžāĻ‚āĻļāĻ¨āĻŸāĻŋ āĻĒā§āĻ°āĻĨāĻŽāĻŦāĻžāĻ° āĻŦā§āĻ¯āĻŦāĻšāĻžāĻ° āĻ•āĻ°āĻž āĻšāĻ˛ā§‡ āĻ˛āĻžāĻ‡āĻŦā§āĻ°ā§‡āĻ°āĻŋāĻŸāĻŋ āĻ¸ā§āĻŦā§ŸāĻ‚āĻ•ā§āĻ°āĻŋā§ŸāĻ­āĻžāĻŦā§‡ āĻ˛ā§‹āĻĄ āĻšā§Ÿā§‡ āĻĨāĻžāĻ•ā§‡āĨ¤

Argumentlist: āĻ†āĻ°āĻ—ā§āĻŽā§‡āĻ¨ā§āĻŸ āĻ‰āĻĒāĻ¸ā§āĻĨāĻžāĻĒāĻ¨āĻ•āĻžāĻ°ā§€ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°ā§‡āĻ° āĻ¤āĻžāĻ˛āĻŋāĻ•āĻž āĻ¯āĻž āĻ•āĻ˛ āĻ•āĻ°āĻžāĻ° āĻ¸āĻŽā§Ÿ āĻĒā§āĻ°āĻ¸āĻŋāĻœāĻžāĻ°ā§‡ āĻĒāĻžāĻ¸ āĻ•āĻ°āĻž āĻšā§ŸāĨ¤ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°ā§‡āĻ° āĻ§āĻ°āĻ¨ āĻāĻŦāĻ‚ āĻ¸āĻ‚āĻ–ā§āĻ¯āĻž āĻšāĻžāĻ˛āĻžāĻ¨ā§‹ āĻĒā§āĻ°āĻ¸āĻŋāĻœāĻžāĻ°ā§‡āĻ° āĻ‰āĻĒāĻ° āĻ¨āĻŋāĻ°ā§āĻ­āĻ° āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡āĨ¤

āĻ§āĻ°āĻ¨: āĻŽāĻžāĻ¨ā§‡āĻ° āĻĄāĻžāĻŸāĻž āĻŸāĻžāĻ‡āĻĒ āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻ•āĻ°ā§‡ āĻĨāĻžāĻ•ā§‡ āĻ¯āĻž āĻāĻ•āĻŸāĻŋ āĻĢāĻžāĻ‚āĻļāĻ¨ āĻĒā§āĻ°āĻ¸āĻŋāĻœāĻžāĻ° āĻĻā§āĻŦāĻžāĻ°āĻž āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻšā§ŸāĨ¤ āĻ¯āĻĻāĻŋ āĻ¨āĻžāĻŽā§‡āĻ° āĻĒāĻ°ā§‡ āĻāĻ•āĻŸāĻŋ āĻŸāĻžāĻ‡āĻĒ-āĻĄāĻŋāĻ•ā§āĻ˛ā§‡ā§ŸāĻžāĻ° āĻ•āĻ°āĻžāĻ° āĻ…āĻ•ā§āĻˇāĻ° āĻ…āĻ¨ā§āĻ¤āĻ°ā§āĻ­ā§‚āĻ•ā§āĻ¤ āĻ•āĻ°āĻž āĻšā§Ÿ āĻ¤āĻžāĻšāĻ˛ā§‡ āĻ†āĻĒāĻ¨āĻŋ āĻāĻ‡ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°āĻŸāĻŋ āĻŦāĻžāĻĻ āĻĻāĻŋāĻ¤ā§‡ āĻĒāĻžāĻ°ā§‡āĻ¨āĨ¤

āĻ¸āĻ¤āĻ°ā§āĻ•āĻ¤āĻžāĻŽā§‚āĻ˛āĻ• āĻ†āĻ‡āĻ•āĻ¨

āĻ°ā§‡āĻĢāĻžāĻ°ā§‡āĻ¨ā§āĻ¸ā§‡āĻ° āĻĒāĻ°āĻŋāĻŦāĻ°ā§āĻ¤ā§‡ āĻāĻ•āĻŸāĻŋ āĻŽāĻžāĻ¨ āĻšāĻŋāĻ¸ā§‡āĻŦā§‡ āĻāĻ•āĻŸāĻŋ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°āĻ•ā§‡ āĻ¸āĻžāĻŦāĻ°ā§āĻŸāĻŋāĻ¨ā§‡ āĻĒāĻžāĻ¸ āĻ•āĻ°āĻžāĻ¨ā§‹āĻ° āĻœāĻ¨ā§āĻ¯ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻŸāĻžāĻ°āĻŸāĻŋ āĻ…āĻŦāĻļā§āĻ¯āĻ‡ 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

Please support us!