|
馬名と着度数を取得するためサンプルプログラムを変更してみまたが、馬名が&q uot;リオ 001103"切れてしまいます。また全場 着度数もデータが""になります。原因についてご教授お願いいたしま す。変更コードは下記になります。(RACEに変更しても変わりませんでした。) retval = JVLink1.JVOpen("DIFN", "20230801000000" ;, 1, readcount, dlcount, lastfiletimestamp) (retval = JVLink1.JVOpen("RACE", "20230801000000", 1, readcount, dlcount, lastfiletimestamp) Dim mRaData As JV_UM_UMA If Left(buff, 2) = "SE" Then Call SetData_UM(buff, mRaData) Sheet1.Cells(5 + i, 2) = mRaData.Bamei For i = 0 To 5 Sheet1.Cells(5 + i, 2)=mRaData.ChakuSogo.Chakukaisu(i) Next i |