vb6调用vc中的dll函数，请大家看看。谢谢！！

Question

现有vc写的一个动态连接库Hw300.dll,里面有个函数为：
int ReadCard(int portnumber,int tracknumber,int timeout,unsigned char* track1,int* track1len,unsigned char* track2,int* track2len,unsigned char* track3,int* track3len)
我在vb6中如何调用它 。用它来返回一个值 ！！谢谢

Answer 1

Public Declare Function ReadCard Lib "Hw300.dll"(ByVal portnumber As Integer, ByVal tracknumber As Integer, ByVal timeout As Integer, ByRef track1 As String, ByRef track1len As Integer, ByRef track2 As String, ByRef track2len As Integer, ByRef track3 As String, ByRef track3len As Integer) As Integer

Answer 2

楼上有错误
Public Declare Function ReadCard Lib "Hw300.dll"(ByVal portnumber As Long, ByVal tracknumber As Long, ByVal timeout As Long, ByValtrack1 As String, ByRef track1len As Long, ByValtrack2 As String, ByRef track2len As Long, ByValtrack3 As String, ByRef track3len As Long) As Long

Answer 3

Public Declare Function ReadCard Lib "Hw300.dll"(ByVal portnumber As Long, ByVal tracknumber As Long, ByVal timeout As Long, ByVal track1 As String, ByRef track1len As Long, ByVal track2 As String, ByRef track2len As Long, ByVal track3 As String, ByRef track3len As Long) As Long