- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请教数据累加方法 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=119993)
-- 发布时间：2018/6/5 13:35:00
-- 请教数据累加方法
此主题相关图片如下：捕获1.png
Forms("焊接调试检验").panel.FindForm.Activate
Forms("焊接调试检验").Controls("TextBox3").Select()
static flag As Boolean = False
If e.sender.text.length > 3 AndAlso flag Then
If e.sender.text(0) = "0" And e.sender.text(1)="1" Then
e.Form.controls("TextBox2").text = "J18A1"
Tables("生产进度表").Current("焊接") = "1"
e.Form.controls("TextBox2").WriteValue
End If
现要求是当判断产品是"J18A1"的时候，生产进度表的J18A1行和焊接列对应的表格里与原来数据累加1。如何实现？请老师帮忙修改一下红色部分的代码。焊接列的数据类型是正数型。
谢谢！
[此贴子已经被作者于2018/6/5 13:47:17编辑过]
-- 发布时间：2018/6/5 14:39:00
--
Tables("生产进度表").Current("焊接") += 1
应该在datacolchanged事件处理的，参考
http://www.foxtable.com/webhelp/scr/1454.htm
http://www.foxtable.com/webhelp/scr/1472.htm
-- 发布时间：2018/6/5 16:15:00
--
在表格上点击某一行后，执行上述代码可以进行累加。但不能自动选择J18A1的行进行累加。就是说可以选择列，不能选择行进行累加。如何指定行？
看了帮助文件没有看明白。请教老师帮忙解决。
[此贴子已经被作者于2018/6/5 16:15:56编辑过]
-- 发布时间：2018/6/5 16:56:00
--
查找到对应的行，然后累加，看看
http://www.foxtable.com/webhelp/scr/0396.htm
-- 发布时间：2018/6/6 12:28:00
--
修改了代码，还是指定不了行。
Dim dr As DataRow
dr = DataTables("生产进度表").Find("型号 = \'J18A1\'")
dr ("调试") += 1
dr ("焊接") -= 1
[此贴子已经被作者于2018/6/6 12:51:08编辑过]
-- 发布时间：2018/6/6 14:25:00
--
1、报什么错？还是出现什么异常？
2、上传一个具体foxtable项目，说明你要做什么吧。