问题（高手请进来）

Question

如何在vb中，调用非注册的.dll文件（动态连接库文件）？

Answer 1

与api的调用一致Option Explicit
Private Declare Function WLock Lib "F:\csdn_vb\vcdll测试\lock\FPlock.dll" Alias "#1" (ByVal sText As String, ByVal iLen As Long) As Long
Private Declare Function WUnLock Lib "F:\csdn_vb\vcdll测试\lock\FPlock.dll" Alias "#2" (ByVal sText As String, ByVal iLen As Long) As LongPrivate Sub Command1_Click()
 Dim s As String
    s = "123"
    Text2.Text = WLock(s, Len(s))
    MsgBox s
    
    Text2.Text = WUnLock(s, Len(s))
    MsgBox s
End Sub

Answer 2

如果DLL里含有类可以直接引用