- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 复选框选中行数据复制到另外一个表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=190095)
-- 发布时间：2024/1/16 15:50:00
-- 复选框选中行数据复制到另外一个表
在一个窗口建立两个表一个表绑定A表，另外一个绑定B表，A表上通过复选框选中行数据复制到B表里面，试了多次没实现
此主题相关图片如下：复选框复制.png
-- 发布时间：2024/1/16 15:54:00
--
参考：http://www.foxtable.com/webhelp/topics/1776.htm、http://www.foxtable.com/webhelp/topics/1533.htm
For Each r As Row In Tables("表A").GetCheckedRows
Dim dr As DataRow = DataTables("表B").AddNew()
dr("批号") = r("批号")
dr("型号") = r("型号")
Next
dr("批号") = r("批号")
dr("型号") = r("型号")
Next
[此贴子已经被作者于2024/1/16 16:39:28编辑过]
-- 发布时间：2024/1/16 16:09:00
--
勾选了复选框点按键还是复制不过去数据
-- 发布时间：2024/1/16 16:17:00
--
如果是副本，应该是Table名称不对：http://www.foxtable.com/webhelp/topics/1906.htm
-- 发布时间：2024/1/16 16:37:00
--
老师上传了测试的，帮忙看看那里出问题了，复制不过去数据，勾选点复制按键只是给右边表添加行数据没进去
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.zip |
-- 发布时间：2024/1/16 16:39:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.zip |
-- 发布时间：2024/1/16 17:33:00
--
只是添加了行，数据没进去
-- 发布时间：2024/1/16 17:36:00
--
我测试没有问题啊
此主题相关图片如下：1.png
-- 发布时间：2024/1/16 17:48:00
--
按键代码是这样，怎么我测试就没有数据过去，只增加了行
For Each r As Row In Tables("窗口2_Table1").GetCheckedRows
Dim dr As DataRow = DataTables("低耗料号").AddNew()
dr("批号") = r("批号")
dr("型号") = r("型号")
Next
-- 发布时间：2024/1/16 19:41:00
--
滚动条拉到后面，或者先把空行删除掉