如题: x1,x2,y1,y2 如果有一个空值,那么分母出来的值就是空值. 如何解决.代码如下:
Dim x1 As String
Dim x2 As String
Dim x7 As String
Dim y1 As String
Dim y2 As String
Dim r1 As DataRow
For Each dc As DataCol In tab.DataTable.DataCols
If dc.Caption.Contains("磷酸") AndAlso dc.Caption.Contains("广东") Then
x1 = dc.Name
ElseIf dc.Caption.Contains("硫酸") AndAlso dc.Caption.Contains("广东") Then
x2 = dc.Name
ElseIf dc.Caption.Contains("磷酸") AndAlso dc.Caption.Contains("上海") Then
y1 = dc.Name
ElseIf dc.Caption.Contains("硫酸") AndAlso dc.Caption.Contains("上海") Then
y2 = dc.Name
ElseIf dc.Caption.Contains("铝材") Then
x7 = dc.Name
End If
Next
'上面是交叉统计后得到的表,下面是手工增加的列.
tab.DataTable.DataCols.Add("工厂_铝比磷硫",Gettype(Double),"" & x7 & "/(" & x1 & "+" & x2 & "+" & y1 & "+" & y2 & ")")
加好友 
发短信
Post By：2020/9/24 14:31:00 [只看该作者]
