如何挤出3dfaceobject
大家好我正在使用AutoCAD后端作为vba,我无法挤出三维面对象,有人能帮我吗
子示例_Add3DFace()
'此示例在模型空间中创建三维面。
Dim faceObj作为Acad3DFace
将点1(0到2)调整为双精度
将点2(0到2)设置为双精度
将点3(0到2)设置为双精度
尺寸点4(0到2)为双精度
'定义面的四个坐标
点1(0)=0#:点1(1)=0#:点1(2)=0#
点2(0)=5#:点2(1)=0#:点2(2)=1#
点3(0)=1#:点3(1)=10#:点3(2)=0#
点4(0)=5#:点4(1)=5#:点4(2)=1#
'在模型空间中创建3DFace对象
设置faceObj=ThisDrawing。模型空间。添加3Dface(点1、点2、点3、点4)
动物园购物中心
末端接头
我想挤出这个面,有可能吗
提前感谢
页:
[1]