田草博客

-随机-|-分布-
-博客论坛-|-﨣﨤﨧﨨-
-网站导航-|-规范下载-
-BelovedFLash欣赏-

用户登陆

站点日历

7 3 2025 - 2 4 8
日	一	二	三	四	五	六
						1
2	3	4	5	6	7	8
9	10	11	12	13	14	15
16	17	18	19	20	21	22
23	24	25	26	27	28

站点统计

日志：2368 篇
评论：1487 篇
引用：0 个
会员：1857 人
访问：37064600 次
建立：2007-01-10

作品列表

◆田草CAD工具箱(.Net)

更多作品...

友情链接

其他信息

[28] [29] [30] [31] [32] [33] [34] [35] [36] [37] ... [38]

显示模式:

默认视图 |

文章列表

将自动选筋程序搬倒了AutoCAD中了 [ 2009-04-16 | 本站原创 ]

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：0 | 引用：0 | 查看：12299

AutoCAD VBA 制作平法梁表 [ 2009-04-10 | 本站原创 ]

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：0 | 引用：0 | 查看：12545

平法梁重新编号(插入、删除) [ 2009-04-10 | 本站原创 ]

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：0 | 引用：0 | 查看：15582

AutoCAD 2010 加载田草CAD工具箱 [ 2009-04-09 | 本站原创 ]

一切照常使用，这也许是最后一个支持VBA的CAD版本了。以后要学习VSTA了。
网络上有AutoCAD2010简体中文版下载地址的，全是假的，实际上只是个beta4版本的，没法注册。

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：0 | 引用：0 | 查看：13159

AutoCAD VBA 动态调整线型的比例 [ 2009-04-08 | 本站原创 ]

我们调整线型比例的时候比知道调到什么比例比较合适，使用该程序可以实时预览，调整线型比例到最佳效果。

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：0 | 引用：0 | 查看：12218

AutoCAD VBA 桩自动编号 [ 2009-04-03 | 本站原创 ]

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：4 | 引用：0 | 查看：20120

AutoCAD点排序(x坐标从小到大,y坐标从小到大) [ 2009-04-03 | 本站原创 ]

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：0 | 引用：0 | 查看：28400

AutoCAD 2010 Revealed 发布啦 [ 2009-02-26 | 本站原创 ]

二月初AutoCAD 2010 就发布了，在很多米国人的博客中都可以看到，据说产品供应因国家而异，详情和购买选择将可开始2009年3月24日。

AutoCAD 2010 最大一个变化就是参数化、约束和自由建模。

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：1 | 引用：0 | 查看：33671

AutoCAD 2010 不再安装VBA 而支持VSTA [ 2009-02-24 | 本站原创 ]

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：0 | 引用：0 | 查看：14543

AutoCAD 当前配置文件的注册表路径 [ 2009-02-19 | 本站原创 ]

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：0 | 引用：0 | 查看：36868

VBA 在CAD中使用RGB颜色 [ 2009-02-17 | 本站原创 ]

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：6 | 引用：0 | 查看：14439

根据AutoCAD的版本来确定使用ObjectDBX的版本 [ 2009-02-17 | 本站原创 ]

Private Sub UserForm_Initialize()
    '根据AutoCAD的版本来确定使用ObjectDBX的版本
    If Left(Version, 2) = "15" Then
        Set objDbx = CreateObject("ObjectDBX.AxDbDocument.1")
    ElseIf Left(Version, 2) = "16" Then
        Set objDbx = CreateObject("ObjectDBX.AxDbDocument.16")
    End If
End Sub

阅读全文……

作者：tiancao1001 | 分类：AutoCAD | 评论：6 | 引用：0 | 查看：24091

VBA 调用AutoCAD “选择颜色对话框" [ 2009-02-17 | 本站原创 ]