主题：请教bin老师，如何让窗口一直居中

窗口启动定时期，500毫秒执行一次，代码：

Dim frm As Windows.Forms.Form = BaseMainForm
Dim x As Integer = frm.left + (frm.Width - e.Form.Width)/ 2
Dim y As Integer = frm.Top + (frm.height - e.Form.height)/ 2
e.Form.SetBounds(x,y,e.Form.width,e.Form.height)