office交流网--QQ交流群号

Access培训群:792054000         Excel免费交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

VBA代码显示和隐藏Access状态栏及显示日期时间进度条等

2017-07-11 08:38:00
zstmtony
原创
2902

问题(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

分享