按ＴＡＢ键从表B取对应序号的数据 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 按ＴＡＢ键从表B取对应序号的数据

共有3096人关注过本帖树形打印复制链接主题：按ＴＡＢ键从表B取对应序号的数据

zoyong

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：675 积分：8019 威望：0 精华：0 注册：2015/8/24 9:02:00

按ＴＡＢ键从表B取对应序号的数据 发帖心情

Post By：2017/9/20 20:48:00 [显示全部帖子]

在“表A”的序号列上按ＴＡＢ键，将“表B”对应序号所对应的“列表名称”填入到表A的列表名称中，如果表A的序号列上没有数据则跳到下一格

zoyong

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：675 积分：8019 威望：0 精华：0 注册：2015/8/24 9:02:00

Post By：2017/9/22 15:00:00 [显示全部帖子]

If e.DataCol.Name = "对方账号" Then

If e.NewValue Is Nothing Then

e.DataRow("对方户名") = Nothing

e.DataRow("合作公司") = Nothing

Else

Dim dr As DataRow

dr = DataTables("cw_szzh").Find("[银行账号] = '" & e.NewValue & "'")

If dr IsNot Nothing

e.DataRow("对方户名") = dr("账户名称")

e.DataRow("合作公司") = dr("关联信息")

End If

主题：按ＴＡＢ键从表B取对应序号的数据