我可以使用.getpoint为圆锥顶部选择位置吗

时间:2019-01-10 17:24:33

标签: vba autocad

我将此代码用于获取点,而我选择的点是圆锥体的基础,但是我需要使用选定的点作为要绘制的圆锥体的顶部。

conecenter = .GetPoint(, vbCr & "select position for base of cone:")

1 个答案:

答案 0 :(得分:0)

是的,.getpoint方法仅提示用户指定任意点,方法是通过图形方式选择点或在AutoCAD命令行中输入点坐标值。这样,用户可以在当前视口中指定任何点。

要计算圆锥的顶部,您需要将用户提供的点conecenter的z坐标减小圆锥高度的一半,例如:

conecenter(2) = conecenter(2) - coneheight / 2.0

这假设您有一个名为coneheight的变量,它代表圆锥的高度。