时间戳

首页 > 解决方案 > MS Access 启动时隐藏按钮

ms-access - MS Access 启动时隐藏按钮

问题描述

我正在尝试编写代码以仅在一年中的某些月份显示一个按钮。我想我已经把代码写下来了，但我不知道把它放在哪里让它工作。当我将代码放入“onpaint”时，我得到一个 32521 错误代码：“You can't change the value of this property in the OnPaint event.”

这是代码：

Button.Visible = False

If ( (Month(Now) = 6) Or (Month(Now) = 7) Or (Month(Now) = 8) ) Then
Button.Visible = True
End If

打开主屏幕表单时，我应该在哪里放置此代码以使其正常运行？

标签： ms-access

解决方案

在您的加载事件中

Private Sub Form_Load()

Button.Visible = False

If ( (Month(Now) = 6) Or (Month(Now) = 7) Or (Month(Now) = 8) ) Then
    Button.Visible = True
End If

End Sub

推荐阅读