If e.sender.text = 1 e.sender.Text = 2e.Form.SetBounds(w/2-949/2,h/2-540/2,949,540)
位移是你窗口初始的尺寸和你规定的尺寸不一致