代码改变世界

VB编程操作AutoCAD导线型尺寸标注

2011-06-19 22:05 by 精诚所至 金石为开, 444 阅读, 0 推荐, 收藏, 编辑
摘要:导线型尺寸标注用来添加旁注、说明文字,创建导线型型标注对象用AddLeader方法,语法格式如下。 RelVal=object.AddLeader(PointsArray,Annotation,Type) 下面的程序创建并显示一个有箭头的导线型标注。 Private Sub Command1_Click() Dim leaderobj As AcadLeader... 阅读全文

VB编程操作AutoCAD坐标型尺寸标注

2011-06-19 21:38 by 精诚所至 金石为开, 548 阅读, 0 推荐, 收藏, 编辑
摘要:坐标型尺寸标注用来标注零部件上某点相对于原点的垂直距离,创建坐标型尺寸标注对象用AddDimOrdinate方法,语法格式如下。 RetVal=object.AddDimOrdinate(DefinitionPoint,LeaderEndPoint,UseXAxis) 下面的代码创建一个坐标型尺寸标注。 Private Sub Command1_Click() ... 阅读全文

VB编程操作AutoCAD角度型尺寸标注

2011-06-18 21:53 by 精诚所至 金石为开, 488 阅读, 0 推荐, 收藏, 编辑
摘要:角度型尺寸标注用来标注两条直线或三个点之间的角度,创建角度型尺寸标注对象AddDimAngular方法,语法格式如下。 RetVal=object.AddDimangular(AngleVertex,FirstEndPoint,SecondEndPoint,TextPoint) 下面的代码创建一个角度型标注对象。 Private Sub Command1_Click() ... 阅读全文

VB编程操作AutoCAD半径和直径型尺寸标注

2011-06-18 21:40 by 精诚所至 金石为开, 930 阅读, 0 推荐, 收藏, 编辑
摘要:半径或直径型尺寸标注用来标注圆或圆弧,半径或直径型标注的类型与圆或圆弧的大小,TextPosition属性有关也与尺寸标注系统变量DIMUPT、DIMTOFL、DIMTIH、DIMTOH、DIMJUST、DIMTAD的值有关,系统变量用GetVariable和SetVariable方法返回。 创建半径型尺寸标注对象用AddDimRadial方法,语法格式如下。 RetVal=object... 阅读全文

VB编程操作AutoCAD长度型尺寸标注

2011-06-18 20:59 by 精诚所至 金石为开, 1202 阅读, 1 推荐, 收藏, 编辑
摘要:长度型尺寸标注包括平行标注与指定角度标注,平行标注的尺寸线平行于尺寸界线起点所在的直线,指定角度标注的尺寸线与尺寸界线起点所在的直线成一定角度。 用AddDimAligned方法创建平行尺寸标注对象,语法格式如下。 RetVal=object.AddDimAligned(ExtLine1Point,ExtLine2Point,TextPosition) 创建指定角度标注对象用AddD... 阅读全文

VB编程操作AutoCAD多行文字

2011-06-18 20:32 by 精诚所至 金石为开, 746 阅读, 0 推荐, 收藏, 编辑
摘要:多行文本常用来显示AutoCAD中的文字说明、注释和技术性要求,多行文字的创建和应用和单行文字类似,用文档对象的AddText方法可以创建多行文字对象,该方法需要三个参数:文字字符串、文本插入点和文本的宽度,语法格式如下。 RetVal=object.AddMText(Insertionpoint,Width,Text) 下面的代码创建一个多行文本。 Private Sub C... 阅读全文

VB编程设置AutoCAD单行文本格式

2011-06-18 19:54 by 精诚所至 金石为开, 1141 阅读, 0 推荐, 收藏, 编辑
摘要:格式化单行文本 文本对象除了具有其它实体对象的公共属性之外,可以用一下属性修改文本对象的显示格式,Alignment设置文本水平或垂直对齐;InsertionPoint设置文本的插入点;ObliqueAngle设置文本的倾斜角度;Rotation设置文本对象的旋转角度;ScaleFactor设置文本的比例系数;TextAlignmentPoint设置文本的对齐点;TextGenerati... 阅读全文

VB编程操作AutoCAD单行文字

2011-06-17 21:57 by 精诚所至 金石为开, 1184 阅读, 0 推荐, 收藏, 编辑
摘要:用文档对象的AddText方法可以创建单行文本对象,结合文本字体设置,可以显示丰富多彩的文字,创建单行文本的语法如下所示。 RetVal=object.AddText(TextString,InsertionPoint,Height) RetVal新创建的单行文本对象,Object模型空间、图纸空间块对象,TextString字符串型,要显示的文本内容,InsertionPoint双精... 阅读全文

