以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于查找定位问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=146523)

--  作者:丰田
--  发布时间:2020/2/25 17:44:00
--  关于查找定位问题
Dim yddh1 As String = e.Form.Controls("TextBox1").Text
With CurrentTable
    Dim r As Integer
    r = .FindRow("[第一列] Like \'%yddh1%\'") \'从 第一行开始查找
    If r >= 0 Then \'如果找到的话
        .Position = r \'定位到找到的行.
    End If
End With

以上命令是查找"TextBox1" 的内容的行的命令  执行后并未定位到改行 命令怎样改

--  作者:sloyy
--  发布时间:2020/2/25 20:02:00
--  
 r = .FindRow("[第一列] Like \'%" & yddh1 & "%\'") \'从 第一行开始查找
yddh1 是个变量
你去找包含yddh1字符的行,哪里会有

--  作者:有点蓝
--  发布时间:2020/2/25 20:21:00
--  
多看几遍:http://www.foxtable.com/webhelp/topics/1284.htm
--  作者:丰田
--  发布时间:2020/2/25 20:45:00
--  
谢谢
--  作者:丰田
--  发布时间:2020/2/25 21:03:00
--  
如果要继续查找的话只能用
 .Position + 1, True  这种方法吗 如果这样的话每次查找以前必须把光标定位到第一行 能否第一行开始查找且可以继续查找呢  


--  作者:有点蓝
--  发布时间:2020/2/25 21:46:00
--  
只能这样,没有其他办法