Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共2 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:表达式列数据变动事件

1楼
qq51837000 发表于:2024/12/15 21:32:00
已付金额 表达式:Sum(Child(对账付款2).付款金额)
应付余额 表达式:IsNull([应付金额],0) - IsNull([已付金额],0)

DataColChanged 事件代码:

Select Case e.DataCol.Name
    Case "应付余额"
        If e.NewValue <= 0 Then
            Dim D As New Date(2099, 1, 1)
            e.DataRow("最后付款期限") = D
        End If 
 
End Select

老师,请帮看一下:当余额<=0时,最后付款期限怎么没有反应?
2楼
有点蓝 发表于:2024/12/15 21:42:00
原因:http://www.foxtable.com/webhelp/topics/2381.htm

父表DataColChanged 事件代码:
Select Case e.DataCol.Name
    Case "应付额"
        If e.NewValue - e.DataRow("已付金额") <= 0 Then
            Dim D As New Date(2099, 1, 1)
            e.DataRow("最后付款期限") = D
        End If 
End Select

子表DataColChanged 事件代码:
Select Case e.DataCol.Name
    Case "付款金额"
    Dim pr As DataRow = e.DataRow.GetParentRow("父表名称"
    If 
pr IsNot Nothing Then
        DataTables(
"父表名称").DataCols("应付").RaiseDataColChanged(pr)
    End If
End Select
共2 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.