
关于用VB在CAD中画直线的问题
初学者,现在急用VB在CAD中画图,调用CAD的代码我知道,但是不知道如何写画直线的代码。急求已知两点坐标画直线的代码能说明一下这个是什么意思吗?我已知得点如何赋值给变量...
初学者,现在急用VB在CAD中画图,调用CAD的代码我知道,但是不知道如何写画直线的代码。急求已知两点坐标画直线的代码
能说明一下这个是什么意思吗?
我已知得点如何赋值给变量呢?我急用,暂时还没有教材,所以麻烦您了!谢谢 展开
能说明一下这个是什么意思吗?
我已知得点如何赋值给变量呢?我急用,暂时还没有教材,所以麻烦您了!谢谢 展开
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
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
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |