贴出你的代码。正常情况的代码
basemainform.Visible = False
Forms("窗口1").Show
窗口1 afterLoad事件
e.Form.BaseForm.showintaskbar = True