| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 数据填充器，如何处理table复选框 勾选的行？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169469) |
| -- 作者：304376480 -- 发布时间：2021/6/17 18:30:00 -- 数据填充器，如何处理table复选框 勾选的行？ 老师您好！ 数据填充器，如何处理table复选框 勾选的行？ Dim f As New Filler f.SourceTable = DataTables("经营记录") \'指定数据来源 f.SourceCols = "单据编号,日期,客户ID,客户名称,手机微信,地址,件数,摘要" \'指定数据来源列 f.DataTable = DataTables("发货标签") \'指定数据接收表 f.DataCols = "单据编号,日期,客户ID,客户名称,手机微信,地址,件数,备注" \'指定数据接收列 f.Filter = "" ’这里如何筛选复选框勾选的行 f.Append = False f.Fill() \'填充数据 |
| -- 作者：有点蓝 -- 发布时间：2021/6/17 19:44:00 -- Dim lst As new List(of Integer) For Each r As Row In Tables("经营记录").GetCheckedRows lst.Add(r("_Identify")) Next f.Filter = "_Identify in (" & string.join(",",lst.toarray) & ")"
|