关于vb调用c编写的dll文件的回调函数的问题！

[fsrtt]

vb调用c编写的dll文件,下面是关于函数的说明，请问一下在VB中怎么写？

BOOL Hik_PlayM4_SetSourceBufCallBack(LONG nPort,DWORD nThreShold,void (CALLBACK *SourceBufCallBack)
(long nPort,DWORD nBufSize,DWORD dwUser,void*pResvered),DWORD dwUser,void *pReserved);
说 明： 设置源缓冲区阀值和剩余数据小于等于阀值时的回调函数指针.
输入参数:
nThreShold 阀值.
SourceBufCallBack 回调函数指针；
dwUser 用户数据；
pReserved 保留数据；

回调函数声明:
void CALLBACK SourceBufCallBack(long nPort,DWORD nBufSize, DWORD dwUser,void*pContext)
参 数:
nPort 播放器通道号.
nBufSize 缓冲区中剩余数据；
dwUser 用户数据；
pResvered 保留数据；

[supergreenbean]

declare function Hik_PlayM4_SetSourceBufCallBack lib "ddd.dll" ( byval nPort as long ,byval nThreshold as long ,byval lpfnSourceBufCallBack as long ,byval dwUser as long ,pReserved as any) as long

sub SourceBufCallBack(byval nPort as long ,byval nBufSize as long , byval dwUser as long ,byval pResvered as long)

end sub