VB回调函数出错，内存不能为写

在VC中回调函数为：
C/C++ code:
typedef VOID (__stdcall *DL_AUTOCALLBACK )( DWORD dw1, DWORD dw2, LPVOID lpContext );

int Set( IN HANDLE hCamera, IN BOOL bAE,
IN BYTE btTarget, IN DL_AUTOCALLBACK pfCallback, IN LPVOID lpContext );


Vb中我声明为：
VB code:

Public Declare Function Set _'声明
Lib "XX.dll" (ByVal hCamera As Long, ByVal bAE As Boolean, ByVal btTarget As Byte, _
ByVal pfCallback As Long, ByVal lpContext As Long) As Integer
Public Function AECallback(ByVal dw1 As Long,ByVal dw2 As Long, ByRef lpContext As Long)'一到这就会出错
Dim val As Integer
…………
AECallback = 0
End Function
Set m_hDevice, True, 180, AddressOf XX.AECallback, MainForm.hWnd'这是我的调用

显示内存不能为读！
不知道这是个什么问题，是参数对应的问题吗？
DWORD 为unsigned long类型
LPVOID 为void*
怎么回事呢？有谁给个答案！

---

最后一句改为：Set m_hDevice, True, 180, byval AddressOf XX.AECallback, MainForm.hWnd
试一试

---

你要给出C++的原型。
还有，必须在标准模块里面写回调的代码。

---

set 是关键字，换一个名字。使用 alieas 关键字。

Public Function AECallback(ByVal dw1 As Long,ByVal dw2 As Long, ByRef lpContext As Long) <