- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]数据动态相加 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=141810)
-- 发布时间：2019/10/11 13:10:00
-- [求助]数据动态相加
此主题相关图片如下：qq图片20191011122231.png
For i As Integer = 1 To ftcs \'ftsc 是分条次数
Dim s(i) As Integer
s(i) = e.Form.controls("TextBox_母NG数_" &i).Text \'获取母条的NG数量
Select Case ta \'ta是排数
Case 1 \'单排
e.Form.controls("TextBox_NG数_" &i).Text = s(i) \'分单排，NG数刚好跟母NG数一一对应。
Case 2 \'双排
如果是双排的话，那么情况是这样的：
TextBox_NG数_1.Text = s(1)+s(2);
TextBox_NG数_2.Text = s(3)+s(4)
这个如何用代码实现？
End Select
Next
-- 发布时间：2019/10/11 13:50:00
--
没看懂，使用实际数据说明一下
-- 发布时间：2019/10/11 15:37:00
--
图片1链接: https://pan.baidu.com/s/1S8O9C0vWFge8VvFPMako4Q 提取码: iiww
这个是分单排的，NG数量= 母条的NG数量一一对应，TextBox_NG数_1.Text =10
图片2链接: https://pan.baidu.com/s/1nKCuaXktqaj2tk0Z9XhGHA 提取码: n3dm
这个物料编码就是 整版4排，2个算1排，分2次。 TextBox_NG数_1.Text = 20
-- 发布时间：2019/10/11 15:55:00
--
dim 物料编号 as string = "42"
If 物料编号 = "41" Then
For i As Integer = 1 To ftcs
e.Form.controls("TextBox_NG数_" & i).Text = e.Form.controls("TextBox_母NG数_" & i).Text
Next
Else
Dim idx As Integer = 1
For i As Integer = 1 To ftcs Step 2
e.Form.controls("TextBox_NG数_" & idx).Text = val(e.Form.controls("TextBox_母NG数_" & i).Text) +val( e.Form.controls("TextBox_母NG数_" & i+1).Text)
idx = idx + 1
Next
End If
-- 发布时间：2019/10/11 16:15:00
--
非常感谢，蓝老师。