涉及到上一行 用表达式无法解决.只能用代码实现了. 在DataCloChanged事件中添加代码if e.datacol.name="借方" orelse e.datacol.name="贷方" then
if e.datarow("借方") isnot nothing andalso e.datarow("贷方") isnot nothing then
dim ye as Integer
For i As Integer=0 To DataTables("会计报表").DataRows.Count-1
If DataTables("会计报表").DataRows(i).Equals(e.DataRow) Then
ye = DataTables("会计报表").DataRows(i-1)("余额")
End If
Next
e.datarow("余额")=ye+e.datarow("借方")-e.datarow("贷方")
end if
end if
加好友 
发短信
Post By：2013/4/22 9:23:00 [显示全部帖子]
