主题：[求助][求助]窗口伸缩变化后的位置能否还在默认位置

这是程兴刚老师写的窗口伸缩的代码：

Forms("窗口1").Controls("SplitContainer1").Panel2.Collapsed = not Forms("窗口1").Controls("SplitContainer1").Panel2.Collapsed
If Forms("窗口1").Controls("SplitContainer1").Panel2.Collapsed = True
    Forms("窗口1").SetBounds(300,100,167,387)
Else
    Forms("窗口1").SetBounds(300,100,687,387)
End If

这个代码在进行窗口伸缩时默认位置会改变，我想请教一下能否在窗口伸缩后仍然居于屏幕中央