- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 窗口中的textbox控件如何统计绑定表中的数据?（完美解决） (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=29263)
-- 发布时间：2013/3/3 17:34:00
-- 窗口中的textbox控件如何统计绑定表中的数据?（完美解决）
如下图的窗口中，textbox控件通过什么代码来统计绑定表中的金额数据？
此主题相关图片如下：回款.jpg
-- 发布时间：2013/3/3 18:30:00
--
e.Table.Filter = ""
e.Table.Sort = "到账时间 Desc"
Dim sum As Double
For i As Integer = 0 To e.Table.Rows.Count - 1
If e.Table.Rows(i)("到账时间").Year = e.Table.Rows(0)("到账时间").Year Then
sum = sum + e.Table.Rows(i)("回款金额")
Else
Exit For
End If
Next
e.Form.Controls("bnhk").Value = sum
Dim sum1 As Double
For i1 As Integer = 0 To e.Table.Rows.Count - 1
If e.Table.Rows(i1)("到账时间").Year = e.Table.Rows(0)("到账时间").Year And e.Table.Rows(i1)("到账时间").Month = e.Table.Rows(0)("到账时间").Month Then
sum1 = sum1 + e.Table.Rows(i1)("回款金额")
Else
Exit For
End If
Next
e.Form.Controls("byhk").Value = sum1
Dim sum2 As Double
For i2 As Integer = 0 To e.Table.Rows.Count - 1
If e.Table.Rows(i2)("到账时间").Year = e.Table.Rows(0)("到账时间").Year And e.Table.Rows(i2)("到账时间").Month = e.Table.Rows(0)("到账时间").Month And e.Table.Rows(i2)("到账时间").Day = e.Table.Rows(0)("到账时间").Day Then
sum2 = sum2 + e.Table.Rows(i2)("回款金额")
Else
Exit For
End If
Next
e.Form.Controls("brhk").Value = sum2
-- 发布时间：2013/3/3 18:31:00
--
如下图的窗口中，textbox控件通过什么代码来统计绑定表中的金额数据？
此主题相关图片如下：回款.jpg
本周回款有点啰嗦，先省了。
-- 发布时间：2013/3/3 21:15:00
-- 回复：（lsy）以下是引用zerov在2013-3-3 17:34:00的发...
太感谢大师了，我先弄弄。
-- 发布时间：2013/3/3 21:25:00
-- 回复：（lsy）e.Table.Filter = ""e.Table.Sort = "到...
再麻烦请教大师，上面这段代码是加在窗口的哪个事件中？还是加在绑定副表的哪个事件中或是？？？
此主题相关图片如下：qq截图20130303212511.jpg
-- 发布时间：2013/3/4 7:42:00
--
这样的写法是窗口表事件.
-- 发布时间：2013/3/4 9:10:00
--
你也可以先生成一个统计表，然后动态绑定：
http://www.foxtable.com/help/topics/1860.htm
-- 发布时间：2013/3/5 13:46:00
-- 回复：（blackzhu）这样的写法是窗口表事件.
在窗口表的load加入您的代码，还是提示上面的错误。
-- 发布时间：2013/3/9 19:12:00
-- 回复：（blackzhu）这样的写法是窗口表事件.
已经解决，把窗口加载的表替换e就行了。谢谢大侠。
-- 发布时间：2013/3/9 22:42:00
--
用Compute不是更简单吗？？