Foxtable(狐表)用户栏目专家坐堂 → 无法正确显示


  共有1733人关注过本帖树形打印复制链接

主题:无法正确显示

帅哥哟,离线,有人找我吗?
13861676007
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:186 积分:1733 威望:0 精华:0 注册:2016/4/12 9:05:00
无法正确显示  发帖心情 Post By:2018/5/16 23:23:00 [只看该作者]

请教老师
pkmbm 是公共代码 = “1002”
Dim ssa As Double = Tables("凭证记录表").Compute("sum(借方金额)", "科目代码 Like '" & pkmbm & "'")
执行上述代码: SSA 显示是 1000 的数据
pkmbm = "'%" & pkmbm & "%'"
Dim ssa As Double = Tables("凭证记录表").Compute("sum(借方金额)", "科目代码 Like '" & pkmbm & "'")
加上pkmbm = "'%" & pkmbm & "%'" 后数据显示为0 为什么 ,我的目的是科目代码中含有“1002” 字符的全部计算出来,错在哪了?

pkmbm = "'%" & pkmbm & "%'"
f.SourceTable = DataTables("凭证记录表") '指定数据来源
f.Filter = "科目代码 like '" & pkmbm & "'"
f.SourceCols = "填制日期,凭证号,摘要,借方金额,贷方金额" '指定数据来源列
f.DataTable = DataTables("分类明细账") '指定数据接收表
f.DataCols = "日期,凭证号,摘要,借方金额,贷方金额" '指定数据接收列
f.Fill()
出现错误码:无法在 System.String 和 System.Int32 上执行“Mod”操作。 请教怎改?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/5/16 23:48:00 [只看该作者]

1、修改代码,单引号不能重复

 

pkmbm = "'%" & pkmbm & "%'"

Dim ssa As Double = Tables("凭证记录表").Compute("sum(借方金额)", "科目代码 Like " & pkmbm & "")
 
2、
 
f.Filter = "科目代码 like '" & pkmbm & "'"
 
改成
 
f.Filter = "科目代码 like " & pkmbm & ""

 回到顶部