請(qǐng)幫助在啟動(dòng)軟件時(shí)做一個(gè)股票池的彈框 [金字塔]
-
咨詢內(nèi)容：
?請(qǐng)幫助在啟動(dòng)軟件時(shí)做一個(gè)股票池的彈框，確認(rèn)后再運(yùn)行股票池（不需要勾選股票池默認(rèn)自動(dòng)啟動(dòng)）。這個(gè)彈框，我主要是用來避免軟件啟動(dòng)時(shí)數(shù)據(jù)缺失而造成股票池胡亂交易，而如果不勾選軟件的股票池自動(dòng)啟動(dòng)選項(xiàng)又擔(dān)心開機(jī)忘記運(yùn)行股票池，所以才想在啟動(dòng)軟件做一個(gè)股票池運(yùn)行的確認(rèn)彈框。謝謝
[此貼子已經(jīng)被作者于2020/11/9 18:12:49編輯過]?
?來源: CXH99.COM
-
金字塔客服：
我覺得數(shù)據(jù)問題，你歷史補(bǔ)充好后每天做收盤這樣數(shù)據(jù)都是沒問題的
如果是異常重啟，就像另一個(gè)帖子回復(fù)的重啟后首先就是補(bǔ)充當(dāng)日分筆
?
-
用戶回復(fù)：
?你沒看懂我上面要表達(dá)的意思
?
-
網(wǎng)友回復(fù)：
將這段代碼放到VBA的工程文檔里，推薦放到Global模塊中
Sub APPLICATION_Start()
?Set msgboxs = CreateObject("WWSCommon.MessageBoxEx")
?msgboxs.Button = 2
?msgboxs.IconType = 3
?rets = msgboxs.DoModal("是否啟動(dòng)股票池計(jì)算？","提示")
?If rets = 6 Then
??MarketData.StartStockPool()
?End If
End Sub
此主題相關(guān)圖片如下：tim截圖20180904181842.png
注意：開啟此功能前務(wù)必將股票池的自動(dòng)啟動(dòng)功能關(guān)閉掉?
- 網(wǎng)友回復(fù)： ?ok了，謝謝
有思路，想編寫各種指標(biāo)公式，交易模型，選股公式，還原公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 或微信號(hào)：cxh99cxh99 進(jìn)行 有償收費(fèi) 編寫！
（怎么收費(fèi)，代編流程等詳情請(qǐng)點(diǎn)擊閱讀！）
(注：由于人數(shù)限制，QQ或微信請(qǐng)選擇方便的一個(gè)聯(lián)系我們就行，加好友時(shí)請(qǐng)簡(jiǎn)單備注下您的需求，否則無法通過。謝謝您！)
相關(guān)文章
-
沒有相關(guān)內(nèi)容
會(huì)員登錄/注冊(cè)