老师问一个问题如何解决，一个副表有5000行，如果当前我用鼠标在表的3000行处选择了一下，然后在一个文本框输入内容进行模糊查找，结果出来了，在第200行，那么问题在这里：我用鼠标去点这个行的时候，点不到查出来的这个行，表自动跳到别出去了，而且我刚才选择的第3000行就出现在当前表格的最后一行，这个问题如何解决，另外，在主表上类似的查找就不会出现这个问题，查出来的，直接点击就能选中了，在副表上就不行，会跳走。
文本框的代码如下：
Dim ts As String = e.Sender.Text
Dim r As Integer
If ts <> "" Then
r = Tables(e.Form.Name & "_table4").FindRow("代码 like '%" & ts & "%' or 名称 like '%" & ts & "%'")
If r >= 0 Then
Tables(e.Form.Name & "_table4").Position = r
Tables(e.Form.Name & "_table4").Select(r,0)
Tables(e.Form.Name & "_table4").TopVisibleRow = r
End If
End If
加好友 
发短信
Post By：2023/6/13 17:15:00 [只看该作者]
