判斷行情超過多長時(shí)間沒有更新！ [金字塔]
- 咨詢內(nèi)容：
使用股指最新行情的時(shí)間跟現(xiàn)在的時(shí)間比較，超過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 "請(qǐng)注意，行情數(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 "請(qǐng)注意，行情數(shù)據(jù)已經(jīng)超過30秒沒有更新了！" Exit Sub end if End Sub - 用戶回復(fù)：
guotx2010斑主~~~這個(gè),是VBA代碼么???可以用金字塔的一般公式代碼代替么?比如轉(zhuǎn)成金字塔的一般公式代碼該如何弄呢,請(qǐng)教一下斑主啊
- 網(wǎng)友回復(fù)：
如果還用pel語言，可以是使用time和currenttime來比較，time是行情k線位置的時(shí)間，currenttime是計(jì)算機(jī)當(dāng)前時(shí)間，這兩個(gè)時(shí)間對(duì)比，可以達(dá)到類似的效果。
- 網(wǎng)友回復(fù)： guotx2010斑主~~~邏輯上是這樣沒錯(cuò)啊,可是關(guān)鍵是,currenttime這個(gè)取本地計(jì)算機(jī)時(shí)間的函數(shù),需要有行情數(shù)據(jù)進(jìn)來時(shí)才會(huì)步進(jìn)的!!!也就是說,如果沒有行情數(shù)據(jù),currenttime是取得最后一筆數(shù)據(jù)的本地計(jì)算機(jī)時(shí)間,然后,就不會(huì)動(dòng)了!!!所以,就沒得比較,也就不可能達(dá)到目的 [此貼子已經(jīng)被作者于2013/7/12 14:09:14編輯過]
有思路，想編寫各種指標(biāo)公式，程序化交易模型，選股公式，預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 1145508240 進(jìn)行 有償 編寫！（不貴！點(diǎn)擊查看價(jià)格！）
相關(guān)文章
-
沒有相關(guān)內(nèi)容
會(huì)員登錄/注冊(cè)