SolidWorks机械工程师网——最大的SolidWorks学习平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

楼主: raindots
打印 上一主题 下一主题

AUTOCAD VBA的宏 ,求助高手

[复制链接]

5

主题

46

帖子

33

金币

天使

Rank: 2Rank: 2

积分
104
QQ
21#
发表于 2012-7-2 20:25:01 | 只看该作者

   经典图书
不会的小白路过帮顶
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复 支持 反对

使用道具 举报

2

主题

32

帖子

18

金币

天使

Rank: 2Rank: 2

积分
77
QQ
22#
发表于 2012-7-4 11:09:14 | 只看该作者
不会的小白路过帮顶
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复 支持 反对

使用道具 举报

2

主题

41

帖子

13

金币

天使

Rank: 2Rank: 2

积分
63
QQ
23#
发表于 2012-7-12 08:13:33 | 只看该作者

   经典图书
锯片lisp程序。
在cad里面输入 appload 加载此文件,再输入 dejp,看提示一步步执行。
推荐测试参数:
中心点:随便点
直径:100
齿数:20
前角:0.3
后角;0.3
然后手动画圆弧3,看提示,注意切点位置,点不好就画不出来。
然后看提示,手动选择圆弧2顶部一点,再手动选择圆弧3底部一点以打断。
自动阵列,完成。
丢了几年,再拣起来挺费力,没精力给您做成自动档的了,凑合用吧,半自动也挺快的。
另外您给的数据,槽底半径和槽深度重复了,我只以槽底半径为准,忽略深度。



jp.rar (598 Bytes, 下载次数: 110)
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

43

帖子

22

金币

天使

Rank: 2Rank: 2

积分
97
QQ
24#
发表于 2012-7-14 20:07:32 | 只看该作者
论坛里的高手还真不少!cad我刚入门
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

7

主题

44

帖子

36

金币

天使

Rank: 2Rank: 2

积分
130
QQ
25#
发表于 2012-7-18 14:11:41 | 只看该作者

   经典案例图书
论坛里的高手还真不少!cad我刚入门
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

41

帖子

29

金币

天使

Rank: 2Rank: 2

积分
117
QQ
26#
发表于 2012-7-20 15:59:20 | 只看该作者
拿去,再休来聒噪。


jp(20120526).rar (1.66 KB, 下载次数: 80)
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

50

帖子

33

金币

天使

Rank: 2Rank: 2

积分
115
QQ
27#
发表于 2012-7-21 12:25:09 | 只看该作者

   经典案例图书
已基本修正完整,但下载后用此程序画出图形与单张所绘图形存在差异(相同参数设置下程序绘制的图形不能与单张绘制图形实现完全重合)标注后发现两图数值亦不一致。。。。。只能言其只有形似 且不达神似。 (初步判断是程序内设置的数值精度问题引起) 恳望韦编三绝 做最后一次修正!感谢!·!
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

6

主题

57

帖子

43

金币

天使

Rank: 2Rank: 2

积分
143
QQ
28#
发表于 2012-7-24 21:33:17 | 只看该作者
建议其计算精度取小数点后6位试试,若还存在同样问题 只能是说几段弧的圆心坐标存在问题了
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

49

帖子

13

金币

天使

Rank: 2Rank: 2

积分
73
QQ
29#
发表于 2012-7-31 15:10:00 | 只看该作者
这么简单的东西,建议楼主用lisp即可搞定,无需用vba。
但我已多年不碰,早忘记光了。
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

1

主题

32

帖子

8

金币

混混

Rank: 1

积分
33
QQ
30#
发表于 2012-8-1 07:25:22 | 只看该作者

   经典图书
这么简单的东西,建议楼主用lisp即可搞定,无需用vba。
但我已多年不碰,早忘记光了。
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

51

帖子

28

金币

天使

Rank: 2Rank: 2

积分
81
QQ
31#
发表于 2012-8-2 11:10:33 | 只看该作者
会用A utoCAD的话'这些应该不难
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

46

帖子

30

金币

天使

Rank: 2Rank: 2

积分
112
QQ
32#
发表于 2012-8-5 23:49:35 | 只看该作者
会用A utoCAD的话'这些应该不难
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

3

主题

35

帖子

21

金币

天使

Rank: 2Rank: 2

