关于用VB在CAD中画直线的问题

2025-01-08 03:30:23

推荐回答（1个）

回答1：

set doc = acadapp.activedocument
set mspace = doc.modelspace
dim p1(2) as double ,p2(2) as double
p2(1)=10#
mspace.addline p1,p2

点在VBA是用三元素的Double数组表示
p1(0)-X
p1(1)-Y
p1(2)-Z

最新问答

英语翻译，好的有分~~

本人27岁，突发性耳聋快两年了！右耳全聋还一直嗡嗡响！请问能治吗？

为什么我在周生生买的钻戒跟朋友在恒孚买的钻戒一样大，但是她的看上去比我的大多了呢？

视神经萎缩是什么病因？

2013-2014学年度第一学期期中考试（九年级数学试卷）

突发性耳聋9天之后，右耳全聋了，该怎么办

伤残鉴定有时间限制的吗?过多久做重鉴不合适

请问有网友在黑塔利亚LP论坛里面吗

皖智教育安徽第一卷2013-2014学年安徽省八年级月考试卷（六）英语物理

有机化学乙基相对于甲基是优先基团，但是为什么命名时在甲乙基距末端距离相同的情况下甲基编号要小？