广告合作
  • 今日头条

    今日头条

  • 百度一下

    百度一下,你就知道

  • 新浪网

    新浪网 - 提供新闻线索,重大新闻爆料

  • 搜狐

    搜狐

  • 豆瓣

    豆瓣

  • 百度贴吧

    百度贴吧——全球领先的中文社区

  • 首页 尚未审核订阅工具 订阅

    CAD中如何使用VBA程序自动绘制一个圆

    来源:网络收集  点击:  时间:2025-02-13
    【导读】:
    有些朋友可能在CAD绘图工作中经常需要做一些重复性的工作,也想到了能不能通过程序自动来做这些工作呢?可是又不知道怎么实现,在这里我就以使用程序绘制一个圆来举例说明如何使用VBA程序来自动绘制工具/原料moreautoCAD 2007方法/步骤1/6分步阅读

    打开CAD 2007,按快捷键alt+F11

    2/6

    在菜单栏选择插入,然后选择模块

    3/6

    在模块中输入以下代码

    Sub 自动画圆()Dim p1(0 To 2) As Double 定义一个圆心点p1(0) = 100: p1(1) = 100: p1(2) = 0 圆心的坐标值为100,100r = InputBox(请输入圆的半径)ThisDrawing.ModelSpace.AddCircle p1, rEnd Sub

    4/6

    运行代码,点击工具栏中的小三角

    5/6

    输入圆的半径

    6/6

    结果

    注意事项

    sub后面的名称可以自己定义

    本文关键词:

    版权声明:

    1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。

    2、本站仅提供信息发布平台,不承担相关法律责任。

    3、若侵犯您的版权或隐私,请联系本站管理员删除。

    4、文章链接:http://www.1haoku.cn/art_1238802.html

    相关资讯

    ©2019-2020 http://www.1haoku.cn/ 国ICP备20009186号05-06 03:58:06  耗时:0.028
    0.028s