FreeLibrary 函数

释放由 Declare 语句加载的 DLL。如果再次调用已释放 DLL 中的某个函数,则该 DLL 会自动重新加载。请参阅:Declare

语法:

FreeLibrary (LibName As String)

参数:

LibName: 用于指定 DLL 名称的字符串表达式。

批注图标

FreeLibrary 只能释放在 Basic 运行时装入的 DLL。


错误代码:

5 无效的过程调用

示例:

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

Sub ExampleDeclare

Dim lValue As Long

    lValue = 5000

    MyMessageBeep( lValue )

    FreeLibrary("user32.dll" )

End Sub