齿轮论坛 www.gearbbs.net

 找回密码
 注册

手机号码,快捷登录

手机号码,快捷登录

搜索
查看: 3065|回复: 9
收起左侧

多线螺纹、大螺旋角螺纹三针测量M值计算

[复制链接]
发表于 2014-8-15 18:15 | 显示全部楼层 |阅读模式

本帖子中包含更多资源。

您需要 登录 才可以下载或查看,没有账号?注册

x

多线螺纹、大螺旋角螺纹三针测量M值计算.zip (84.44 KB, 下载次数: 58)

截图06.jpg

举例:多头蜗杆三针测量计算.jpg




因文件太大无法全部上传,请到以下网站下载:http://wys366.jimdo.com/
大部分人在计算三针测量M值时都有一个误区,当螺旋角≥3°的多线螺纹和大部分梯形螺纹都不能
用普通的三针测量M值公式计算,应用渐近法计算。
以下是VB原代码,我无偿提供给大家使用。
Private Sub Command2_Click()
Dim j, tt, a, b, e, c, cc, x, Y, ccc, u, uu, U1, m, X2, y2 As Single
t = Val(txtt.Text)
n = Val(txtn.Text)
d2 = Val(txtd2.Text)
d0 = Val(txtd0.Text)
r = Val(txtr.Text)
j = 3.1415926
tt = Format(((r / 2) / 180) * j, "0.000000")
a = Format(Cos(tt), "0.000000")
b = Format(Sin(tt), "0.000000")
e = Format(Tan(tt), "0.000000")
u = 0.5 * ((d2 / a) - (t / (2 * b)) + d0 * (1 / e))
x = u * a + (j * d0 * u * b) / (Sqr(4 * j ^ 2 * u ^ 2 + (n * t) ^ 2))
Y = -((n * t * d0) / (2 * Sqr(4 * j ^ 2 * u ^ 2 + (n * t) ^ 2)))
cc = (j / (n * t)) * ((t / 2) - (d2 * e) - ((2 * j * d0 * u * a) / (Sqr((4 * j ^ 2 * u ^ 2) + (n * t) ^ 2))))
c = -(Y / x) - ((2 * j * u * b) / (n * t))
ccc = cc - c
U1 = -((n * t * ccc) / (2 * j * b))
uu = u + U1
X2 = uu * a + (j * d0 * uu * b) / (Sqr(4 * j ^ 2 * uu ^ 2 + (n * t) ^ 2))
y2 = -((n * t * d0) / (2 * Sqr(4 * j ^ 2 * uu ^ 2 + (n * t) ^ 2)))
m = Format(2 * Sqr(X2 ^ 2 + y2 ^ 2) + d0, "0.000")
Text102 = Format(Atn((t * n) / (j * d2)) * 180 / j, "0.000")
txtm.Text = Str(m)
End Sub



补充内容 (2018-12-16 16:19):
作者:王工.QQ(780408398),微信(15952329789),QQ群 238138869 。新版优惠价每套10元,可多机使用但不更新(可以更新的50元).  

补充内容 (2018-12-16 16:19):
《机械工程师软件大全(2019)》上线啦。请加我QQ群 238138869 在本群文件中下载或到
百度云下载https://pan.baidu.com/s/1fUVPBwCgFjQBWXqoqcT3oQ ,打开百度云下载页面,
点击右上方的--下载(36.6M)-框即可下载.
 楼主| 发表于 2023-11-2 16:49 | 显示全部楼层
Image00000.jpg
N6`8](@}@C`W7J~{)25MNIQ.jpg
《机械工程师软件大全(2024)》上线啦.--原创作品欢迎免费下载
注册方法:每套正式版50元,可长期1台电脑使用并免费每年更新一次(另可再免费赠送一套给你家里电脑使用)。
如你需要请在QQ780408398上或微信15952329789上发红包给我,我订做一套最新版通过QQ发给你。
发表于 2016-11-26 15:25 | 显示全部楼层
嗯,可以学习下
发表于 2016-11-27 19:05 | 显示全部楼层
非常感谢,学习学习
发表于 2016-11-28 10:48 | 显示全部楼层
正有所用,学习学习。
发表于 2016-12-29 19:51 | 显示全部楼层
谢谢分享,谢谢!
发表于 2023-7-27 10:38 | 显示全部楼层
学习、学习
发表于 2023-11-3 08:35 | 显示全部楼层
以书上的例子试计算:轴向模数为1,4头阿基米德蜗杆计算跨棒距,要求中径螺旋角为15.4度,
计算界面:


计算界面.png

三维模型及精确测量值

精确三维模型.png

模型和计算书

4-1-20-1.732-15.4.rar (150.21 KB, 下载次数: 0)
阿基米德蜗杆计算测量值记录.rar (626 Bytes, 下载次数: 0)
发表于 2023-11-3 08:38 | 显示全部楼层
要注意的是此类公式在计算时,是以中径的轴向齿厚来保证与螺母配合的,所以在计算中,对配合要求应该有较准确的计算值,才能保证阿基米德蜗杆的螺旋配合可靠并满足使用要求。
发表于 2023-11-3 10:16 | 显示全部楼层
正有所用,学习学习。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|小黑屋|手机版|Archiver|齿轮论坛

GMT+8, 2024-3-29 10:16 , Processed in 0.172860 second(s), 14 queries , MemCache On.

Powered by Discuz! X3.4 Licensed

© 2001-2023 Discuz! Team.

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