請教 群益API國內報價Tick問題

ethanliang

我使用 VB6 撰寫程式碼
在Module 中先定義
   Public Type SKTICK
      nPtr As Long
      nTimehms As Long           
      nTimemillismicros As Long   
      nBid As Long
      nAsk As Long
      nClose As Long
      nQty As Long
      nSimulate As Long   
   End Type

然後在 Form中，使用按鈕
On Error Resume Next
    Dim nCode As Integer
    Dim Tick As SKTICK
     Set SKQuote = New SKQuoteLib
     nCode = SKQuote.SKQuoteLib_RequestTicks(-1, "TX05")
     nCode = SKQuote.SKQuoteLib_GetTick(MarketNo, Index, Ptr, Tick)

在上面程式碼 nCode = SKQuote.SKQuoteLib_GetTick(MarketNo, Index, Ptr,Tick)
中的 Tick
卻出現 "編輯錯誤，ByRef 引數型態不符 " 的訊息 !

請各位大大幫幫忙，要如何修改，謝謝。

alexliou

nCode = SKQuote.SKQuoteLib_GetTick(MarketNo, Index, Ptr, byRef Tick)

ethanliang

alexliou 兄您好，

出現編輯錯誤  "必須是運算式" 的訊息