- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 识别后引入数据 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103846)
-- 发布时间：2017/7/18 14:58:00
-- 识别后引入数据
图1
此主题相关图片如下：11.png
图2
此主题相关图片如下：112.png
此主题相关图片如下：112.png识别：图1中，列名 8/1 的意思是8月1日，8/2的意思是8月2日，以此类推，现在是8月，以后要设置成动态修改列标题，会成为9月，10月、、、、，
要在“期初可干台数”列引入图2中相对用的数字，
不会写代码，麻烦老师帮帮忙，谢谢！
-- 发布时间：2017/7/18 15:27:00
--
直接查找表数据。再根据你的年、月，获取对应列的数据。
Dim fdr As DataRow = DataTables("").Find("部品id=\'abc\'")
-- 发布时间：2017/7/19 9:23:00
--
老师，在图1中，我想将在“实时在库台数”设置代码引出，
具体的意思是：实时在库台数=期初可干台数+所有”*_入库“之和 -所有”*_不良“之和
我写的代码有错误，请老师帮改改，谢谢！
If e.DataCol.Name = "部品ID" Then \'如果内容发生变动的是品名列
If e.NewValue Is Nothing Then \'如果新值是空白,也就是品名列的内容为空
e.DataRow("实时在库台数") = Nothing \'那么清空此行单价列的内容
else
e.DataRow("实时在库台数") = e.DataRow("期初可干台数") + DataTables("组装入库明细").Compute("Sum(*_入库)")- DataTables("组装入库明细").Compute("Sum(*_不良)")
End If
End If
-- 发布时间：2017/7/19 9:50:00
--
1、需要一个个列进行统计
e.DataRow("实时在库台数") = e.DataRow("期初可干台数") + DataTables("组装入库明细").Compute("Sum(8/1_入库)")- DataTables("组装入库明细").Compute("Sum(8/1_不良)") + DataTables("组装入库明细").Compute("Sum(8/2_入库)")- DataTables("组装入库明细").Compute("Sum(8/2_不良)"
2、增加2个汇总列，通过代码实时汇总当前行入库和不良的数据，然后通过汇总列进行计算
-- 发布时间：2017/7/19 14:33:00
--
老师，有关1.是以月为单位，有31列，有没有简单的方法？
2.增加2个汇总列，一个名“入库汇总”，一个名“不良汇总”，请问老师，如何写代码？
-- 发布时间：2017/7/19 15:49:00
--
1、你可以写成循环，循环31列即可。
2、具体例子上传测试。