共6 条记录, 每页显示 10 条, 页签: [1]

标题：MarketData.GetReportDataByIndex 方法问题急切求教

1楼

francus 发表于：2011/5/19 23:00:34

count = marketdata.GetReportCount("DQ")

for i =0 to count
   Set Report1 = MarketData.GetReportDataByIndex("DQ",i) '获取知道市场索引号为i的reportdata对象
      stockname = Report1.stockname
   if stockname = "AX0109"   then
    msgbox "该品种已经存在！！"
    exit sub
   end if
  next

划线处提示缺少对象： “report1 ”，请高手看看怎么回事？

2楼

阿火发表于：2011/5/20 8:11:33

for i =0 to count-1

3楼

francus 发表于：2011/5/20 14:55:32

哦，可以啦，谢谢啦，哈哈，

4楼

francus 发表于：2011/5/20 15:07:24

sub text001()
  MyMarket = "dq"
  MyCode = "ax09"
  '判断该品种是否已经存在，存在则退出，返回消息提示
  count = marketdata.GetReportCount(MyMarket)
  '遍历市场品种代码
  for i =0 to count-1
   Set report = MarketData.GetReportDataByIndex(MyMarket,i) '获取知道市场索引号为i的report对象

   if MyCode = report.Label    then
    msgbox "该套利组合已经存在！！"
    exit sub
  end if
    next
application.MsgOut count & "     " & stockname
end sub

为什么这个却提示，对象不支持此属性或方法？？？我认为是一样的呀

5楼

阿火发表于：2011/5/20 23:18:30

report 系统自带的关键字吧用report1

6楼

francus 发表于：2011/5/21 14:04:41

用report1可以了，但在系统编程帮助文件中找不到report关键字，它到底是什么？

共6 条记录, 每页显示 10 条, 页签: [1]

标题：MarketData.GetReportDataByIndex 方法问题 急切求教

标题：MarketData.GetReportDataByIndex 方法问题急切求教