FreeLibrary Function
Declare λ¬Έμ μν΄ λ‘λλ 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