AfterOpenProject里代码是
Tables("表A").Visible = False
在按钮里代码是
Dim frm As WinForm.Form
frm = Forms("窗口1")
frm.Open()
怎样才能即隐藏表,又在按按钮后显示表对应的窗口呢?