C++语言转换成VB语言.

C++语言转换成VB语言....在线等～～！
realplay函数是C++开发包HCNetSDK.dll文件里的
LONG   realplay(LONG   idno,CLIENTINFO   idclient)
typede   struck{
                  LONG   ICha;
                  LONG   ILink;
                  HWND   HPlayWnd;关键是这里怎样可以改写成vb中的窗体句柄
                  char*   sMulti;
                }CLIENTINFO,*lPN_CLIENTINFO
我的问题是：vb中使用realplay函数，如何改写这些代码
Public   Type   CLIENTINFO
        ICha   As   Integer
        ILink   As   Integer
        HPlayWnd   As   Long
        sMulti   As   String
End   Type

Declare   Function   realplay   Lib   "HCNetSDK.dll "   (ByVal   login   As   Integer,   ByRef   dvrCLIENTINFO   As   CLIENTINFO)   As   long


我在调用的过程中没有出现语法错误，但调用realplay返回值是错误（正常的返回值是大于0的数，而现在返回的数是-1）的，我怀疑是c++中的句柄和vb里的句柄不相符
但又不知道怎么改。请各位大虾帮帮我！！！！


------解决方案--------------------
Public Type CLIENTINFO
ICha As Long
ILink As Long
HPlayWnd As Long
sMulti As String
End Type
Declare Function realplay Lib "HCNetSDK.dll " (ByVal login As long, ByRef dvrCLIENTINFO As CLIENTINFO) As long