Foxtable(狐表)用户栏目专家坐堂 → 关联跳转


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

主题:关联跳转

帅哥,在线噢!
nxdx112
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:405 积分:3688 威望:0 精华:0 注册:2016/11/12 18:42:00
关联跳转  发帖心情 Post By:2021/3/10 9:07:00 [只看该作者]

两个表之间 数据,当选择("是否发放资助") =  "是"    能否跳转到对应刚添加新行的那个表"学生资助"对应的行 ???
If e.DataCol.Name = "是否发放资助" AndAlso  e.DataRow("是否发放资助") =  "是"  Then
Dim nma() As String = {"学生姓名","学籍号","性别","身份证号码","发放金额","是否寄宿生","户籍性质","中小学","年级","班级","资助依据"}  'A表数据来源列
      Dim nmb() As String = {"姓名","学籍号","性别","身份证号码","发放金额","寄宿情况","户口性质","中小学","年级","班级","信息来源类型" }   'B表数据接收列
    Dim dr As DataRow = DataTables("学生资助").AddNew
    For i As Integer = 0 To nma.Length - 1
        dr(nmb(i)) = e.DataRow(nma(i))
    Next     

  End If
[此贴子已经被作者于2021/3/10 9:07:06编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111374 积分:566934 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/3/10 9:10:00 [只看该作者]

If e.DataCol.Name = "是否发放资助" AndAlso  e.DataRow("是否发放资助") =  "是"  Then
Dim nma() As String = {"学生姓名","学籍号","性别","身份证号码","发放金额","是否寄宿生","户籍性质","中小学","年级","班级","资助依据"}  'A表数据来源列
      Dim nmb() As String = {"姓名","学籍号","性别","身份证号码","发放金额","寄宿情况","户口性质","中小学","年级","班级","信息来源类型" }   'B表数据接收列

Dim dr As Row = Tables("学生资助").AddNew
   For i As Integer = 0 To nma.Length - 1
        dr(nmb(i)) = e.DataRow(nma(i))
    Next     
MainTable = Tables("学生资助")
  End If

 回到顶部