VB编程设置AutoCAD文字样式

2011-06-17 21:44 by 精诚所至 金石为开, 2673 阅读, 0 推荐, 收藏, 编辑
摘要:文字在图纸中显示信息,AutoCAD提供了多种输入文本的方法,输入文本既可以采用当前默认的文字样式,也可以自己设置文本样式,TextStyle为文本样式对象,文本样式用来控制文字的字体、字宽、字高、排列方式和倾斜角度,系统默认样式为STANDARD样式。 可以用Add方法创建自己的文本样式对象,下面的语句创建一个名为Styobj的文本样式对象。 Dim styobj1 As AcadTe... 阅读全文

VB编程添加AutoCAD用户坐标系

2011-06-17 21:08 by 精诚所至 金石为开, 795 阅读, 0 推荐, 收藏, 编辑
摘要:用户使用的坐标系一般为世界坐标系,在某些情况下,自定义一个用户坐标系,可使绘图容易,UCS坐标系相对于WCS坐标系可以由平移和旋转,创建UCS语法格式如下。 RetVal=AcadApp.ActiveDocument.UserCoordinateSystems.Add(Origin,xAisPoint,yAxisPoint,Name) 下面的代码在WCS中创建一个长、宽均为4,高为1的... 阅读全文

VB编程操作AutoCAD块对象

2011-06-16 22:46 by 精诚所至 金石为开, 1753 阅读, 0 推荐, 收藏, 编辑
摘要:块对象指Blocks集合对象和Block对象,Blocks对象包含一个图形文档中的所有命名的图块,Block对象则包含构成一个图块的所有实体对象,块对象的创建与引用包含3个步骤:用块对象的Add方法创建一个命名块,向块对象添加实体,用InsertBlock方法将该块插入到任何地方,即引用块。 下面的代码创建一个块对象,并向块中添加一个圆,然后在不同位置插入该块对象。 Private Su... 阅读全文

VB编程操作AutoCAD线宽

2011-06-15 22:23 by 精诚所至 金石为开, 878 阅读, 0 推荐, 收藏, 编辑
摘要:Lineweight属性控制图形在屏幕上可以显示不同的宽度,线宽的使用包括设置线宽和显示线宽,线宽的设置与显示可以使用户在绘图中减少差错。 设置线宽 Lineweight属性设置线宽,语法格式:object.Lineweight。 Lineweight属性值不能任意设置,而是由内置常数决定,编程输入时将自动显示出来供选择,线宽默认单位为毫米,Lineweight属性默认值为25,即... 阅读全文

VB编程操作AutoCAD线型

2011-06-15 21:31 by 精诚所至 金石为开, 829 阅读, 0 推荐, 收藏, 编辑
摘要:制图标准规定,不同意义的线型需要不同的线型来描述。 使用线型 Linetype为线型对象,是线型集合的成员,通过破折号、点和空格的不同组合,行程不同的线型,每一个图形文件,系统均自动创建了3个线型对象:BYLARER,BYBLOCK和CONTINUOUS。 对象在创建时的线型继承所在的图层的线型,要使用其线型,首先用Linetype对象的Load方法装载线型,然后用Document对... 阅读全文

VB编程控制AutoCAD颜色属性

2011-06-15 21:05 by 精诚所至 金石为开, 825 阅读, 0 推荐, 收藏, 编辑
摘要:颜色属性Color可以设置图层的颜色,也可以设置其它对象的颜色,AutoCAD中不同的颜色用0-256的整数表示,常用的颜色用内置常数来表示,输入程序代码给Color属性赋值时,这些内置的常数会自动显示出来供用户选择。 acByBlock 随块 ... 阅读全文

VB编程操作AtuoCAD图层

2011-06-14 22:02 by 精诚所至 金石为开, 926 阅读, 0 推荐, 收藏, 编辑
摘要:通过设置各图层的不同属性,调用图层的方法,可对不同类的图形对象分组编辑和管理,例如,可以创建一个专门画中心线的图层,将图层颜色属性设置为蓝色,线性定义为中心线,当需要画中心线时,就转到该层即可,而不是每次画中心线时都重新设置线型和颜色。 创建并命名图层 新的图形文件建立时,系统自动创建一个名为”0“的图层,用Add方法可以创建新图层,也可同时给它命名。下面代码创建一个testlayer... 阅读全文
上一页 1 ··· 25 26 27 28 29 30 31 32 33 ··· 51 下一页