齿厚,公法线长度,跨棒距,变位系数之间的换算2.0(VB版)070331更新(加入内齿，绘图等
<P><FONT size=2>齿厚换算V2.0.0(更新日期2007.03.31)<BR>新增内容：<BR><BR>1内齿轮的齿厚计算。<BR>内齿轮时齿数请输入负值。如齿数32请输入-32。<BR><BR>2节径时的计算。<BR>可直接在法向模数处输入负值。如节径8请输入-8。<BR><BR>3增加绘图功能。<BR>拖动鼠标左键平移图像，拖动鼠标右键缩放图像。黑色的两个圆为分度圆和基圆。蓝色的两个圆为齿顶圆和齿根圆。可以让程序自动设定齿顶圆和齿根圆，也可以手工输入。相信这个功能对于经常测绘的朋友会很有帮助。可以直接将实物和图形进行对比，非常直观。<BR><BR>4增加公差的计算。<BR>1.0版本也可以计算公差，2.0版本加强了此功能。<BR>在2.0版中点击计算按钮后，不仅右边的中间值，最大值，最小值栏输出结果。左边的非输入项也会输出结果。也就是非红色字的部分都是输出项。这样就可以直接得到公差之间的换算。<BR>例1：已知公法线齿厚为72.8801 +0.05 -0.08。想求跨棒距测量方式的基准值（与72.8801对应）及相应公差。输入齿厚及公差后点击计算按钮，可在左边直接看到跨棒距测量方式的基准值和公差，为200.7889 +0.1388 -0.2235。</FONT></P><P><FONT size=2></FONT></P>
<P><FONT size=2><A href="/forums/8f249732-12ff-4538-8a8a-2f8a91da8408/PostAttachment.aspx" target=_blank><IMG src="/forums/8f249732-12ff-4538-8a8a-2f8a91da8408/PostAttachment.aspx" onload="if(this.width>550)this.width=550" border=0></A></FONT></P>
<P><FONT size=2>例2已知量棒直径5.5时跨棒距为200.7889 +0.1 -0.15，想求量棒为6时的跨棒距及其公差。输入齿厚及公差后点击计算按钮，可在左边直接看到跨棒距以外的测量方式的基准值和公差，这时输入新的量棒直径6，再选择齿厚区分为法向变位系数（只要不是跨棒距即可）点击计算按钮，量棒直径为6时的计算结果就显示出来了。</FONT></P>
<P><A href="/forums/5511978e-c128-4b76-81b4-4f6bde44af84/PostAttachment.aspx"></A></P>
<P><FONT size=2></FONT></P>
<P><FONT size=2></FONT></P>
<P><FONT size=2><A href="/forums/be96227d-2c5e-47dd-8e36-842c832b5fff/PostAttachment.aspx" target=_blank><IMG src="/forums/be96227d-2c5e-47dd-8e36-842c832b5fff/PostAttachment.aspx" onload="if(this.width>550)this.width=550" border=0></A></FONT></P>
<P><A href="/forums/5511978e-c128-4b76-81b4-4f6bde44af84/PostAttachment.aspx" target=_blank><FONT size=2><IMG src="/forums/5511978e-c128-4b76-81b4-4f6bde44af84/PostAttachment.aspx" onload="if(this.width>550)this.width=550" border=0></FONT></A><FONT size=2> </FONT></P>
<P><FONT size=2>小技巧：</FONT></P>
<P><FONT size=2>1利用TAB键可以方便的切换到下一个输入框。</FONT></P>
<P><FONT size=2>2直接按ENTER键与点击计算按钮“==>”效果完全一样。</FONT></P>
<P><FONT size=2>注意：</FONT></P>
<P><FONT size=2>1因为增加了绘图部分，可能在一些速度比较慢的电脑上不能流畅运行。我估计CPU1G以上应该没问题吧。下一版我会优化速度。电脑慢的朋友先关掉“绘制图形”功能吧。</FONT></P>
<P><FONT size=2>2右边中间值栏指的是左边齿厚区分选中的齿厚形式（也就是红色字）的中间值所对应的齿厚，而不一定是左边的（最大值+最小值）/2。如本说明文件的第一张图所示，跨棒距中间值200.747131964568是指选中的齿厚形式跨齿距72.8801+（0.05-0.08）/2=72.8651所对应的齿厚。而不等于（200.927793437093+200.565408450337）=200.746600943715。相信大家都知道这一点，安全起见我在这里再罗嗦一下^o^</FONT></P>
<P><FONT size=2>如果您有任何意见和建议以及创意请告诉我（logxing521@hotmail.com）,感谢您的使用。</FONT></P>
<P> </P>
Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算(VB版)
好！！！比我的完善和专业多了。
符号的标准本来就不统一，更别说每个人的使用习惯了。使用者明白就行。
Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算(VB版)
谢谢阿松鼓励，其实我只是加了公差，其他的和你的完全一样。这个齿厚换算所用到的函数将来会作为我其他计算的基础，所以在速度上可能有一定的要求，在涉及量棒测量里要用到反渐开线函数，我用的是二分法要计算40次才能达到2^-40左右的精度，乘上区间pi，计算40次的精度是10^-12左右，你用的是你以前说过的德国的跌代方法吗？那个效率可能要比二分法高一倍以上。没学过数值计算，我一般都只用二分法，可总觉得将来会影响效率，牛顿法应该比二分法好但我没用过（记得是要求导数），你近似计算时一般用什么方法呢？
Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算(VB版)
数值计算我也没学过，那是研究生课程。我没学那么多。我用了德国的方法。平时近似计算就用学校里学的求导数的那种。
Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算(VB版)
非常感谢Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算2.0(VB版)070331更新(加入内齿，绘
升级了，大家来看看吧。。 。Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算2.0(VB版)070331更新(加入内齿，绘
真是不简单啊！辛苦了，睡个好觉Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算2.0(VB版)070331更新(加入内齿，绘
打不开。类未注册。
需要在机器中安装下列文件。 MSSTDFMT.DLL.
Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算2.0(VB版)070331更新(加入内齿，绘
<P>原帖由 mkzeng 发表打不开。 <BR>类未注册。 <BR>需要在机器中安装下列文件。 MSSTDFMT.DLL. <BR> </P>
<P>可能是因为98或你的电脑文件丢失了.你下载我的附件试试看.</P>
<P>1.将MSSTDFMT.DLL复制到C:\WINdows\system32下(视你的系统而定)<BR>2.点击开始-运行，输入regsvr32.exe C:\WINdows\system32\Msstdfmt.dll<BR>3.ok</P>
Re: 齿厚,公法线长度,跨棒距,变位系数之间的换算2.0(VB版)070331更新(加入内齿，绘
阿松,欢迎多提意见阿。最近忙什么哪？