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

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 2383|回复: 25
打印 上一主题 下一主题

圆周分佈鉆孔-宏

  [复制链接]

1

主题

48

帖子

4

金币

天使

Rank: 2Rank: 2

积分
59
QQ
跳转到指定楼层
楼主
发表于 2018-5-20 17:42:27 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

   经典图书
参考





<div class="blockcode"><div id="code_mgy"><ol>' *************************************************************
' macro recorded on 05/20/18 by scliang
' 功能:圆周分佈鉆孔,本范例因是用除料拉伸,所以鉆孔是平底.
' 操作: 1.在零件先选取要鉆孔之平面.
'   2.执行 "main" .
'
' *************************************************************

Sub Draw_()
With UserForm1
'判定资料没打或是输入错误(起始圆半径限制不能小于等于鉆孔直径)
If .TextBox4.Value
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 转播转播 分享教程|习题|模型|技巧 点赞点赞 拍砖拍砖
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复

使用道具 举报

2

主题

43

帖子

16

金币

天使

Rank: 2Rank: 2

积分
72
QQ
沙发
发表于 2018-6-5 12:51:50 | 只看该作者
谢谢梁兄,还在程式码中註记内容,让初学的我,能轻松的学习!
SolidWorks机械工程师网
提示:建议使用谷歌浏览器浏览本网站!如单击这里下载!否则,可能无法下载附件文件!(支持大多数版本的谷歌浏览器,支持360和QQ浏览器的极速模式,即谷歌内核模式,使用IE和Edge浏览器,浏览个别网页以及下载文件时,会误报“***不安全”,此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载,另外,本网站不含任何不安全的文件,已联系微软公司解决,纯属IE和Edge浏览器误报)
回复 支持 反对

使用道具 举报

3

主题

39

帖子

24

金币

天使

Rank: 2Rank: 2

积分
93
QQ
板凳
发表于 2018-6-18 18:13:46 | 只看该作者

   经典图书
相互学习了
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

43

帖子

30

金币

天使

Rank: 2Rank: 2

积分
104
QQ
地板
发表于 2018-6-30 19:59:18 | 只看该作者
操作: 1.在零件先选取要鉆孔之平面.
   2.执行 "main" .
   3.X座标取正数,若是负数可能会出错.
   4.首圈半径近似于相邻两孔之中心(弧长)距离.

附SWP档参考 Circle distribution-1.rar (36.28 KB, 下载次数: 11)


SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

46

帖子

17

金币

天使

Rank: 2Rank: 2

积分
76
QQ
5#
发表于 2018-7-19 07:44:37 | 只看该作者

   经典案例图书
上楼巨集不要用

用这巨集 Circle distribution_0524.rar (38.33 KB, 下载次数: 113)

swp档
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

3

主题

45

帖子

22

金币

天使

Rank: 2Rank: 2

积分
71
QQ
6#
发表于 2018-7-19 14:50:48 | 只看该作者
如上昇级版

特点:
1. 键入的XY之值 ,正负值(包含0)皆可.
2. 新增打方孔之选择.

注意事项:
1.首圈半径限制不能小于等于鉆孔直径,也不能小于方孔边长的1.5倍(避免破孔或是零厚度).
2.草图上不要用网格,避免取点时被吸附至网点.
Circle distribution_0531.rar (49.48 KB, 下载次数: 209)

SWP档




SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

2

主题

35

帖子

18

金币

天使

Rank: 2Rank: 2

积分
54
QQ
7#
发表于 2018-7-23 03:12:15 | 只看该作者

   经典案例图书
因新项目的补加,主题名 "任意座标平面孔分佈" 可能较适合吧,下载测试成功者,烦请知会测试的sw版本,谢啦!
swp档 Circle distribution_Polygon_Spiral.rar (49.36 KB, 下载次数: 14)



补加三个项目
1. 正方形孔边等距




2. 正六角形孔边等距




3. 圆孔涡旋分佈



SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

43

帖子

26

金币

天使

Rank: 2Rank: 2

积分
98
QQ
8#
发表于 2018-7-25 05:26:16 | 只看该作者
梁兄实在是太强大了......
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

7

主题

39

帖子

36

金币

天使

Rank: 2Rank: 2

