- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]取表的复选框的顺序号 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=71078)
-- 发布时间：2015/7/4 15:03:00
-- [求助]取表的复选框的顺序号
表B的ID 取 表A复选框行的 顺序号，比如，表A选了5行，表A增加ID为 1，2，3，4，5
-- 发布时间：2015/7/4 15:04:00
--
请重新描述你的问题。
-- 发布时间：2015/7/4 15:18:00
--
表A复选了5行，表B增加5行，字段 ID为 1，2，3，4，5
-- 发布时间：2015/7/4 15:22:00
--
这样？
For Each r As Row In Tables("表A").Rows
If r.Checked = True Then
Dim r1 As Row = Tables("表B").AddNew
r1("ID") = r.Index+1
End If
Next
-- 发布时间：2015/7/4 15:31:00
--
楼上的不是从1开始的，这样是从当前行的位置开始的
[此贴子已经被作者于2015/7/4 15:31:48编辑过]
-- 发布时间：2015/7/4 15:36:00
--
先删除原来的行不就行了吗：
DataTables("表B").DataRows.Clear()
For Each r As Row In Tables("表A").Rows
If r.Checked = True Then
Dim r1 As Row = Tables("表B").AddNew
r1("ID") = r.Index+1
End If
Next
-- 发布时间：2015/7/4 16:08:00
--
表B的ID不是主键，是可重复的，下次我在表A再选中三行，表B增加三行，ID为 1，2，3，为什么要删除呢，我表A的数据是要保留的，而且还是行号啊
-- 发布时间：2015/7/4 16:18:00
--
你的意思是每次增加行，只需写入顺序号？
是不是这次选择了5行，不管他的行号是多少，只需向表B写入1，2，3，4，5顺序号就行？
-- 发布时间：2015/7/4 16:18:00
--
狐狸爸爸真是蛮拼的，都亲自出来做服务了。
这等小事还是交给手下的几个干将来做吧
有时间早日将新版本放出来才最好
-- 发布时间：2015/7/4 16:19:00
--
你的意思是每次增加行，只需写入顺序号？
是不是这次选择了5行，不管他的行号是多少，只需向表B写入1，2，3，4，5顺序号就行？
是的
[此贴子已经被作者于2015/7/4 16:20:38编辑过]