积分
63
QQ
33#
发表于 2012-8-6 16:48:54 | 只看该作者
我曾经有那么一种想研究VBA和lisp的冲动
一想,输入几个数字,图形就出来了,多好
可是后来又一想
我需要自动出图的图形不多,标准件直接由画图软件生产的
真到学有所成能自动画图的时候,要花多少时间?能省多少时间?
来回一算,得了,在编程的门槛上往里一瞥,扭头走了
想来,当时能钻研个入门,也许也是不错的,因为,没钻研,时间也就这么过来了
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

45

帖子

12

金币

天使

Rank: 2Rank: 2

积分
79
QQ
34#
发表于 2012-8-11 10:19:00 | 只看该作者
我曾经有那么一种想研究VBA和lisp的冲动
一想,输入几个数字,图形就出来了,多好
可是后来又一想
我需要自动出图的图形不多,标准件直接由画图软件生产的
真到学有所成能自动画图的时候,要花多少时间?能省多少时间?
来回一算,得了,在编程的门槛上往里一瞥,扭头走了
想来,当时能钻研个入门,也许也是不错的,因为,没钻研,时间也就这么过来了
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

46

帖子

13

金币

天使

Rank: 2Rank: 2

积分
75
QQ
35#
发表于 2012-8-11 14:16:15 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

扯淡完我班门弄斧一下,说一下我的笨办法
1.在EXCEL里填好公式,把各个数据的关系搞好。这样,每次画之前,把已知数据一输入,绘图尺寸自动生成
2,照1中的数据画一个齿(这个大家都会吧)。。。
3,阵列一下(这个大家也都会吧)。。。。。

呵呵,就是这个笨办法啊
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

38

帖子

12

金币

天使

Rank: 2Rank: 2

积分
75
QQ
36#
发表于 2012-8-13 03:06:15 | 只看该作者

   经典案例图书
扯淡完我班门弄斧一下,说一下我的笨办法
1.在EXCEL里填好公式,把各个数据的关系搞好。这样,每次画之前,把已知数据一输入,绘图尺寸自动生成
2,照1中的数据画一个齿(这个大家都会吧)。。。
3,阵列一下(这个大家也都会吧)。。。。。

呵呵,就是这个笨办法啊
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

7

主题

43

帖子

44

金币

天使

Rank: 2Rank: 2

积分
117
QQ
37#
发表于 2012-8-13 07:25:28 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

愧疚愧疚~!!!记得当年毕业设计做的就是《VB程序开发齿轮滚刀参数化绘制工具》。。。。时光流逝转眼而立之年一路走来都是在边拣边弃 学习了解了新的知识同时也忘却了一些最基本理论知识。。。。就好比CAD一般我们最早要自己画图框,画螺栓 画螺母再到后来出现了块再到后来出现了那么多标准化插件。。。现如今 作为工程技术人员 在不去翻书情况下又有几个还能用图板,三角板,圆规去画出个椭圆来。。。还几个记得空间投影几何。。。。。 无奈啊~!!!
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

43

帖子

35

金币

天使

Rank: 2Rank: 2

积分
111
QQ
38#
发表于 2012-8-16 02:47:36 | 只看该作者

   经典案例图书
能把话说明白点不?能贴个图不?
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

38

帖子

10

金币

天使

Rank: 2Rank: 2

积分
59
QQ
39#
发表于 2012-8-24 17:21:59 | 只看该作者
经过反复验证原来是自己错了 ! 惭愧!
韦编三绝所运用的各个坐标点及圆和直线方程等均毫无错误~!!! 程序代码更是无一错误,由衷地佩服并感激!
最后恳请韦编三绝做最后润色 也即附加一项功能(在输入各个参数后在所绘制的图形下方也显示出所输入的参数(便于区分之用))
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

6

主题

51

帖子

35

金币

天使

Rank: 2Rank: 2

积分
122
QQ
40#
发表于 2012-8-26 10:31:12 | 只看该作者
Autolisp编程资料.rar (753.76 KB, 下载次数: 181)

jp(20120527)源码.rar (1.37 KB, 下载次数: 78)
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

SOLIDWORKS 2023 机械设计从入门到精通

手机版|小黑屋| GMT+8, 2025-8-10 07:49 , Processed in 0.647057 second(s), 22 queries , Memcache On.

SolidWorks机械工程师网 ( 鲁ICP备14025122号-2 ) 鲁公网安备 37028502190335号

声明:本网言论纯属发表者个人意见,与本网立场无关。
如涉版权,可发邮件: admin@swbbsc.com

快速回复 返回顶部 返回列表