MouHAns 发表于 2012-5-24 12:21:21

[求助]VBA中可不可以在UCS下绘图？？

我已经用usercoorinatesystems 成功建立了一个UCS,运行以后在模型空间也看到UCS是正确的，但是接下去在VBA中绘制点还是会在WCS下……没有有方法可以激活这个UCS，并且在这个UCS下利用VBA绘图

http://bbs.mjtd.com/xwb/images/bgimg/icon_logo.png 该贴已经同步到 MouHAns的微博

VBALISPER 发表于 2012-5-24 22:15:16

请参考这个例子:
pointUCS = ThisDrawing.Utility.TranslateCoordinates(startPnt, acWorld, acUCS, False) '将指定点的坐标由世界坐标系转为用户坐标系,否则画的线是指定位置转换成世界坐标系的位置.

MouHAns 发表于 2012-5-25 08:59:10

VBALISPER 发表于 2012-5-24 22:15 static/image/common/back.gif
请参考这个例子:
pointUCS = ThisDrawing.Utility.TranslateCoordinates(startPnt, acWorld, acUCS, False ...

那是每一个点都要手动转换吗？

crazylsp 发表于 2013-5-22 16:54:26

请参考这个例子:
pointUCS = ThisDrawing.Utility.TranslateCoordinates(startPnt, acWorld, acUCS, False) '将指定点的坐标由世界坐标系转为用户坐标系,否则画的线是指定位置转换成世界坐标系的位置.


我下来试试
页: [1]
查看完整版本: [求助]VBA中可不可以在UCS下绘图？？