[VB]请求高手指点江山!!用户坐标系转换问题
请指教:我在前面定义了一个objUCS,之后激活;gAcadDocument.ActiveUCS = objUCS
当用Set objLine = gAcadDocument.ModelSpace.Addline(dblStart,dblEnd)画线的时候它并没有按着我定义的用户坐标系的坐标去画,还是用最一开始没有定义之前的坐标去画的,可是当我用:
gAcadDocument.SendCommand "line" & vbCr & CStr(dblStart(0)) &"," & CStr(dblStart(1)) & ", 0" & vbCr & CStr(dblEnd(0)) & "," & CStr(dblEnd(1)) & ",0" & vbCr & vbCr 画出来的线就可以按着我自定义的坐标系画了,我请问一下这两个语句有什么不同呢,问题出在哪里呢!
谢谢指教! VB只能获得或控制世界坐标系的坐标 可使用TranslateCoordinates 方法把坐标从UCS转到WCS,再画线。
页:
[1]