set a = marketdata 。。。
set b = marketdata。。。
注意:
1,HistoryDataMode属性为0时,该对象使用一个共有的缓冲区来保存用户打开的市场数据,这意味着用户所调用的数据内容再下次重新调用其他品种或者调用不同种类的数据后会自动失效,若要在不同的品种间做横向数据处理请注意备份之前打开的数据,用户可以使用Visual Basic内部提供的数组,另外还可以使用金字塔为您提供的功能强大的数组类Array.
2,HistoryDataMode属性为1时,不同品种为独立的缓冲区,这样你就可以同时打开多个品种进行横向统计处理了,但是注意当HistoryDataMode=1时,数据使用完毕请调用DestroyHistoryData方法清理内存缓冲区.处于该模式时只有不同的品种才是独立的内存缓冲区,如果相同品种的多次调用,同样是共享缓冲区的.
示例1:
'当HistoryDataMode=0时,对于共享缓冲区需要使用数组保存打开的历史数据 marketdata.HistoryDataMode=0'指定共享内存 dim d1 Set d1 = CreateObject("Stock.Array") set Data1= marketdata.GetHistoryData("if12","zj",0) for i=Data1.Count-20 to Data1.Count-1 d1.AddBack(Data1.Close(i)) next
dim d2 Set d2 = CreateObject("Stock.Array") set Data2= marketdata.GetHistoryData("if11","zj",0) for i=Data2.Count-20 to Data2.Count-1 d2.AddBack(Data2.Close(i)) next |
示例2:
marketdata.HistoryDataMode=1'不同品种为独立的缓冲区 set Data1= marketdata.GetHistoryData("if12","zj",0) set Data2= marketdata.GetHistoryData("if11","zj",0) '这里的代码处理Data1和Data2的对象数据 '数据处理完毕后,清理缓冲区 marketdata.DestroyHistoryData |
注意: 1,HistoryDataMode属性为0时,该对象使用一个共有的缓冲区来保存用户打开的市场数据,这意味着用户所调用的数据内容再下次重新调用其他品种或者调用不同种类的数据后会自动失效,若要在不同的品种间做横向数据处理请注意备份之前打开的数据,用户可以使用Visual Basic内部提供的数组,另外还可以使用金字塔为您提供的功能强大的数组类Array. 2,HistoryDataMode属性为1时,不同品种为独立的缓冲区,这样你就可以同时打开多个品种进行横向统计处理了,但是注意当HistoryDataMode=1时,数据使用完毕请调用DestroyHistoryData方法清理内存缓冲区.处于该模式时只有不同的品种才是独立的内存缓冲区,如果相同品种的多次调用,同样是共享缓冲区的. 示例1:
示例2:
|