convert WCS to UCS

程序代码：

Dim wcs2ucs As Matrix3d = doc.Editor.CurrentUserCoordinateSystem.Inverse()
Dim ucsPoint As Point3d = worldPoint.TransformBy(wcs2ucs)