(WINAPI *datacallback)(LONG hHandle,int m_ch,char *pBuffer,int size,void *userdata)这是回调函数,下面是回调函数体 
Function m_datacallback(ByVal hHandle As Long, ByVal m_ch As Long, ByVal pBuffer As Long, ByVal size As Long, ByVal userdata As Long) As Long
     Dim mybuff() As Byte
     ReDim mybuff(0 To size) As Byte '设置存储字节数组的大小
     CopyMemory mybuff(0), ByVal pBuffer, size
     Open "c:\tempJepg.jpg" For Binary As #1
     Put #1, , mybuff()
     Close #1
End Function
make后,执行提示msvbvm60.dll错误。求救!