powerbasic写DLL

Question

我用powerbasic写个DLL 编译成功~但是在VB里面调用~说找不到DLL入口点~#Compile Dll
#Dim All
#Include "Win32api.inc"Function AVC () As Long           MsgBox "%$#@^%$^!!!"
           avc = 1
End Function    我是菜鸟~不知道上面powerbasic写的有没写错~或者少了什么~大哥大姐指教

Answer 1

#COMPILE DLL
#DIM ALL
#INCLUDE "Win32api.inc"FUNCTION AVC ()  EXPORT AS LONG
      MSGBOX "%$#@^%$^!!!"
      avc = 1
END FUNCTION  以上存為Test.bas 編輯成Test.dll
----------------------------------------------
VB部分
.BASDeclare Function AVC& Lib "Test.dll" ()  ' OK   2選1即可
'Declare Function AVC& Lib "TEST.DLL" ()  ' OK   2選1即可表單
Private Sub Command1_Click()
X = CStr(AVC&)
MsgBox X
End SubVB部分完工後先存檔.關閉整個vb程式(編輯狀態)..
重開啟vb就算在 編輯狀態也可找的到dll檔

Answer 2

記得!!
vb 跟 pb的dll 要放在同一資料夾
不然 vb .bas部份的Declare 要完整的dll路徑才可