access創(chuàng)建查詢并刷新數(shù)據(jù)庫對象

在前面的學(xué)習(xí)中，我們講過如何使用VBA代碼動態(tài)創(chuàng)建access對象的內(nèi)容

比如創(chuàng)建窗體《Access動態(tài)創(chuàng)建窗體及動態(tài)創(chuàng)建控件》，創(chuàng)建查詢《Access vba動態(tài)創(chuàng)建查詢》

用代碼動態(tài)創(chuàng)建的窗體會馬上顯示，但是創(chuàng)建的表和查詢對象沒有馬上顯示出來。那么我們?nèi)绾嗡⑿聦ο罅斜砟兀?/p>

動態(tài)創(chuàng)建一個查詢并刷新列表對象

Sub CreateRequeryAndRefresh()
    
    CurrentDb.CreateQueryDef "NewRequery", "Select * from Order1"
    RefreshDatabaseWindow
End Sub

使用 RefreshDatabaseWindow 方法在創(chuàng)建、刪除或重命名數(shù)據(jù)庫對象之后立即對“數(shù)據(jù)庫”窗口對象進(jìn)行更改。

創(chuàng)建成功，并在列表中顯示對象