VBA：如何將表單打開一段時間

我使用VBA和Microsoft Access創建會員登錄程序。所以我讓用戶輸入他們的信息，然後一切都插入到我的數據庫表中。在我這樣做後，我想要顯示一些帶有一些信息的表單給用戶。但是，我只想讓它保持15秒鐘然後關閉。有沒有辦法做到這一點？VBA：如何將表單打開一段時間

這是我嘗試過的一個片段。基本上我打開窗體，然後設置一個計時器來關閉窗體。當我這樣做時，表單實際上從未實際顯示給用戶。有什麼理由呢？它確實顯示我是否刪除最後一行中的關閉。

Private Sub Form_Load() 

    [Forms]![SwipeServiceDatesHidden].Requery 

    currentTime = Now() 
    setTime = currentTime + TimeValue("00:00:10") 
    Do While currentTime < setTime 
     currentTime = Now() 
    Loop 

    DoCmd.Close acForm, "SwipeServiceDatesHidden", acSaveNo 

    End Sub

來源

2016-12-14 SheepBandit

我已經在過去做的方式是用'application.ontime時刻設定，「subToCloseForm」'，而不是一個循環。 – ballsy26

不確定關於Access，但對於Excel，我可以通過'Application.OnTime'自動卸載UserForm來調用卸載UserForm的普通模塊中的Sub。 – PatricK

'Close'行在哪裏？ –

把所有的意見之前一起

Private Sub Form_Load() 

    setTime = Now + TimeValue("00:00:10")  

    Application.OnTime setTime, "subToCloseForm" 

End Sub 

Sub subToCloseForm 

    DoCmd.Close 

End Sub

來源

2016-12-15 01:18:50 ballsy26

可用'Application.OnTime'不連接提供VBA –

並沒有意識到這一點。 https://www.experts-exchange.com/questions/27034755/Application-OnTime-in-Access.html這看起來像'application.ontime'的替代方案 – ballsy26

VBA：如何將表單打開一段時間

回答

相關問題