在关闭Form1之前先把Form2移到Form1的位置即可：
Form2.Show '显示Form2Form2.Move Me.Left, Me.Top, Me.Width, Me.Height '把Form2移到Form1所在位置，并且大小也一样，如果不需要修改大小，则只需 Form2.Move Me.Left, Me.TopUnload Me '关闭Form1
