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