vba中有个头疼的开盘时间问题 - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

触发代码都是一样的,说得更详细点,触发代码分为2部分,第一部分判断程序运行次数,第二部分判断开盘时间:

Function SWjg(Formula)

.....

hiscount=HistroyData.count

barrecord=Document.GetPrivateProfileFloat("Gen", tLabel & "Num", 0, "D:\SystemSet.ini")

if (hiscount<>barrecord or barrecord=0) and right(tLabel,2)="00" and (thisopen>0 and jihe=0) then '加粗的条件就是用于限制开盘再运行 {这就是我的全部触发条件}

....

Document.WritePrivateProfileString "Gen",tLabel & "Num",hiscount,"D:\SystemSet.ini" '这样的话就实现了当天只运行一遍的要求

end if

end Function

所以我觉得这个触发条件前半部分不应该有什么问题

另外,你说的

"IsVirtualData 属性的集合竞价数据不是你理解的哪种，期货的开盘前第一笔数据已经不是集合竞价数据了"

那我就纳闷了,开盘前的数据都不是集合竞价数据,那什么时候IsVirtualData=1?

[此贴子已经被作者于2014/8/22 10:28:39编辑过]

主题：vba中有个头疼的开盘时间问题