- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]合计代码帮我看下3Q (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=62489)
-- 发布时间：2015/1/2 23:09:00
-- [求助]合计代码帮我看下3Q
Dim dt As DataTable
Dim a,b,c As Integer
dt= DataTables("结账")
For b=0 To 17
a=Val(dt.datarows(b)("金额_转入"))
c=c+a
Next b
dt.datarows(18)("金额_转入")=a
图片上传了 大神帮我看下 哪里出问题了
我想自动 求和 金额转入列的第 1 行金额 至 第18行
但是求和的时候 数字为0 哪里出错啦
此主题相关图片如下：7777.png
此主题相关图片如下：7777.png[此贴子已经被作者于2015-1-2 23:11:26编辑过]
-- 发布时间：2015/1/4 12:47:00
--
不要这样做
http://www.foxtable.com/help/topics/00143.htm