以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关联表  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=128388)

--  作者:lfz123
--  发布时间:2018/12/5 9:57:00
--  关联表
请教老师:申请单和进项发票建立关联,我在子表进项发票的DataColChanged事件中写了如下代码:

Select Case e.DataCol.name

    Case "申请单号"

        Dim dr As DataRow = e.DataRow

            Dim pr As DataRow = dr.GetParentRow("申请单")

            If pr IsNot Nothing Then

                Dim v As Double = e.DataTable.Compute("sum(发票金额)","申请单号 = \'"& pr("申请单号") & "\'")

                pr("备注") = "增票" & dr("发票号码") & "#" & dr("发票抬头") & "金额:" & v


            End If

End Select


增加进项发票输入发票金额时,出现如下错误提示,删除行时也会,输入完成后切换申请单的上下行却能出现正确结果


图片点击可在新窗口打开查看此主题相关图片如下:运行错误.png
图片点击可在新窗口打开查看

而且列“发票金额”本来就不属于表 申请单 非常疑惑


[此贴子已经被作者于2018/12/5 10:01:16编辑过]

--  作者:有点甜
--  发布时间:2018/12/5 10:03:00
--  

报错是 datarowdeleted 事件的代码,请贴出那个事件的代码。