- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]关于数据填充的问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=48616)
-- 发布时间：2014/4/2 11:27:00
-- [求助]关于数据填充的问题
例子中有两个表，第一个表是“笔试成绩”，第二个表是“加权计算”。现在是想在“加权计算”的“数据填充”中写一段代码，要求是：1、如果“笔试成绩”表的“是否加权”为对号时，在“加权计算”中生成不重复的“天数、分组、加权分组、面试室”，同时在“加权计算”的“是否加权”也显示对号。怎么写，我用数据填充改了一段代码，但生成的是全部数据，“是否加权”不管是true还是false,全部填充过来了，怎么 改代码，谢谢。代码如下：
Dim f As New Filler
f.SourceTable = DataTables("笔试成绩") \'指定数据来源
f.SourceCols = "天数,分组,加权分组,面试室" \'指定数据来源列
f.DataTable = DataTables("加权计算") \'指定数据接收表
f.DataCols = "天数,分组,加权分组,面试室" \'指定数据接收列
f.Fill() \'填充数据
例子如下：
-- 发布时间：2014/4/2 11:30:00
--
Dim f As New Filler
f.SourceTable = DataTables("笔试成绩") \'指定数据来源
f.SourceCols = "天数,分组,加权分组,面试室,是否加权" \'指定数据来源列
f.DataTable = DataTables("加权计算") \'指定数据接收表
f.DataCols = "天数,分组,加权分组,面试室,是否加权" \'指定数据接收列
f.Filter = "是否加权 = true"
f.ExcludeExistValue = True
f.Fill() \'填充数据
[此贴子已经被作者于2014-4-2 11:37:29编辑过]
-- 发布时间：2014/4/2 11:35:00
--
.
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目5.foxdb |
-- 发布时间：2014/4/2 11:38:00
--
谢谢，管用，