求在CAD2007中，用VBA语言画圆弧的程序，急急！！

fuyaolhy 发表于 2012-9-10 16:14:18

求教：已知圆心坐标，半径，起点坐标和圆弧角度，怎么画出圆弧？！

woaishuijia 发表于 2012-9-10 20:00:23

你不觉得已知条件太多了吗?

sscylh 发表于 2012-9-10 20:07:51

object.AddArc(Center, Radius, StartAngle, EndAngle)
startangle:可以根据圆心坐标和起点坐标计算出startangle
endangle:可以根据startangle和圆弧角度算出endangle
vba中创建圆弧addarc就这一种....

fuyaolhy 发表于 2012-9-11 06:36:50

sscylh 发表于 2012-9-10 20:07 static/image/common/back.gif
object.AddArc(Center, Radius, StartAngle, EndAngle)
startangle:可以根据圆心坐标和起点坐标计算出star ...

非常感谢，已经会画了

fuyaolhy 发表于 2012-9-11 06:37:44

woaishuijia 发表于 2012-9-10 20:00 static/image/common/back.gif
你不觉得已知条件太多了吗?

你愿意教就教，不爱教就算，我就是在学习呢，你说这没用的干嘛

woaishuijia 发表于 2012-9-13 00:00:21

本帖最后由 woaishuijia 于 2012-9-13 00:01 编辑

fuyaolhy 发表于 2012-9-11 06:37 static/image/common/back.gif
你愿意教就教，不爱教就算，我就是在学习呢，你说这没用的干嘛

废话？
唉，说你什么好呢？
既然你认为这是废话，我就再废几句，把你一楼的条件细化一下：圆心（0,0），起点坐标（100,100），半径5，角度90度。请你画这个圆弧。
如果你认为自己画出来了，就请再检查一下圆弧起点是否符合已知条件？
如果你承认自己画不出来，就请你仔细研究我二楼的废话，希望你能从中悟到点东西。

crazylsp 发表于 2013-1-16 16:24:43

怎样从画出来的找出另一个端点呢？
假设点1坐标已知,可先求点o与点1的斜率k1=(y1-b)/(x1-a)=tan<1,
                                 k2=tan,k2=tan(<1-C),
                                             x2=a+R.cos(<1-C),
                                             y2=b+R.sin(<1-C),
追问
你式子里的x2=a+R.cos(<1-C)该不会是x2=a+R×cos(<1-C)吧，而且cos(<1-C)是什么意思？这如果我要带入数字该怎做啊？
回答
角1是点1与X轴正方向所成的夹角. 以圆心为原点建立直角坐标系.是角1与角C的差的余弦.
不是以圆心为原点建立直角坐标系的.
我仔细看了下,原来直角坐标系是隐含存在的,但角1是点1与圆心O的连线所在的直线与X轴正方向的夹角.
呵呵,是不是很饶口啊

页: [1]

明经CAD社区's Archiver

求在CAD2007中，用VBA语言画圆弧的程序，急急！！