乐筑天下

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

Extents3d.AddExtents的疑惑

[复制链接]

9

主题

29

帖子

1

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
65
发表于 2011-2-23 14:53:00 | 显示全部楼层 |阅读模式
  1. '测试函数
  2.   Public Shared Sub cs()
  3. Dim a As New Extents3d(New Point3d(0, 0, 0), New Point3d(100, 100, 0))
  4. Dim b As New Extents3d(New Point3d(100, 100, 0), New Point3d(200, 200, 0))
  5. a.AddExtents(b)
  6. ' 获取当前活动文档的Editor对象,也就是命令行
  7. Dim ed As Editor = Application.DocumentManager.MdiActiveDocument.Editor
  8. ' 调用Editor对象的WriteMessage方法在命令行上显示文本
  9. ed.WriteMessage(a.ToString)
  10. End Sub

2006下,运行结果为什么会是:((0,0,0),(0,0,0))
回复

使用道具 举报

72

主题

2726

帖子

9

银币

社区元老

Rank: 75Rank: 75Rank: 75

铜币
3014
发表于 2011-3-1 10:00:00 | 显示全部楼层
2006的bug很多的,其他的版本没有发现这样的问题
如果一定要用2006的话,建议自己重写
回复

使用道具 举报

9

主题

29

帖子

1

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
65
发表于 2011-3-1 10:52:00 | 显示全部楼层
回复
多谢飞狐版主,CAD2006莫名的BUG的确让人头大,已更换为CAD2010
运行结果为:((0,0,0),(200,200,0))
回复

使用道具 举报

9

主题

26

帖子

4

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
62
发表于 2011-3-3 16:58:00 | 显示全部楼层
以前遇见过,最后先写2010的程序,再改写为2006的
回复

使用道具 举报

9

主题

29

帖子

1

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
65
发表于 2011-3-4 10:03:00 | 显示全部楼层
回复
目前碰到的除了这个,还有选集过滤器的BUG,都是需要用到的东东,机器跑2010已经到极限,实属无奈之选
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-15 12:54 , Processed in 0.339917 second(s), 62 queries .

© 2020-2025 乐筑天下

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