主题：[求助] 根据计算结果选定相应数值

比如：上差是3.71 下差是3.58     我的固定数值有3.55  3.70  3.85  4  4.15  4.3  4.45  4.6  那么我应该选3.7

上差最大数值，下差是最小数值，也就是3.58~3.71之间，固定数值有3.55  3.70  3.85  4  4.15  4.3  4.45  4.6 ，判断应该选那个数值

还有如何设置窗口文本框为两位小数

此主题相关图片如下：999副本.jpg

我刚刚换了一个上下差数值分别为：4.19和3.95的时候结果输出是4.6  按理应是4.15

不知哪里出写错了

不好意思，我没有把上下差计算公式列出来，计算公式是这样的：

3.34+a+b-d-e-0.15≤δ≤3.34+a+b-d-e,  δ 系列尺寸为：3.55±0.1  3.70±1  3.85±0.1  4±0.1  4.15±0.1  4.3±0.1   4.45±0.1   4.6±0.1   所以上下差之间只有0.15的值，不会有两个值的。

3.34+a+b-d-e-0.15≤δ≤3.34+a+b-d-e

其中3.34和0.15是固定值，不会改变的。

改改，试试：

Dim sq,xq,Avg1,nD1,qs1 As Double
Dim Dbs As Double() ={3.55,3.70,3.85,4 ,4.15,4.3,4.45,4.6}
sq =4.5
xq =4.28
Avg1=(sq+xq)/2  

For Each nD1 In Dbs
    If nD1 < sq And nD1 > Avg1 Then     
        qs1 = nD1
    End If
Next

Output.Show(qs1 )