主题：[求助]动态定位至Table中的行

Dim tb As Table = Tables(e.Form.Name & "_Table1")

For Ri As Integer = tb.Rows.Count -1 To 0 Step -1
    If tb.Rows(Ri)("i") = "+" Then        
        MessageBox.Show(tb.Rows(Ri)("名称"))       
        e.Form.Controls("but+").performclick
    End If
Next

BOM明细_but+_Click

Dim tb As Table = Tables(e.Form.Name & "_" & "Table1")
Dim r As Row = tb.Current

如上面的调用，如何怎么可以让Table 的Row在循环中动态定位Row。可以让后面的tb.Current 得到正确认的值