社区 › VB › 关于画椭圆函数的第二个参数的问题,还请高手指点一下

errBoy 发表于 2006-6-28 10:13:00

关于画椭圆函数的第二个参数的问题,还请高手指点一下

Dim ellObj As AcadEllipse
    Dim majAxis(0 To 2) As Double
    Dim center(0 To 2) As Double
    Dim radRatio As Double
   
    ' 在模型空间中创建椭圆
    center(0) = 5#: center(1) = 5#: center(2) = 0#
    majAxis(0) = 10: majAxis(1) = 20#: majAxis(2) = 0#
    radRatio = 0.3
    Set ellObj = ThisDrawing.ModelSpace.AddEllipse(center, majAxis, radRatio)
以上代码中红色部分majAxis(0) = 10: majAxis(1) = 20#: majAxis(2) = 0#
有些不太明白,ADDELLIPSE的第二个参数为什么要传一下数组进去,是函数要求???
它(majAxis(0) = 10: majAxis(1) = 20#: majAxis(2) = 0#)
这样赋值是用来做什么?
以上真的还请高人指点一下,小弟先谢过了!

n6viking 发表于 2006-6-28 11:27:00

我也是初学者，试着回答一下，不知道对不对
AddEllipse方法创建椭圆对象，需要给定中心点，长轴的一个端点和半径比例三个参数。
按上面程序来看，majAxis数组是用来指定长轴端点的。

雪山飞狐_lzh 发表于 2006-6-28 11:59:00

应该是长轴向量

查看完整版本: 关于画椭圆函数的第二个参数的问题,还请高手指点一下