CAD VBA编程程序输入角度画直线，怎么写

使用 GroupEdit - 选择要添加线条的组 - 接受---添加对象---拾取您刚刚绘制的线条。 该行将放置在已创建的组中。

1.先在某条线上画一条有角度的直线，输入l，按DAO键，绘图区起始版本就完成了。

绘制点。 2.此时输入@300<60并按回车键，其中300是线长，60是角度，然后画一条水平直线，因为两条线可以形成一个角度，并且可以标记角度。

3.标记绘制的线条和角度是否正确，正确的可以通过注释查看。

4.我们也可以先画一条直线段，然后画一条垂直于这条直线段的300长线段，我们可以看到下图是一个90度角，这一步先完成。

5.在命令栏中输入旋转命令“ro”，选择垂直线段并指定旋转点并输入-30，因为我们画一条90度的垂直线，要将其旋转到60度，我们需要将其缩小30度，这就是我们输入的-30的意思。

方法一：用水平线画一条45°30分秒的BAI线du。

第一点是用直线命令行，起点是任意点 dao。 其次，在命令行中输入@300<45d30'"

方法二：画一个角度，等于55°32分45秒。

1.画一条任意线作为角的一侧。

2. 再画一条与刚才的线重合的线，但稍长一些（方便下一步） 3.使用旋转命令旋转，点击刚才的重合线，根据命令行上的提示选择基点（即刚才两条重合线的起点），在命令行中输入旋转角度。例如：52d45'47".。

1.打开CAD，选择“线”，然后单击“右键单击”。

2.选择“第一个点”并输入线长度 500。

3.按“Tab 键”并输入“60”选择角度。

xl 来构造线，或使用 @ length “angle。

问是不是这么简单，咱们先买一本书，先看一下基础知识。

方法如下：

1. 在工具栏中选择“线”工具。

2. 单击工作区中创建直线段的第一个点，然后按空格键进行确认。

3.在命令行中按照格式“@长度”角度“输入直线段的长度和角度。 例如，制作长度为 100 度、角度为 60 度的直线段。 输入@100<60，按空格键确认。 （如图）。

备注：当格式中的角度为负时，线的旋转角度为顺时针方向。

4. 继续确认空间以完成此命令。

打开动态输入... 输入长度并按下标签跳到角度。

您可以参考以下步骤。

public sub helloworld（） 打开一个新图形。

dim inspoint(0 to 2) as double '声明插入点。

dim textheight as double '声明文本的高度。

dim textstr as string '声明字符串。

dim textobj as acadtext '声明文本对象。

inspoint(0) = 10 '设置插入点的 x 坐标。

inspoint(1) = 10 '设置插入点的 y 坐标。

inspoint(2) = 0 '设置插入点的 z 坐标。

textheight = 10 '将文本高度设置为 10textstr ="hello world" '设置字符串。

创建文本对象。

设置 textobj = ， inspoint， textheight）。

end sub

画一条线，再画b，一条线你的大小多标点符号，ab两个都选好了，角度大小，一条线不能动，b随着移动，标准尺寸参考标准约束，2010版有这个功能，之前没有我忘记了，标记后再删除约束。

使用命令 （co） 复制斜线，然后让它旋转您想要的角度，然后将旋转的线移动到所需位置。

先画一条平行于x轴的直线，旋转线，再画一条线，多么愚蠢的方法。

首先选择一条线，旋转 - 复制 - 输入角度。

方法如下：

1：右键点击状态栏中的“极轴”，在跟踪位置输入对应的角度，确保极轴是凹的，即打开，画直线时，每次转动设定角度的倍数，都会有一条虚线，直接输入线的长度， 并按回车键确认。

2：点击该行的第一个端点后，输入@l3：点击该行的第一个端点，输入< a Enter a 是直线和水平线之间的夹角，然后直线只能以这个角度移动，只需点击鼠标或输入长度即可。

将直线A改为X轴方向：在命令行上输入UCS，对象ob，点A线的左端（根据个人习惯），现在A是0度线，然后命令行L，点上的一个点，输入<，指示器方向现在有限，随意在点处获取直线B，以恢复原始坐标，只需命令行UCS，W

1.首先，直接选择左上角的线选项，如下图所示。

2.接下来，您可以在工作区中画一条直线，如下图所示，但是想要一条具有确定值的直线并不容易。

3.然后我们可以输入l命令进入直线命令模式，如下图所示。

4.然后可以直接在输入框中输入直线的长度值，如下图所示。

5.输入值后记得空格，如下图所示。

6.最后使用直线命令获取直线的长度，如下图所示。

1.您可以点击工具栏中的直线命令按钮，也可以点击绘图，下拉菜单中有一条直线，或者直接输入l enter，l是直线命令的快捷键。

2.直线是有长度的，如果直线的长度是50，并且没有指定角度，则单击直线命令，单击绘图区域中的一个点，然后移动鼠标并输入50 Enter，得到一条长度为50的直线。 如果要画一条水平线或一条垂直线，可以按 F8 键切换，如果一开始只能画一条垂直线和一条水平线，那就按 F8 键切换回去画一条对角线。

F8 键是正交模式的开/关键。

3.线的角度是通过输入角度值来确定的。

点击直线命令，然后在绘图区点击一点移动鼠标，这时输入<30回车，打字时注意下方输入字段，防止输入符号不输入。 这时，移动鼠标，发现直线和水平线成30度角，如果不需要直线的长度，可以点击鼠标确定直线的长度，如果长度为50，则输入50回车，得到一条长度为50，与水平线成30度的直线。

您需要输入平面的 xy 坐标，例如，起点 0,0 和终点 0,100 按回车键以显示水平线 100。

键入 @100，然后键入 <30，看看它是否被绘制。

您可以输入角度。 步骤如下：1画一条直线（L）; 2.指定起点; 3.输入 @ length “角度;

点击第一个点的位置后，输入@符号长度“角度”。

文本命令如下：1000 是长度，30 是角度。

命令：lline 指定第一个点：

指定下一个点或 [丢弃 （u）]：1000<30