Question

复选框控制子窗体是否可见。如果复选框为“true”，则子表单可见。问题是，当我关闭并重新打开表单时，即使复选框仍然为真，子表单也不再可见。在子窗体再次可见之前，我必须取消选中并重新选中复选框。这是我正在使用的：

Private Sub RefBoardCkbx_Click()
If RefBoardCkbx.Value = True Then
[Admin Sep - Awaiting Prelim SubBox].Visible = True
Else
[Admin Sep - Awaiting Prelim SubBox].Visible = False
End If
End Sub

显然，表单必须有一些方法可以在每次打开时自动重新运行代码 - 我不知道如何让它做到这一点！

Answer 1

使用主窗体的On Load事件可在窗体打开时显示子窗体。

Me.[Admin Sep - Awaiting Prelim SubBox].Visible = True

您可能还想同时勾选复选框。

Me.RefBoardCkbx.Value = True

作为一个侧面点，请考虑此版本的点击事件过程是否对您有意义......

Private Sub RefBoardCkbx_Click()
    Me.[Admin Sep - Awaiting Prelim SubBox].Visible = Me.RefBoardCkbx.Value
End Sub

复选框控制子窗体可见性 - 如何在重新打开窗体时保持其可见性？

1 个答案: