Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
For i As Integer = Tables("表A").count-1 To 0 Step -1
Dim r As Row = Tables("表A").Rows(i)
If i = Tables("表A").count-1
r("累计成本") = r("系数") * r("单价")
Else
If r("加工级别") <> Tables("表A").Rows(i+1)("加工级别")
r("累计成本") = DataTables("表A").Compute("Sum(累计成本)", "加工级别 =" & _
Tables("表A").Rows(i+1)("加工级别") & " ") + r("单价")
Else
r("累计成本") = r("系数") * r("单价")
End If
End If
Next
什么意思啊?
r("累计成本") = DataTables("表A").Compute("Sum(累计成本)", "加工级别 =" & _
Tables("表A").Rows(i+1)("加工级别") & " ") + r("单价") 这些不太懂 _是什么?
帮助有说明,动态合成表达式,不止一个地方解释了
r("累计成本") = DataTables("表A").Compute("Sum(累计成本)", "加工级别 =" & _
Tables("表A").Rows(i+1)("加工级别") & " ") + r("单价") 这些不太懂 _是什么?
这里的“_”符号是做为上一行和下一行代码的连接,如果一行代码太长,可以采用此方法将代码分成n行,利于阅读。