主题：[求助]这些功能如何实现？

1、“客户资料”表中“合计积分”是相应客户“储蓄积分”+“理财积分”，这个功能怎么实现？

2、“理财积分”表中的“积分系数”是“产品代码”在“理财产品积分系数”里的“积分系数”，比如，产品“PA13024701”的系数是0.1644

      产品“PA13031901”的系数是0.1315.这个功能是如何实现的？

   谢谢 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:积分礼品.table

首先，感谢以上老师的指点。学习体会如下：

1、因为可能有重名的，所以在跨表引用时加上证件号码的判读是否正确，请斧正。

   If e.DataCol.Name = "姓名" Then
    Dim cszf As Double = DataTables("储蓄积分").Compute("sum(储蓄积分)", "客户名称 = '" & e.DataRow("姓名") & "' and 证件号码 = '" & e.DataRow("身份证号码") & "'")
    Dim lczf As Double = DataTables("理财积分").Compute("sum(理财积分)", "客户名称 = '" & e.DataRow("姓名") & "' and 证件号码 = '" & e.DataRow("身份证号码") & "'")
    e.DataRow("合计积分") = cszf + lczf
End If

2、“客户资料”表“兑换积分”列是数值列，空值返回数字0，感觉能自动计算“剩余积分”，但是只有当给“兑换积分”填入0时才可以得到剩余积分，如何当剩余积分是空值，也能自动计算剩余积分？

  谢谢

学习掌握了，现在问题是：

1、在“积分兑换明细表”中的“礼品名称”是下拉菜单，内容是“积分礼品”表中的“礼品名称”内容，当选定具体礼品时，对应的“积分礼品”表中的积分自动传递到“积分兑换明细”中的积分。

2、当“积分兑换明细”表中填入数量时，自动减“积分礼品”表中的库存数量。

以上功能如何实现呢？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目0509.table