积分
139
QQ
9#
发表于 2018-7-27 19:45:14 | 只看该作者
谢猪兄支持!

汗颜呀!对sw-API纯粹硬着头皮写着玩不是很深入,
个人只是当成锻鍊而已,还得请高手指点了.
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

41

帖子

26

金币

天使

Rank: 2Rank: 2

积分
100
QQ
10#
发表于 2018-7-28 13:02:08 | 只看该作者

   经典图书
感谢梁兄的分享
太实用 太厉害了
不过小弟的是2014版本
下载后无法直接运行
摸了一上午才让我试出来问题在哪
如图我不懂怎么写 只是刚好被我试出问题点
若有版友也有无法直接运行的问题
可以试看看这版本



Circle distribution_Polygon_Spiral -2014.rar (49.41 KB, 下载次数: 15)
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

38

帖子

26

金币

天使

Rank: 2Rank: 2

积分
95
QQ
11#
发表于 2018-7-28 13:50:27 | 只看该作者
这个要如何使用?下载后无法开启
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

3

主题

34

帖子

18

金币

天使

Rank: 2Rank: 2

积分
73
QQ
12#
发表于 2018-8-1 12:31:24 | 只看该作者
详述在甚么情况下无法开启,有何错误提示?
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

44

帖子

24

金币

天使

Rank: 2Rank: 2

积分
110
QQ
13#
发表于 2018-8-9 01:45:36 | 只看该作者
谢谢大佬,又让我多学了一招技巧
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

38

帖子

30

金币

天使

Rank: 2Rank: 2

积分
102
QQ
14#
发表于 2018-8-13 21:53:53 | 只看该作者
谢谢梁兄,还在程式码中註记内容,让初学的我,能轻松的学习!
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

9

主题

47

帖子

45

金币

天使

Rank: 2Rank: 2

积分
148
QQ
15#
发表于 2018-8-14 11:04:44 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

相互学习了
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

39

帖子

27

金币

天使

Rank: 2Rank: 2

积分
86
QQ
16#
发表于 2018-8-16 12:12:51 | 只看该作者

   经典案例图书
操作: 1.在零件先选取要鉆孔之平面.
   2.执行 "main" .
   3.X座标取正数,若是负数可能会出错.
   4.首圈半径近似于相邻两孔之中心(弧长)距离.

附SWP档参考 Circle distribution-1.rar (36.28 KB, 下载次数: 11)


SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

5

主题

49

帖子

29

金币

天使

Rank: 2Rank: 2

积分
114
QQ
17#
发表于 2018-8-18 14:26:52 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

上楼巨集不要用

用这巨集 Circle distribution_0524.rar (38.33 KB, 下载次数: 202)

swp档
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

7

主题

46

帖子

38

金币

天使

Rank: 2Rank: 2

积分
139
QQ
18#
发表于 2018-8-18 15:54:44 | 只看该作者

   经典案例图书
如上昇级版

特点:
1. 键入的XY之值 ,正负值(包含0)皆可.
2. 新增打方孔之选择.

注意事项:
1.首圈半径限制不能小于等于鉆孔直径,也不能小于方孔边长的1.5倍(避免破孔或是零厚度).
2.草图上不要用网格,避免取点时被吸附至网点.
Circle distribution_0531.rar (49.48 KB, 下载次数: 137)

SWP档




SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

4

主题

46

帖子

28

金币

天使

Rank: 2Rank: 2

积分
101
QQ
19#
发表于 2018-8-23 23:37:12 | 只看该作者
因新项目的补加,主题名 "任意座标平面孔分佈" 可能较适合吧,下载测试成功者,烦请知会测试的sw版本,谢啦!
swp档 Circle distribution_Polygon_Spiral.rar (49.36 KB, 下载次数: 14)



补加三个项目
1. 正方形孔边等距




2. 正六角形孔边等距




3. 圆孔涡旋分佈



SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

3

主题

46

帖子

41

金币

天使

Rank: 2Rank: 2

积分
113
QQ
20#
发表于 2018-8-26 09:10:35 | 只看该作者
梁兄实在是太强大了......
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

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

本版积分规则

关闭 卷起
关闭 卷起

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

手机版|小黑屋| GMT+8, 2024-9-29 07:20 , Processed in 0.350593 second(s), 24 queries , Memcache On.

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

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

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