乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 46|回复: 2

[VB]请求高手指点江山!!用户坐标系转换问题

[复制链接]

11

主题

23

帖子

6

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
67
发表于 2005-1-9 23:00:00 | 显示全部楼层 |阅读模式
请指教:
         我在前面定义了一个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 画出来的线就可以按着我自定义的坐标系画了,我请问一下这两个语句有什么不同呢,问题出在哪里呢!
谢谢指教!
回复

使用道具 举报

12

主题

46

帖子

3

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
94
发表于 2005-1-10 07:44:00 | 显示全部楼层
VB只能获得或控制世界坐标系的坐标
回复

使用道具 举报

158

主题

2315

帖子

10

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2951
发表于 2005-1-10 12:28:00 | 显示全部楼层
可使用TranslateCoordinates 方法把坐标从UCS转到WCS,再画线。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-16 17:30 , Processed in 2.152647 second(s), 58 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表