Foxtable(狐表)用户栏目专家坐堂 → 跨表计算


  共有3190人关注过本帖树形打印复制链接

主题:跨表计算

帅哥哟,离线,有人找我吗?
lsy
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/5/7 7:51:00 [显示全部帖子]

是不是表A相当于主表,表B相当于子表?


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/5/7 7:57:00 [显示全部帖子]

If e.DataCol.Name = "调走" AndAlso e.DataRow.IsNull(e.DataCol) = False AndAlso e.DataRow.IsNull("条码号") = False AndAlso e.DataRow.IsNull("款号") = False Then
    Dim dr As DataRow = DataTables("表A").Find("条码号 = '" & e.DataRow("条码号") & "' And 款号 = '" & e.DataRow("款号") & "'")
    If dr IsNot Nothing Then
        dr("件数") = dr.OriginalValue("件数") - e.NewValue
    End If
End If

 回到顶部