VB与VC接口问题，高手们谁能告诉我呀！！！！！！！

问题是这样的：vb调用vc写好的动态库，vc函数声明如下：
int fun(unsigned char* cChar, int ibs,_int16 com,long bps);
1.vb的变量声明与调用：public ibs as integer
                   public st as integer 
                   public bps as long
                   public cChar as trav其中trav为自定义的结构类型
Declare Function fun Lib "fun.dll" Alias (Byref strutrav As trav,byval ibs as integer,byval com as integer ,byval bps as long) As integer
st=fun(cChar,ibs,com,bps)
这种情况在vb中调用不成功
但是，我把ibs的声明改为public ibs as long ，调用便成功了。
而我把vc中函数声明中ibs由int改为_int16即int fun(unsigned char* cChar, _int16 ibs,_int16 com,long bps);调用也不能成功。请问高手们，这是怎么回事？？？？？？？？