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

发布网友发布时间：2024-10-02 01:33

共1个回答

热心网友时间：2024-12-06 05:11

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

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com