VBA代碼顯示和隱藏Access狀態欄及顯示日期時間進度條等

2017-07-11 08:38:00
zstmtony
原創
1804

問題(Access QQ群網友問題):

如何使用VBA代碼顯示和隱藏Access狀態欄


解決辦法

1.顯示Access狀態欄

   Application.SetOption "Show Status Bar", True


2.隱藏Access狀態欄

   Application.SetOption "Show Status Bar", False


Access狀態欄裡顯示 日期,時間等

varReturn =SysCmd(acSysCmdSetStatus, format(Date(),"YYYY/MM/DD")

varReturn =SysCmd(acSysCmdSetStatus, format(Now(),"YYYY/MM/DD HH:NN:SS")


在Access狀態欄裡顯示進度條

varReturn = SysCmd(acSysCmdInitMeter, " ", 100)


Access狀態欄相關技巧:

syscmd的相關技巧:http://www.office-cn.net/access-function/46.html

分享