QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

查看: 2274|回复: 3
收起左侧

[求助] 滚齿机计算软件

[复制链接]
发表于 2008-5-7 21:46:22 | 显示全部楼层 |阅读模式 来自: 中国重庆

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

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

x
听说滚齿机计算差动机构可以用程序
! ^) |& N+ l! t1 o       请指教
 楼主| 发表于 2008-5-7 21:50:24 | 显示全部楼层 来自: 中国重庆

滚齿机计算软件

急急!!!!!!!!!!!
发表于 2008-5-7 22:54:22 | 显示全部楼层 来自: 中国江苏苏州
论坛里有很多,要学会搜索:
6 p% }1 |0 |8 \; ?8 \我发个VB编写的挂轮计算程序5 r9 Y; n2 `$ S" h. y8 s( d: P
http://www.3dportal.cn/discuz/viewthread.php?tid=175196
, G7 _+ h9 i  J. `滚齿机挂轮计算器(正式可Crack版)
! Z2 }* l6 S; K3 thttp://www.3dportal.cn/discuz/viewthread.php?tid=175442# o$ }% x2 c( }; f8 _( u# e. P
现在还不能下载,等附件恢复后就可下载了
发表于 2008-5-8 19:55:27 | 显示全部楼层 来自: 中国江苏南京
这个太简单了,用VB做四重循环就可以了。程序如下:% f/ T' N4 @. F/ k# e( q5 s+ }
dim a as long ,b as long ,c as long,d as long 1 n5 i5 e- x$ Z# `
for a=20 to 100
5 L" V$ u% k- b+ i  U   for b=2o to 100
+ L) [* o& q- v8 I     for c=20 to 100 9 N, }/ x( F2 o  z7 u- W0 m- o
       for d=2o to 100
% e1 M" H' L: P5 ?        if  abs((a*b)/(c*d)-传动比)<自己设定的精度值, q* Y) ]6 X5 i/ J5 ]/ P  f: G1 \
   then prin a,b,c,d
" l) A7 W; g: A3 Rnext d3 T1 c1 z6 O3 w- p1 L
next c
9 B- c+ |* s4 K$ d$ k- }. @4 tnext b
; k( s& [5 I& l/ s+ y6 q' `next a0 m5 o. f2 A3 z$ L
不过这种算法太慢,你可以自己根据机床的实际情况,将a,b,c,d的组合优化一下,运算速度就很快了。* ~- R. L+ z% [: R" }9 g
具体的优化方法就不写了~

评分

参与人数 1三维币 +5 收起 理由
hero2006 + 5 应助

查看全部评分

发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

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