- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求教老师计算问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=95107)
-- 发布时间：2017/1/10 14:51:00
-- 求教老师计算问题
如下传实例中，我要将0.4447显示在“高锰酸盐指数LN”的下面， 2.0L对应在氨氮下，显示1.0,
我有两个公式，但是不知道如何揉和在一起，请教老师帮忙
第一个0.447是由以下公式代码得出：
If e.DataCol.Name.Contains("L") Then
e.DataRow(e.DataCol.name.Replace("L", "")) = Math.Log(e.NewValue, Math.E)
End If
2.0L对应的1.0是由以下公式得出：
If e.DataCol.Name.Contains("L") Then
If e.newvalue > "" AndAlso e.NewValue.Contains("L") Then
e.DataRow(e.DataCol.name.Replace("L", "")) = val(e.NewValue) / 2
Else
e.DataRow(e.DataCol.name.Replace("L", "")) = e.NewValue
End If
End If
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:测试系统.table |
此主题相关图片如下：test.jpg
-- 发布时间：2017/1/10 15:01:00
--
If e.DataCol.Name.EndsWith("L") Then
If e.newvalue > "" Then
Dim cname As String = e.DataCol.name.Replace("L", "")
If e.DataTable.DataCols.Contains(cname) Then
e.DataRow(cname) = val(e.NewValue) / 2
End If
cname = e.DataCol.name.Replace("L", "LN")
If e.DataTable.DataCols.Contains(cname) Then
e.DataRow(cname) = Math.Log(val(e.NewValue), Math.E)
End If
End If
End If
-- 发布时间：2017/1/10 15:04:00
--
谢谢老师