- A+
所属分类:CAD
aCADdoc.save
else
msgbox “该文件已经存在!” '提示该文件已经存在
end if
Document对象还提供了两个非常有用的方法—SetVariable 和 GetVariable,通过它们可以得到(用GetVariable)或改变(用SetVariable )AutoCAD的系统变量。
如语句:
aCADdoc.SetVariable "Orthomode", 1 '打开正交模式
dim CADver As String
CADver=aCADdoc.Getvariable("ACADver") '获取AutoCAD的版本号
(2) 对图形实体的操作
图形实体是指所有CAD的图元物体,如点(point)、线(Line)、圆(Circle)、弧(Arc)、文字(Text)等,它们包含于ModelSpace和PaperSpace集合对象中。对实体的操作总要从这两个集合开始,向下查找相应实体所属的方法或属性。而图形实体的操作包括实体的生成、编辑和查询。 ModelSpace与PaperSpace是所有图形实体的集合,因此要取得图中的某一实体,一般采用遍历查找的方法,下面代码是CAD图形实体的生成、编辑实体或查询。
生成一条直线的代码:
Dim lineobj As Object
Dim pt1(0 To 2) As Double
Dim pt2(0 to 2) as double
历史上的今天:
- 2024: 微软Excel/WPS表格 免费插件 浅北表格助手 v3.0 20231224 开源
- 2024: 如何使用axure母版?
- 2024: cad多重从属对象问题如何处理?
- 2024: ps渐变工具在哪及如何应用?
- 2024: PS怎么锁定图层?