| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助] 数据填充问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=49260) |
| -- 作者：wumingrong1 -- 发布时间：2014/4/15 10:54:00 -- [求助] 数据填充问题 Dim f As New Filler f.SourceTable = DataTables("A") \' 数据来源表. f.SourceCols = "第一列,第二列" \' 数据来源列,不同的列用逗号分割. 这个条件 Tables("用料").Filter = "[计算用料] <> 0" 加在哪 f.DataTable = DataTables("B")\' 数据接收表. f.DataCols = "第一列,第二列" \' 数据接收列,不同的列用逗号分割. f.fill() 我使用以上命令将A表中的第一列和第二列自动填充到B表的第一列和第二列。但是我希望当A表已经做了筛选时、填充到B表中的数据是A表筛选后所显示的内容而不是整个A表的内容。该增加什么命令？
|
| -- 作者：Bin -- 发布时间：2014/4/15 11:00:00 -- f.Filter = "[计算用料] <> 0" |
| -- 作者：wumingrong1 -- 发布时间：2014/4/15 11:17:00 -- 不对吧？是不是没理解意思？ |
| -- 作者：有点甜 -- 发布时间：2014/4/15 11:22:00 -- 灵活变通
Dim f As New Filler
f.SourceTable = DataTables("A") \' 数据来源表.
f.SourceCols = "第一列,第二列" \' 数据来源列,不同的列用逗号分割. ‘这个条件 Tables("用料").Filter = "[计算用料] <> 0" 加在哪
f.Filter = Tables("A").Filter
f.DataTable = DataTables("B")\' 数据接收表.
f.DataCols = "第一列,第二列" \' 数据接收列,不同的列用逗号分割.
f.fill()
[此贴子已经被作者于2014-4-15 11:22:41编辑过]
|