我想在表"粤通卡充值记录"点击充值次序 相应的显示借款明细.(所以我用充值次序与借款次序关联)
在借款表 表事件DataColChanged 中写
Dim r As Row = Tables("借款").CurrentDim dt As DataTable = DataTables("借款")Dim dt1 As DataTable = DataTables("粤通卡充值记录")
r("借款余额")=dt.sqlCompute("(借款金额)","[借款次序] = '" & r("借款次序") & "'")- dt1.Compute("sum(充值金额)","[充值次序] = '" & r("借款次序") & "'")
但是在父表中更改某一次充值次序的金额后或者增加已有次序的充值金额,关联表的借款余额必须手动删除后才会取得新值.