Rss & SiteMap

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

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

标题:在datacolchanged中的代码,错在哪里?

1楼
erdbeer 发表于:2010/7/22 1:15:00
If e.DataCol.Name = "客户代码" Then
    Dim Sum As Double
    Sum = DataTables("装柜明细").Compute("Sum(件数)","[客户代码] = '" & e.DataRow("客户代码") & "'" and "[地址] = '" & e.DataRow("地址") & "'")
    e.DataRow("件数") = Sum
End If
2楼
shxiaoya 发表于:2010/7/22 7:16:00
If e.DataCol.Name = "客户代码" Then
    Dim Sum As Double
    Sum = DataTables("装柜明细").Compute("Sum(件数)","[客户代码] = '" & e.DataRow("客户代码") & "' and [地址] = '" & e.DataRow("地址") & "'")
    e.DataRow("件数") = Sum
End If
共2 条记录, 每页显示 10 条, 页签: [1]

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

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