| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于数量统计 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=135529) |
| -- 作者：做自己 -- 发布时间：2019/5/29 5:56:00 -- 关于数量统计 我的表是这样的 见附件图片 腰围
70
72
74
76
78
80
82
84
86
88 数量
0
0
0
0
0
0
0
0
0
0 腰围
90
92
94
96
98
100
102
104
106
108 数量
0
0
0
0
0
0
0
0
0
0 腰围
110
112
114
116
118
120
122
124
126
128 数量
0
0
0
0
0
0
0
0
0
0 腰围
130
132
134
136
138
140
142
144
146
148 数量
0
0
0
0
0
0
0
0
0
0 我想统计属性是数量的所有行所有列的总数，写到另一个表Table的数量列，应该怎么写。 添加不了，复习，我只能拷贝了，拷贝之后格式有所变化，每个腰围是一行，数量是一行，再腰围一行这样 [此贴子已经被作者于2019/5/29 5:59:26编辑过]
|
| -- 作者：有点甜 -- 发布时间：2019/5/29 9:44:00 -- 1、select查找数据
http://www.foxtable.com/webhelp/scr/0400.htm
2、循环每一行、循环每一列，累加结果
http://www.foxtable.com/webhelp/scr/0561.htm
|
| -- 作者：做自己 -- 发布时间：2019/5/30 5:54:00 -- 这个是在属性列的表事件里面添加代码吗？哪个里面加代码速度比较快比较好 Dim ro As Row = Tables("订单明细表").current Dim ro1 As Row = Tables("订单表").current
Dim drs As List(Of DataRow) Dim count As Integer = 0 drs = DataTables("西裤订单明细尺码表").Select("[订单号] = \'"& ro("订单号") &"\'and [项次] = \'"& ro("项次") &"\'and [腰围] = \'数量\'" ) For Each dr As DataRow In drs For i As Integer = 1 To Cols1.Length -1 count = count + dr(Cols1(i)) Next Next ro("数量") = count ro.Save ro1("数量_西裤") = count ro1.Save |
| -- 作者：有点甜 -- 发布时间：2019/5/30 9:42:00 -- 西裤订单明细尺码表datacolchanged事件
Dim ro As DataRow = DataTables("订单明细表").find("[订单号] = \'"& e.datarow("订单号") &"\'and [项次] = \'"& e.datarow("项次") &"\'and [腰围] = \'数量\'") Dim drs As List(Of DataRow) |