小弟在做海康卡DS-4004HC,遇到个原始数据回调问题,请教各位了~

小弟我程序如下:
　　f = RegisterImageStreamCallback(AddressOf streamcallback, 0)
　　f = SetImageStream(ChannelhDevice(0), True, 25, 352, 288, imageBuffer)
声明:
Public buf(152063) As Byte
Public Declare Function RegisterImageStreamCallback Lib "DS40xxSDK.dll" (ByVal streamcallback As Long, ByVal context As Long) As Long
Public Declare Function SetImageStream Lib "DS40xxSDK.dll" (ByVal hDevice As Long, ByVal bStart As Boolean, ByVal fps As Long, ByVal Width As Long, ByVal height As Long, ByRef imageBuffer As long) As Long
回调函数如下：
Public Sub streamcallback(ByVal channelNumber As Long, ByVal context As Long)
　　CopyMemory varptr(buf(0)), imageBuffer, 152064
    form1.text1.text= buf(100)
end sub
现在遇到的现象就是直接提示说VB遇到问题，VB自己关闭了
copymenory的１５２０６４是图片的大小，这个值我算过，没有问题～
它的函数原型如下：
5069. 注册获取原始图像数据流的回调函数：RegisterImageStreamCallback（）
函数：int RegisterImageStreamCallback(IMAGE_STREAM_CALLBACK，void *context) 参数：IMAGE_STREAM_CALLBACK 回调函数 
回调函数说明 (*IMAGE_STREAM_CALLBACK)(UINT channelNumber ,void *context)
UINT channelNumber 通道号
void *conte 调用回调函数时提供的上下文
返回： 正确为0，其他为第4节定义的错误号；
说明：注册用户获取原始图像数据流的函数，用户可以获取实时的 YUV420 格式的预览数据.
5070. 启动/停止原始图象数据捕获数据流 SetImageStream() 其中:imageBuffer参数为:
     Char *imageBuffer 抓图后存数据的地址