以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何快速定位到目录树选择节点所对应的table行？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72425)
--  作者：苍风霁月
--  发布时间：2015/7/30 9:11:00
--  如何快速定位到目录树选择节点所对应的table行？
我使用以下代码，发现如果表A数据量越大，用的时间越长；超过2000条数据，感觉这定位就有点业余，不像foxtable风格，请问有其它更优的方法么？

With Tables("表A")
    Dim r As Integer
    r = .FindRow("[名称] = \'" & e.Node.DataRow("名称") & "\'") \'从第一行开始查找
    If r >= 0 Then \'如果找到的话
        .Position = r \'定位到找到的行.
    End If
End With
--  作者：大红袍
--  发布时间：2015/7/30 23:38:00
--  

 1、你的currentChanged事件是否写有代码。

 

 2、定位就是会慢的，2000行，我测试下面的代码也不会很慢

 

With Tables("表A")
    Dim r As Integer
    r = .FindRow("第一列 = \'12345\'") \'从第一行开始查找
    If r >= 0 Then \'如果找到的话
        .Position = r \'定位到找到的行.
    End If
End With