《利用AutoCAD绘制圆柱面相贯线展开曲线研究(原稿).doc》由会员分享，可免费在线阅读全文，更多与《利用AutoCAD绘制圆柱面相贯线展开曲线研究(原稿)》相关文档资源请在帮帮文库(www.woc88.com)数亿文档库存里搜索。
2、使用AutoCadVBA功能自动获取相贯线展开曲线AutoCAD中内置的VBA工具能够使用户绘制较高精度的图纸,在对图纸精度有着较高要求的场合具有重要作用。下面介绍如何利用VBA工具绘制空间圆柱面相展开曲线研究(原稿)。可以通过计算机软件编制圆柱面相贯线展开程序,快速准确地得到相贯线展开曲线。展开软件得到结果迅速精确,可用于指导加工下料等生产实践,提升工作效率,提高加工质量。附代码SubyanalfaSqrRRrrSinieSinalfarrCosiCosalfa,EndPointZoomAll调整视图MsgBox?相贯线绘制完成。?绘制结束后提示。EndSub。如图所示,OO′是半径为ISteJingDuEndPointirr获取横坐标EndPointSinalfaSqrRRrrSinieSinalfarrCosiCosalfa获取纵坐标Ifi,EndPoint从第个循环点开始利用AutoCAD绘制圆柱面相贯线展开曲线研究(原稿)doc标EndPointSinalfaSqrRRrrSinieSinalfarrCosiCosalfa获取纵坐标Ifi,EndPoint从第个循环点开始绘制小线段。StartPointEndPoint保存faThenMsgBox?角度输入错误,请输入大于小于或等于度的数值?GoToalfaErrorEndIfalfaalfaPI角度值转换成弧度值将相贯线分割成若干段小直线,循环画线DimStar。
3、tPsDoubleDimJingDuAsDouble定义曲线绘制精度JingDuInutBox?请输入曲线精度,?,?初始数据输入?,ForiToPISteJingDuEndPointirr获取横坐距离等数据inutErrorRInutBox?大圆柱面直径?,?初始数据输入?,rrInutBox?小圆柱面直径?,?初始数据输入?,eInutBox?轴线距离?,?初始数据输入?,IfRr的展开方程与计算机绘图技术结合,探索种快速获取高精度相贯线展开曲线的方法。可以通过计算机软件编制圆柱面相贯线展开程序,快速准确地得到相贯线展开曲线。展开软件得到结果迅速精确,可用于指导加工下料等生产reThenMsgBox?R应大于rre！?GoToinutErrorEndIf输入两圆柱面轴线夹角alfaErroralfaInutBox?轴线夹角,?,?初始数据输入?,IfalfaOral使用AutoCadVBA功能自动获取相贯线展开曲线AutoCAD中内置的VBA工具能够使用户绘制较高精度的图纸,在对图纸精度有着较高要求的场合具有重要作用。下面介绍如何利用VBA工具绘制空间圆柱面相的坐标分别为x,y,z和x′,y′,z′,则它们之间的关系为式中θ的含义与式中θ的含义相同。第步回到模型空间,再次按AltF,点击?运行?,根据脚本提示,输入相应数据即可获取相贯线的展开曲线。利用AosiCosalfa,EndPointZoomAll调整视图Msg。
4、farrCosiCosalfa获取纵坐标Ifi,EndPoint从第个循环点开始绘制小线段。StartPointEndPoint保存BA工具能够使用户绘制较高精度的图纸,在对图纸精度有着较高要求的场合具有重要作用。下面介绍如何利用VBA工具绘制空间圆柱面相贯线展开曲线。假设空间中任意点A在坐标系Oxyz和坐标系O′x′y′z′中圆柱面直径?,?初始数据输入?,rrInutBox?小圆柱面直径?,?初始数据输入?,eInutBox?轴线距离?,?初始数据输入?,IfRrreThenMsgBox?R应大于rre！?GoToD中VBA功能绘制高精度的相贯线展开曲线,将相贯线的展开方程与计算机绘图技术结合,探索种快速获取高精度相贯线展开曲线的方法。使用AutoCadVBA功能自动获取相贯线展开曲线AutoCAD中内置的VreThenMsgBox?R应大于rre！?GoToinutErrorEndIf输入两圆柱面轴线夹角alfaErroralfaInutBox?轴线夹角,?,?初始数据输入?,IfalfaOral坐标点横坐标StartPointEndPoint保存坐标点纵坐标Nexti绘制最后个点iPIEndPointirr获取横坐标EndPointSinalfaSqrRRrrSinieSinalfarrCsDoubleDimJingDuAsDouble定义曲线绘制精度JingDuInutBox?请输入曲线精度,?,?初始数据输入?。
相关资源：VIP会员电子书,CSDN-文档类
声明：本站部分文章及图片源自用户投稿，如本站任何资料有侵权请您尽早请联系jinwei@zod.com.cn进行处理,非常感谢！