Foxtable(狐表)用户栏目专家坐堂 → 窗口中的textbox控件如何统计绑定表中的数据?(完美解决)


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

主题:窗口中的textbox控件如何统计绑定表中的数据?(完美解决)

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By: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:54编辑过]

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/3/3 18:31:00 [显示全部帖子]

以下是引用zerov在2013-3-3 17:34:00的发言:
如下图的窗口中,textbox控件通过什么代码来统计绑定表中的金额数据


图片点击可在新窗口打开查看此主题相关图片如下:回款.jpg
图片点击可在新窗口打开查看


PS:时间节点为用户打开此表的时间日期点。

[此贴子已经被作者于2013-3-3 17:35:06编辑过]

本周回款有点啰嗦,先省了。


 回到顶部