钢铁工业中用于测量温度数据采集器中，如何将采集进来的电流值（4-20mA）转变成可以在屏幕上显示的温度值？听说这个过程叫标定，不清楚该如何编，有没会的发个简单点的程序。

Private Sub a2ks_Click()
A2qd = Val(Text4.Text)'输入起点实际值
A2qddy = Val(Label4(1).Caption)'起点物理值
End Sub
Private Sub a2js_Click()
X1 = Val(Text5.Text) - A2qd'终点实际值
X2 = Val(Label4(1).Caption) - A2qddy'输入终点值时的物理值
k(1) = Format(X1 / X2, "0.0000")
b(1) = Format(A2qd - A2qddy * k(1), "0.0000")
SaveSetting "sjcj", "zhuji", "2#b", Str(b(1))'我的程序是写注册表保存标定值
SaveSetting "sjcj", "zhuji", "2#k", Str(k(1))
End Sub
然后取当前物理值乘以K再加B得出实际温度
如果你的模块不支持电流输入,可能你需要在你的模块上并连一个电阻得到电压值
具体可以和我联系QQ101934221

先谢了，我研究研究

www.samsuncn.com