>>Hi
>>
>>I have been given this VB6 code as an example:
>>
>>

>>Dim AB As Object
>>Dim qt As Object
>>Dim aDate, aOpen, aHigh, aLow, aClose, aVolume, aOpenInt As Variant
>>
>>Set AB = CreateObject("Broker.Application")
>>Set QT = AB.Stocks(Symbol.Text).Quotations
>>
>>NumQuotes = QT.Retrieve(-1, aDate, aOpen, aHigh, aLow, aClose, aVolume, aOpenInt)
>>
>>List1.Clear
>>
>>For i = 0 To NumQuotes - 1
>> List1.AddItem (aDate(i) & "," & aOpen(i) & "," & aHigh(i) & "," & aLow(i) & "," & aClose(i) & "," & aVolume(i))
>>Next
>>
>>

>>
>>So it would appear they are passing arrays to the Retrieve() function. When try it I still get type mismatch.
>
>So just build a VB wrapper and shelve the problem for now...

lol! and how would this humble coder do that? :)