以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  compute 错误问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90735)
--  作者：mayazql
--  发布时间：2016/9/20 21:11:00
--  compute 错误问题
现在有2个表（报销单），主表的金额由子表的金额合计出来。代码如下，报错。

发图没成功，放在下面了
[此贴子已经被作者于2016/9/20 21:13:04编辑过]
--  作者：mayazql
--  发布时间：2016/9/20 21:12:00
--  
代码如下：

图片点击可在新窗口打开查看此主题相关图片如下：3.png
图片点击可在新窗口打开查看


[此贴子已经被作者于2016/9/20 21:27:56编辑过]
--  作者：mayazql
--  发布时间：2016/9/20 21:12:00
--  
表如下：

图片点击可在新窗口打开查看此主题相关图片如下：2.png
图片点击可在新窗口打开查看
--  作者：有点蓝
--  发布时间：2016/9/20 21:24:00
--  
方便处理问题，下次麻烦把代码文字贴出来。

tables(XXX).compute ("Sum(金额明细)","其它条件")
--  作者：mayazql
--  发布时间：2016/9/20 21:32:00
--  
If e.DataRow.Isnull("金额明细") Then
   Tables("bxpd").Current("人民币小写") = Nothing
Else
  Tables("bxpd").Current("人民币小写") = Tables("bxpd.bxpdsub").compute("sum("金额明细")","报销单号 = \'" & Tables("bxpd").Current("报销单号") & "\'")
   DataTables("bxpd").Save
End If

代码如上，谢谢
--  作者：有点蓝
--  发布时间：2016/9/20 21:35:00
--  
看4楼，请仔细看。再仔细看2遍帮助
--  作者：mayazql
--  发布时间：2016/9/20 21:50:00
--  
谢谢，多了个 引号，图省事，直接双击添加的字段。
--  作者：blackzhu
--  发布时间：2016/9/21 8:44:00
--  
 
If e.DataRow.Isnull("金额明细") Then
   Tables("bxpd").Current("人民币小写") = Nothing
Else
  Tables("bxpd").Current("人民币小写") = Tables("bxpd.bxpdsub").compute("sum(金额明细)","报销单号 = \'" & Tables("bxpd").Current("报销单号") & "\'")
   DataTables("bxpd").Save
End If