隐藏代码
Dim frm = forms("窗口1").panel.parent.parentfrm.AutoHiding = True
显示代码
Dim frm = forms("窗口1").panel.parent.parentfrm.AutoHiding = False