Foxtable(狐表)用户栏目专家坐堂 → [求助]主从表关联查询问题


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

主题:[求助]主从表关联查询问题

帅哥哟,离线,有人找我吗?
wangnovel
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:211 积分:2241 威望:0 精华:0 注册:2012/10/6 17:19:00
[求助]主从表关联查询问题  发帖心情 Post By:2013/12/30 22:59:00 [只看该作者]

说明:1、有两对表,都是主从关系,主表1和从表1根据ID1关联;主表2和从表2根据ID2关联
         2、部门、姓名、ID1和ID2都是字符型;年份和月份都是整型;出勤数为浮点型
求助:我希望在主表1中输入所有信息后,当在从表1中输入姓名后,触发DataColChanged事件,能够在主表2和从表2中找到对应的上个月的出勤数。如,当我在从表1中输入“张三”后,上月出勤数自动填充为“20”,敬请狐爸或大师指教!
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20131230224717.png
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20131230224730.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2013-12-30 22:59:25编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/12/30 23:04:00 [只看该作者]

 呃,直接查找不就行了?各个表之间不是可以灵活查找的么?


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


加好友 发短信
等级:童狐 帖子:211 积分:2241 威望:0 精华:0 注册:2012/10/6 17:19:00
  发帖心情 Post By:2013/12/30 23:16:00 [只看该作者]

一开始也认为是容易的,但试着写了一下,不成功,请指教,最好给个具体的代码,先谢了

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/12/31 8:06:00 [只看该作者]

这个没有理由不可以的哦,从表1的DatacolChanged事件:

 

If e.DataCol.name = "姓名" Then
    Dim dr1 As DataRow
    Dim dr2 As DataRow
    Dim dr3 As DataRow
    dr1 = DataTables("主表1").Find("id1 = '" & e.DataRow("id1") & "'")
    If dr1 IsNot Nothing Then
        Dim y As Integer = e.DataRow("年份")
        Dim m As Integer = e.DataRow("月份")
        If m =1 Then
            y = y -1
            m = 12
        Else
            m = m -1
        End If
        dr2 = DataTables("主表2").Find("姓名 = '" & e.DataRow("姓名") & "' And 年份 = " & y & " and 月份 = " & m)
        If dr2 IsNot Nothing Then
            dr3 = DataTables("从表2").Find("id2 = '" & dr2("id2") & "'")
            If dr3 IsNot Nothing Then
                e.DataRow("上月出勤天数") = dr3("出勤数")
            End If
        End If
    End If
End If

 

 


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


加好友 发短信
等级:童狐 帖子:211 积分:2241 威望:0 精华:0 注册:2012/10/6 17:19:00
  发帖心情 Post By:2013/12/31 9:58:00 [只看该作者]

ok,问题解决了,谢谢狐爸和有点甜!

 回到顶部