Foxtable(狐表)用户栏目专家坐堂 → [求助]关于全局变量与数据填充


  共有21167人关注过本帖树形打印复制链接

主题:[求助]关于全局变量与数据填充

帅哥哟,离线,有人找我吗?
狐狸爸爸
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251060 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/2/2 10:24:00 [只看该作者]

仔细想想,你说的问题其实不存在,没有必要复制员工表所有列内容到工资表,通常只需姓名或者工号列即可。
可以在员工表和工资表之间建立父子关联,这样你只需复制关联列(例如工号)到工资表,其它姓名、部门之类的,可以通过表达式来显示。

如果你想复制上月数据到本月,那是肯定可以的,用DataTable的Select方法获得上月所有的行,然后逐行复制即可。

大概就是:

Dim dt As DataTable = DataTables("工资表").
Dim drs As List(Of DataRow) = dt.Select("筛选上月的判断条件")
For Each dr1 As DataRow in drs
    Dim dr1 As DataRow = dt.AddNew()
    For each dc As DataCol in dt.DataCols
         dr2(dc.name) = dr1(dc.name)
    Next
    dr1("年月") = Date.Today.Year & "-" & Date.Today.Month
Next


其实万变不离其宗,熟练了,代码比起易表的And And,要更简单一些。
[此贴子已经被作者于2009-2-2 10:25:27编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
舜风
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 小学文化
等级:小狐 帖子:374 积分:2318 威望:0 精华:0 注册:2008/12/6 20:34:00
  发帖心情 Post By:2009/2/3 22:23:00 [只看该作者]

根据案例学习分析代码--轻松

 回到顶部
总数 12 上一页 1 2