这样也错了?

问题描述,代码控制窗体居中:模块中
Public Sub MakeCenter(frm As Form)
Dim x0 As Long
Dim y0 As Longx0 = Screen.Width
y0 = Screen.Height
x0 = (x0 - frm.Width) / 2
y0 = (y0 - frm.Width) / 2
frm.Move x0, y0End Sub
-------------------------------------窗体fromload
Call MakeCenter(Me)
这也出错???????????
编译错误:
缺少变量或过程,不是模块