以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  如何取得多窗口框架 任意窗口的时间周期  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=6996)
--  作者：beensu
--  发布时间：2011/6/26 18:32:02
--  如何取得多窗口框架 任意窗口的时间周期
如何取得多窗口框架 任意窗口的时间周期
--  作者：xm1212
--  发布时间：2011/6/26 19:59:57
--  
 为啥一定要取窗口周期？任意周期的数据用程序都可以取呀。取窗口的我个人觉得比较麻烦。
系统有两个例子。我复制给你。

示例

\'在Test过程中打印出上海600217品种当前最新价。
Sub test()
    set Report1 = marketdata.GetReportData("600217","SH")
    msgbox Report1.NewPrice
End Sub

示例2：
\'读取白糖得日线数据
Set HistroyData = marketdata.GetHistoryData("SRX00","ZQ",5)\'若要是分钟这里填0
for i = 0 to HistroyData.count-1
if i = 10 then
\'显示第11个数据得时间，收盘，成交量
msgbox HistroyData.date(i)
msgbox HistroyData.Close(i)
msgbox HistroyData.Volume(i)
end if
next


--------------

用这个也可以

Set History = marketdata.GetHistoryData("m01","dq",0)
userform2_textbox1.text =History.Close(History.Count-Formula.DataSize+aa)


---------------------

用ReportData 对象可以取窗口数据。

证券行情数据对象，该对象用于表示该证券最新行情数据。

示例

\' 得到框架名称为"Technic"，窗格名称为"Main"的窗格对象
Set Grid = Technic.GetGridByName("Main")

\'得到该窗格所对应的动态行情对象
Set ReportData = Grid.GetReportData()

\'取当前最新价
NewPrice = ReportData.NewPrice
MsgBox NewPrice
--  作者：beensu
--  发布时间：2011/6/26 23:17:29
--  
谢谢楼上 但是请针对问题回复 请斑竹解答我的问题
--  作者：王锋
--  发布时间：2011/6/27 10:11:28
--  

不清楚你要求的任意窗口是什么意思，提出问题之前还请尽可能将你的思路描述清楚这样才有助于别人迅速帮你。

可以参考下面的方法

Frame 对象

 

下面的两个属性和方法

GridCount                 框架内所包含窗格个数。

 

GetGridByIndex          得到指定序号（基于0索引）的窗格对象。

 

参考Grid对象
--  作者：beensu
--  发布时间：2011/6/27 11:35:11
--  
比如框架内有四个窗口 时间周期不同 如何取得激活窗口的时间周期
--  作者：王锋
--  发布时间：2011/6/27 21:23:42
--  

Application.ActivateFrame("Technic")
 Set Grid = Technic.ActiveGrid
 MsgBox Grid.CycType

[此贴子已经被作者于2011-6-27 21:24:04编辑过]