专家坐堂-统计编码问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  统计编码问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=92612)

--  作者：feixianzhi
--  发布时间：2016/11/8 13:58:00
--  统计编码问题

Select Case e.DataCol.name
Case "人员编码","姓名"
Dim dr As DataRow = e.DataRow
dr("收款合计") = DataTables("底价款收款明细表").Compute("sum(收款金额)",CExp("人员编码=\'{0}\' and 姓名= {1},dr("人员编码"),dr("姓名"))


End Select

麻烦各位老师，我这段代码有什么问题？

--  作者：wyz20130512
--  发布时间：2016/11/8 14:10:00
--

Select Case e.DataCol.name
Case "人员编码","姓名"
Dim dr As DataRow = e.DataRow
dr("收款合计") = DataTables("底价款收款明细表").Compute("sum(收款金额)",CExp("人员编码 = \'{0}\' And 姓名 = \'{1}\'",dr("人员编码"),dr("姓名")))
End Select

另外: DataTables("底价款收款明细表") 最好用 e.DataTable 引用的为好.

[此贴子已经被作者于2016/11/8 14:49:48编辑过]

--  作者：feixianzhi
--  发布时间：2016/11/8 14:18:00
--

此主题相关图片如下：qq截图20161108141435.png

还是不行，出现上面错误提示。

--  作者：有点蓝
--  发布时间：2016/11/8 14:23:00
--
提示很明显了，少个括号
dr("收款合计") = DataTables("底价款收款明细表").Compute("sum(收款金额)",CExp("人员编码 = \'{0}\' And 姓名 = \'{1}\'",dr("人员编码"),dr("姓名")))

--  作者：feixianzhi
--  发布时间：2016/11/8 14:27:00
--
老师加了括号还是不行。

此主题相关图片如下：1.png

--  作者：feixianzhi
--  发布时间：2016/11/8 14:29:00
--
问题解决了，谢谢各位老师。