[VB 6] ทำยังไงให้เวลารันโปรแกรม มันเปิดหน้าต่างที่กลางจอเสมอ

Public Sub gproc_PositionForm(v_frm As Form)
        v_frm.Left = (Screen.Width - v_frm.Width) / 2 'frmMDI.Width / 2 - v_frm.Width / 2 '(Screen.Width - v_frm.Width) / 2
        v_frm.Top = (Screen.Height - v_frm.Height) / 4 '(frmMDI.Height) / 2 - v_frm.Height / 2  '(Screen.Height - v_frm.Height) / 4
End Sub