AUTOCAD VBA的宏 ，求助高手

龙九禅师

首先感谢韦编三绝 的积极帮忙  但也许是本人描述问题还不够清晰  韦编三绝 帮忙弄的程序还存在略微错误
命令提示行提示输入的参数应该是如下：
  u; N# W2 S, K8 U+ ~1 锯片圆心坐标
2 B4 n# \) i) r5 z; }" ]. D2 锯片前角 （单位为度）
& k! q/ f* o$ F3锯片后角（单位为度）
1 Y1 |0 @+ }) c% S" D( C; i4 锯片齿数
- \2 m9 O& f, g: E; V4 o2 c. B5锯片半径
/ _, {& b  V2 W4 d  \, }) p恳请韦编三绝 再帮忙处理下  若有用到第一段斜直线方程及第二段圆弧方程和圆心坐标方程以及第三段圆弧方程和圆心坐标方程可回复索取！  感谢~！！！！

20120804

拿去，再休来聒噪。
; B' ^6 U+ ~& I- q

龙九禅师

已基本修正完整，但下载后用此程序画出图形与单张所绘图形存在差异（相同参数设置下程序绘制的图形不能与单张绘制图形实现完全重合）标注后发现两图数值亦不一致。。。。。只能言其只有形似 且不达神似。 （初步判断是程序内设置的数值精度问题引起） 恳望韦编三绝 做最后一次修正！感谢！·！

龙九禅师

建议其计算精度取小数点后6位试试，若还存在同样问题 只能是说几段弧的圆心坐标存在问题了

龙九禅师

附： 在输入必要的参数后在所绘制的图形下方也显示出所输入的参数。感谢！

20120804

能把话说明白点不？能贴个图不？

龙九禅师

经过反复验证  原来是自己错了 ！ 惭愧！
4 D' d8 T" ]/ f' n0 f# |' V韦编三绝所运用的各个坐标点及圆和直线方程等均毫无错误~！！！ 程序代码更是无一错误，由衷地佩服并感激！
最后恳请韦编三绝做最后润色   也即附加一项功能（在输入各个参数后在所绘制的图形下方也显示出所输入的参数（便于区分之用））

20120804

20120804

  K; G( S! C; c, E+ j- b/ A

5 N- n3 C+ T% ~, `& g

9 K$ F; |3 z: Z8 Y5 \+ C, @
* j" q1 C, \) w) p

shudapeng

看来俺的cad还是很烂的惭愧惭愧{:soso_e164:}，还要学学再学学。