摘要：选择集的删除有四种方法。 Clear方法将选择集清空，选择集依然存在，只是把选择集内的成员（各种实体对象）释放掉，但是这些成员在图形中仍然存在，只是不再属于这个选择集。 RemoveItems方法从选择集中移除一个或几个成员，被移除的成员仍然存在于图形中，只是不再属于这个选择集。 Erase方法删除选择集内的所有实体，删除后这个选择集依然存在，原来包含的实体对象被从图形中删除。 Delet... 阅读全文
VB编程在实体选择中使用过滤机制
2011-06-14 19:32 by 精诚所至 金石为开, 513 阅读, 0 推荐, 收藏, 编辑
摘要：过滤机制是指出实体对象的一个或多个特征，如颜色和层等要被检查，不符合条件的被过滤掉，只有符合条件的才能被选取并加入到选择集，过滤机制是一个使用了DXF组码得关联表。 只把圆对象加入选择集的过滤器代码如下。 ssetobj.Delete FilterType = 0 FilterData = "Circle" ssetobj.SelectOnScreen ... 阅读全文
VB编程用选择集选择实体对象
2011-06-14 19:12 by 精诚所至 金石为开, 1048 阅读, 0 推荐, 收藏, 编辑
摘要：一个选择集是一组指定的作为单个单元处理的AutoCAD对象，一个选择集可以由单个对象组成，也可以是更加复杂的组，比如在某一层上某一颜色的对象集，用选择集选择实体分为两步：创建选择集，将对象添加到选择集。 创建选择集 用Add方法创建选择 集，下面的语句创建一个名为TEST的新选择集。 Dim ssetobj As AcadSelectionSet Set ssetobj... 阅读全文
土鳖网站是怎样炼成的
2011-06-13 22:51 by 精诚所至 金石为开, 635 阅读, 0 推荐, 收藏, 编辑
摘要：土鳖网站处处有，中文网站特别多。一个中文网站土鳖不难，难的是所有中文网站一起土鳖。土鳖不可怕，就怕土鳖没变化；土鳖不可怕，就怕土鳖泛滥化。 19世纪俄国著名互联网观察家列夫·托尔斯泰说：“不土的网站各不相同，但土鳖的网站都是相似的。” 流氓无耻的行径 土鳖耍流氓，防不胜防。说到令人深恶痛绝的网站流氓行径，弹窗首当其冲。有弹窗的都不是好产品，QQ、旺旺弹出每日焦点，新浪首页弹出大幅F... 阅读全文
VB编程引用AutoCAD实体对象
2011-06-12 22:34 by 精诚所至 金石为开, 1004 阅读, 0 推荐, 收藏, 编辑
摘要：在使用实体对象属性或方法来编辑已经创建完毕的实体对象之前，必须用变量引用该对象，引用实体对象的方法有多种，可根据具体情况，选择恰当的方法来加以引用。 在创建实体的同时引用实体对象。 在创建实体对象时，Set语句设置的对象变量代表和引用该实体对象，下面的语句创建了一个圆对象，变量circleObj即引用该圆对象，可以设置属性，调用该方法来编辑该圆对象。语句circleObj=acRed设置Col... 阅读全文
VB编程编辑AutoCAD轻量多义线
2011-06-12 21:57 by 精诚所至 金石为开, 897 阅读, 0 推荐, 收藏, 编辑
摘要：创建一条轻量多义线并将第二段修改为圆弧。 Private Sub Command1_Click() Dim plineobj As AcadLWPolyline Dim points(0 To 9) As Double points(0) = 1: points(1) = 1 points(2) = 1: points(... 阅读全文
VB编程编辑AutoCAD样条曲线
2011-06-12 21:40 by 精诚所至 金石为开, 745 阅读, 0 推荐, 收藏, 编辑
摘要：编辑样条曲线的方法很多，可以通过对其进行拟合进行增加、移动和删除，提高拟合点的权重等操作，可以设置样条曲线的公差，可以提高样条曲线的等级总新定义样条曲线。 一下代码创建一条样条曲线，并改变公差，测试效果。 Private Sub Command1_Click() acadapp.ActiveDocument.SetVariable "SPLFRAME", 0 ... 阅读全文
VB编程改变AutoCAD圆对象的圆形坐标和半径
2011-06-12 21:04 by 精诚所至 金石为开, 760 阅读, 0 推荐, 收藏, 编辑
摘要：通过设置圆和圆弧实体的Center、Radius属性，可以改变其圆心坐标和半径值，通过返回其属性值，可以获取其圆心坐标和半径值。 下面的代码将模型空间的所有圆向上移动100的单位，并将半径减为原来的一半。 Private Sub Command1_Click() Dim i As Integer Dim currcenterpt As Variant ... 阅读全文
VB编程删除AutoCAD实体对象
2011-06-12 20:25 by 精诚所至 金石为开, 773 阅读, 0 推荐, 收藏, 编辑
摘要：实体对象的Erase方法可以删除选择区域内的所有对象。 object.Erase 实体对象的Delete方法可以删除当前对象，但是该方法不能删除模型空间集合、图层集合等。 object.Delete 阅读全文
VB编程对AutoCAD实体对象进行移动和旋转操作
2011-06-12 20:18 by 精诚所至 金石为开, 906 阅读, 0 推荐, 收藏, 编辑
摘要：实体对象的Move方法可将对象沿某一向量移动。 object.Move point1,point2 object所要移动的实体对象，point1、point2双精度型移动对象的起点与终点三维坐标点。 实体对象的Rotate方法可绕一个基点旋转实体对象。 object.Rotate BasePoint,RctationAngle object所要旋转的图形对象，BasePo... 阅读全文
VB编程对AutoCAD实体进行复制操作
2011-06-12 20:06 by 精诚所至 金石为开, 723 阅读, 0 推荐, 收藏, 编辑
摘要：复制实体对象根据不同的需要，可以采用不同的方法。 利用Copy方法实现实体的复制，实体对象的Copy方法对实体进行原地复制并返回复制生成的新对象。 newobj=object.Copy newobj表示新创建的实体对象，object要进行复制操作的实体对象。 利用Offset方法实现实体的复制，实体对象的OffSet方法创建一个新的实体对象，并与源对象又一个偏移。 newo... 阅读全文
AutoCAD实体对象可供VB操作的公共属性和方法
2011-06-12 16:52 by 精诚所至 金石为开, 1078 阅读, 0 推荐, 收藏, 编辑
摘要：公共属性就是所有实体都具有的属性，通过VB编程可以设置或查询这些属性，从而改变这些实体的特性，公共属性有以下几种：application、color、layer、linetype、linetypescale、visible、entitytype、entityname、handle、bojectid。application是所有 实体和非实体对象的属性，返回对应用程序的引用。其它属性为实体对象的特征... 阅读全文
VB编程在AutoCAD绘图空间创建实心面和图案填充
2011-06-12 16:16 by 精诚所至 金石为开, 1313 阅读, 0 推荐, 收藏, 编辑
摘要：利用AddSolid方法可以创建实心面，Solid为3或4条变组成的实心面，应用该方法需要4个三维顶点作为参数，当系统变量FILLMODE的值为0时，实心面不填充，为1时填充。语法getval=objcect.AddSolid(point1,point2,point3,point4)。getval新创建的实心面对象，object模型空间、图纸空间或块对象，point双精度型定点坐标。 利用Add... 阅读全文
VB编程在AutoCAD绘图空间创建曲线
2011-06-12 15:13 by 精诚所至 金石为开, 838 阅读, 0 推荐, 收藏, 编辑
摘要：VB可以在AutoCAD绘图空间中创建圆、弧、椭圆和样条曲线等多种曲线对象。 利用AddCircle方法可以创建圆形对象，该方法需要给出圆形的三维坐标和圆的半径。如下代码创建一个圆心为（20,30,0），半径为5的圆。 Private Sub Command1_Click() Dim circleobj As AcadCircle Dim centerp... 阅读全文