FreeLibrary 函数
释放由 Declare 语句加载的 DLL。如果再次调用已释放 DLL 中的某个函数,则该 DLL 会自动重新加载。请参阅:Declare
语法:
FreeLibrary (LibName As String)
参数:
LibName: 用于指定 DLL 名称的字符串表达式。
FreeLibrary 只能释放在 Basic 运行时装入的 DLL。
示例:
Declare Sub MyMessageBeep Lib "user32.dll" Alias "MessageBeep" ( Long )
Sub ExampleDeclare
Dim lValue As Long
lValue = 5000
MyMessageBeep( lValue )
FreeLibrary("user32.dll" )
End Sub