判斷行情超過多長時間沒有更新! [金字塔]
- 咨詢內(nèi)容:
使用股指最新行情的時間跟現(xiàn)在的時間比較,超過30秒就提醒。
Sub APP1 Set Report1=MarketData.GetReportData("IF00","ZJ") StockTime=Report1.Date TimeSpace=DateDiff("s",Cdate(Now),StockTime)
if abs(TimeSpace)>30 then Application.MsgOut "請注意,行情數(shù)據(jù)已經(jīng)超過30秒沒有更新了!" Exit Sub end ifEnd Sub
- 金字塔客服:
Sub APP1
Set Report1=MarketData.GetReportData("IF00","ZJ")
StockTime=Report1.Date
TimeSpace=DateDiff("s",Cdate(Now),StockTime)
if abs(TimeSpace)>30 then Application.MsgOut "請注意,行情數(shù)據(jù)已經(jīng)超過30秒沒有更新了!" Exit Sub end if End Sub - 用戶回復:
guotx2010斑主~~~這個,是VBA代碼么???可以用金字塔的一般公式代碼代替么?比如轉(zhuǎn)成金字塔的一般公式代碼該如何弄呢,請教一下斑主啊
- 網(wǎng)友回復:
如果還用pel語言,可以是使用time和currenttime來比較,time是行情k線位置的時間,currenttime是計算機當前時間,這兩個時間對比,可以達到類似的效果。
- 網(wǎng)友回復: guotx2010斑主~~~邏輯上是這樣沒錯啊,可是關(guān)鍵是,currenttime這個取本地計算機時間的函數(shù),需要有行情數(shù)據(jù)進來時才會步進的!!!也就是說,如果沒有行情數(shù)據(jù),currenttime是取得最后一筆數(shù)據(jù)的本地計算機時間,然后,就不會動了!!!所以,就沒得比較,也就不可能達到目的 [此貼子已經(jīng)被作者于2013/7/12 14:09:14編輯過]
有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 1145508240 進行 有償 編寫!(不貴!點擊查看價格!)
相關(guān)文章
-
沒有相關(guān)內(nèi)容