主题：[求助]目录树节点定位行

With CurrentTable
    Dim r As Integer
    r = .FindRow("[编号] = '" & e.Node.Text & "'") ' 从第一行开始查找
    If r >= 0 Then '如果找到的话
        .Position = r '定位到找到的行.
    End If
End With

谢谢指教！