TestReport 回測怎么設(shè)置回測的起止時間？
作者：金字塔 來源：cxh99.com 發(fā)布時間：2016年07月16日
- 咨詢內(nèi)容：
TestReport 回測怎么設(shè)置回測的起止時間？
- 金字塔客服：
用 GetHistoryDataByDate 取代范例中的 GetHistoryData 即可。
sub TEST()
set Data1= marketdata.GetHistoryDataByDate("if00","zj",0,"2014/8/8","2014/8/16") '讀中金所股指期貨主力合約指定時段的1分鐘數(shù)據(jù)
Application.MsgOut Data1.Count '打印輸出數(shù)據(jù)量
Application.MsgOut Data1.Date(0) '輸出第一個數(shù)據(jù)日期
Application.MsgOut Data1.Date(Data1.Count-1)'輸出最后一個數(shù)據(jù)日期
'數(shù)據(jù)處理完畢后,清理緩沖區(qū)
marketdata.DestroyHistoryData
End Sub
- 用戶回復：
Sub T5()
Testreport.StartAndInit '開始測評系統(tǒng)的準備工作
Testreport.InitCash=100*10000 '初始資金100萬
set HistroyData= marketdata.GetHistoryDataByDate("au00","sq",5,"2014/1/2","2016/6/06") '讀主力合約指定時段的日線數(shù)據(jù)
Set Formula = marketdata.STKINDI("au00","sq","ma35()",0,5) '調(diào)用日線自定義指標
Set HistroyData = Formula.ParentGrid.GetHistoryData '直接得到公式區(qū)的數(shù)據(jù)對象,提高運行效率
msgbox HistroyData.date(0)
Application.msgout TestReport.ASSET
TestReport.StepIt i
Testreport.ShowReport
End Sub
但這里日期為什么是12月16？而不是2014/1/1
- 網(wǎng)友回復：
工具-選項-維護
內(nèi)存保留，這邊的數(shù)量調(diào)大然后重啟電腦
- 網(wǎng)友回復：
Sub T5()
Testreport.StartAndInit '開始測評系統(tǒng)的準備工作
Testreport.InitCash=100*10000 '初始資金100萬
set HistroyData= marketdata.GetHistoryDataByDate("au00","sq",5,"2014/1/2","2016/6/06") '讀主力合約指定時段的日線數(shù)據(jù)
Set Formula = marketdata.StkindiByData("ma35()",HistroyData) '調(diào)用日線自定義指標
msgbox HistroyData.date(0)
Application.msgout TestReport.ASSET
TestReport.StepIt i
Testreport.ShowReport
End Sub
打印本文
關(guān)閉窗口