請幫助在啟動軟件時做一個股票池的彈框

作者：金字塔來源：cxh99.com 發布時間：2021年01月24日

咨詢內容： ?請幫助在啟動軟件時做一個股票池的彈框，確認后再運行股票池（不需要勾選股票池默認自動啟動）。這個彈框，我主要是用來避免軟件啟動時數據缺失而造成股票池胡亂交易，而如果不勾選軟件的股票池自動啟動選項又擔心開機忘記運行股票池，所以才想在啟動軟件做一個股票池運行的確認彈框。謝謝
[此貼子已經被作者于2020/11/9 18:12:49編輯過]
?
?來源: CXH99.COM
金字塔客服：
我覺得數據問題，你歷史補充好后每天做收盤這樣數據都是沒問題的

如果是異常重啟，就像另一個帖子回復的重啟后首先就是補充當日分筆

?
用戶回復： ?你沒看懂我上面要表達的意思
?
網友回復： 將這段代碼放到VBA的工程文檔里，推薦放到Global模塊中
Sub APPLICATION_Start()
?Set msgboxs = CreateObject("WWSCommon.MessageBoxEx")
?msgboxs.Button = 2
?msgboxs.IconType = 3
?rets = msgboxs.DoModal("是否啟動股票池計算？","提示")
?If rets = 6 Then
??MarketData.StartStockPool()
?End If
End Sub

此主題相關圖片如下：tim截圖20180904181842.png

注意：開啟此功能前務必將股票池的自動啟動功能關閉掉

?
網友回復： ?ok了，謝謝