在VB中调用VC开发的动态库

Question

在VC中定义的接口函数为
DWORD WriteKey
(
  IN const BYTE * pbSecretKey,
  IN BYTE bSecretKeyLen
)
在VB中声明如下：
Public Declare Function WriteKey Lib "Test.dll" (ByRef pbSecretKey as Byte, ByVal bSecretKeyLen as Byte) as Long然后在VB中调用时，
dim pbSecretKey as Byte，但是怎样初始化参数：pbSecretKey 啊？谢谢。

Answer 1

改成
Public Declare Function WriteKey Lib "Test.dll" (ByVal pbSecretKey as String, ByVal bSecretKeyLen as Byte) as Long

Answer 2

writekey varptr(pbSecretKey),xxxxx

Answer 3

声明成这样:
Public Declare Function WriteKey Lib "Test.dll" (ByVal pbSecretKey as Long, ByVal bSecretKeyLen as Byte) as Long然后,
lRet=WriteKey(VarPtr(pbSecretKey(0)),bSecretKeyLen)