以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  老师您好， find 如何返回行号？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=98655)
--  作者：rxfmrqq
--  发布时间：2017/4/4 14:34:00
--  老师您好， find 如何返回行号？

源代码是这样。 


Tables("表A").Position = Tables("表A").find(filter)

 

显示没有可访问的find

 

 
--  作者：有点蓝
--  发布时间：2017/4/4 15:04:00
--  
参考:http://www.foxtable.com/webhelp/scr/0553.htm
--  作者：rxfmrqq
--  发布时间：2017/4/4 15:09:00
--  
我是傻逼， 感谢老师。
--  作者：有点蓝
--  发布时间：2017/4/4 15:31:00
--  
With Tables("表A")
    Dim r As Integer
    r = .FindRow(filter) \'从 第一行开始查找
    If r >= 0 Then \'如果找到的话
        .Position = r \'定位到找到的行。
    End If
End With
--  作者：rxfmrqq
--  发布时间：2017/4/4 19:31:00
--  

这个解决了，我就是觉得我是傻逼。
另外，

Tables("问题搜索").Position = Tables("问题搜索").findrow("[问题] = \'" & Tables("问题搜索_table1").Row("问题") & "\'")

这行在 table控件 positionchanged 中的代码 老显示错误， 请问一下我哪里错了？
--  作者：rxfmrqq
--  发布时间：2017/4/4 19:43:00
--  
解决了，   感谢。- -  我翻了一下我以前的代码。
--  作者：有点蓝
--  发布时间：2017/4/4 20:28:00
--  
请按照4楼的方法使用，有些代码是不能省的。