以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]子表的Current属性  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=138434)
--  作者：yd-jch
--  发布时间：2019/7/31 10:37:00
--  [求助]子表的Current属性

我在窗口A选中某一个表格（子表）的某一行，接着打开另一个窗口B，想使用表的Current调用该行的数据，但一直调用的都是其他行的。

例如：我在窗口A中选定的行Tables("JL02_计量清单.JL03_钢构件表").Current（“构件ID”）= "GGJ001"，

接着我使用窗口A的命令打开编辑窗口，这时Tables("JL02_计量清单.JL03_钢构件表").Current（“构件ID”）= "GGJ004"
--  作者：有点蓝
--  发布时间：2019/7/31 10:53:00
--  
编辑窗口绑定的是Tables("JL02_计量清单.JL03_钢构件表")，还是Tables("JL03_钢构件表")？

打开编辑窗口代码是什么？
--  作者：yd-jch
--  发布时间：2019/7/31 10:57:00
--  
If Tables("JL02_计量清单.JL03_钢构件表").Current Is Nothing Then
    MessageBox.Show("当前无构件可编辑!","无效操作!",MessageBoxButtons.OK,MessageBoxIcon.Warning)
Else
    Forms("ZJ10122-编辑钢构件").Open()
End If
--  作者：有点蓝
--  发布时间：2019/7/31 11:07:00
--  
编辑窗口绑定的是Tables("JL02_计量清单.JL03_钢构件表")，还是Tables("JL03_钢构件表")？
--  作者：yd-jch
--  发布时间：2019/7/31 11:15:00
--  
Dim r As Row = Tables("JL02_计量清单.JL03_钢构件表").Current
Dim gjid As String = r("构件ID")
--  作者：有点蓝
--  发布时间：2019/7/31 11:44:00
--  
这样不可能有问题。除非有其它代码导致关联表的选择行发生的变化，比如重新加载数据，或者选择了父表不同的行