以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 公式转换问题? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=6373) |
|||||
-- 作者:jjyou -- 发布时间:2010/3/25 14:02:00 -- 公式转换问题? 这个公式怎么转换?
|
|||||
-- 作者:yangming -- 发布时间:2010/3/25 15:02:00 -- 你这段公式的结果是放在何处的?或是哪列? |
|||||
-- 作者:jjyou -- 发布时间:2010/3/25 15:39:00 -- 结果放在[Q混]列 |
|||||
-- 作者:yangming -- 发布时间:2010/3/25 16:14:00 -- 表事件: DataColChanged 中 如果此列没有刷新,将光标放在负压等公式中用到的相关列中,点重置列就能刷新if e.DataRow("地点") ="新八" Or e.DataRow("地点") ="新九" Then e.DataRow("Q混")=e.DataRow("Q混") Else If e.DataRow("地点") ="新一" e.DataRow("Q混")= Math.Round(Math.Sqrt((760-(e.DataRow("负压")/0.133)) * e.DataRow("压差")/(273 + e.DataRow("温度"))) * 0.621 * e.DataRow("孔板系数") * e.DataRow("浓度校正系数"),2) Else If e.DataRow("地点") ="新二" e.DataRow("Q混")=Math.Round(Math.Sqrt((760-(e.DataRow("负压"))) * e.DataRow("压差")/(273+ e.DataRow("温度"))) * 0.621 * e.DataRow("孔板系数") * e.DataRow("浓度校正系数"),2) Else e.DataRow("Q混")=Math.Round(Math.Sqrt((760+(- e.DataRow("标高")\\12)- e.DataRow("负压")) *e.DataRow("压差")/(273+e.DataRow("温度"))) * 0.621 * e.DataRow("孔板系数") * e.DataRow("浓度校正系数"),2) End If |
|||||
-- 作者:jjyou -- 发布时间:2010/3/25 17:03:00 -- 谢谢yangming,问题已解决 |
|||||
-- 作者:czy -- 发布时间:2010/3/26 1:20:00 -- 新八、新九应该不用判断的。 另外需要判断触动列,否则这样的效率太低了。 |