以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请问如何得到关联表对应行的位置  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=76341)
--  作者：tcmhl
--  发布时间：2015/10/27 10:51:00
--  请问如何得到关联表对应行的位置
GetParentRow 这边貌似只能得到 DataRow的数据 

请问能否直接得到对应的行是第几行？谢谢
--  作者：Hyphen
--  发布时间：2015/10/27 11:22:00
--  
GetParentRow后再用Table.FindRow
--  作者：tcmhl
--  发布时间：2015/10/27 11:32:00
--  
目前是这样操作 但是连续2次find后 显示“索引超出了数组界限。”
--  作者：大红袍
--  发布时间：2015/10/27 11:39:00
--  

要判断位置

 

    Dim wz As Integer = Tables("订单").FindRow(dr)
    If wz >= 0 Then
        Tables("订单").Position = wz
    End If
--  作者：tcmhl
--  发布时间：2015/10/27 11:41:00
--  
Dim r As Row = Tables("样车参数").Current
Dim a As Integer = r.Index
Dim dr As DataRow
dr = DataTables("样车参数").DataRows(a).GetParentRow("厂商信息")
Dim b As Integer
b = Tables("厂商信息").FindRow(dr)\'找出该DataRow在Table中的位置
If b >= 0 Then
Tables("厂商信息").Position = b


仍然会显示 “索引超出了数组界限。”       =。=|| 救命啊
--  作者：大红袍
--  发布时间：2015/10/27 11:56:00
--  
Dim r As Row = Tables("样车参数").Current
Dim dr As DataRow
dr = r.DataRow.GetParentRow("厂商信息")
Dim b As Integer
b = Tables("厂商信息").FindRow(dr)\'找出该DataRow在Table中的位置
If b >= 0 Then
Tables("厂商信息").Position = b
--  作者：tcmhl
--  发布时间：2015/10/27 12:07:00
--  
太感谢了！