| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]求计算合计 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=135205) |
| -- 作者：明天的灵 -- 发布时间：2019/5/20 21:48:00 -- [求助]求计算合计 需要按厂家名称求出在“现金对帐单”中所欠货款的合计，提示以下代码的第四行符号不对。 "现金对账单”表中有不同客户不同日期的欠款金额 Dim dt1 As Table = Tables("厂家名称") Dim jf As Single \'借方,客户货款欠付金额 For Each r1 As Row In dt1.rows jf = Tables("现金对账单").Compute("Sum(借方)","客户名称 = r1("客户名称")") …… Next --------------------------- 错误 --------------------------- 编译错误:应为逗号、“)”或有效的表达式继续符。 错误代码：jf = Tables("现金对账单").Compute("Sum(借方)","客户名称 = r1("订货客户")") --------------------------- 确定 --------------------------- [此贴子已经被作者于2019/5/20 22:01:05编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2019/5/20 22:08:00 -- 看看：http://www.foxtable.com/webhelp/scr/1284.htm jf = Tables("现金对账单").Compute("Sum(借方)","客户名称 = \'" & r1("客户名称") & "\'")
|
| -- 作者：明天的灵 -- 发布时间：2019/5/20 22:58:00 -- 谢谢，好久没用，忘了。 |