布局中的 问题？？请教高手！

los_su

Dim ZF(2) As Double, JD(2) As Double, WZ As AcadText
     
       
    ZF(0) = 555: ZF(1) =  5
    Set WZ = acaddoc.PaperSpace.AddText("XX-XX-XX", ZF, 4)

WZ可以在paperspace画出，但是位置不在ZF点，老是在原点（0,0,0)
    用 WZ.Move JD, ZF也没效果！

请问如何把wz移动到zf点？？

我已经设置了布局，并把活动布局设为了图纸空间而非模型空间