怎样在vb和vc之间传递数组！！急！

我在vb中定义了一个数组,然后再vc编的dll中调用，对它进行操作，然后要在vb中使用。怎么办？我举个小例子！  
public  sub  sample  lib  "mudll.dll"  (a  as  integer)  
 
public  sub  aaa（）  
dim  b(5)  as  integer  
sample  b(0)  
end  sub  
在dll中的程序是这样的  
void_stdcall  sample  (  short  *a)  
{  
int  i;  
for（i=0;i++;i<5）  
a[1]=5;  
}  
调用时出现某段内存不能读取。各位大虾帮我解决一下！改正错误  或  提供新方法！！谢谢！