A表是主合同,B表是开piao明细互相关联是合同编号,我现在想重算所有开piao明细的进度值For Each dr3 As DataRow In DataTables("开piao明细").DataRows
Dim r As DataRow
r = DataTables("合同主表").Find("[合同编号] = '" & dr3("合同编号") & "'")
Dim a As Integer = r("审定金额")
dr3("进度") = dr3("金额") / a
Next
DataTables("开piao明细").save
我用这些代码怎么只能计算当前一条记录而不是全部开piao明细记录