有一个窗口,设了一个文本框用来输入检索条件,设了一个表用来显示符合检索条件的数据。
在文本框的keydown事件中
'''
Dim t As Table = e.Form.Controls("Table1").Table
If e.KeyCode = keys.Enter Then
Dim r As Integer = t.FindRow("C Like '" & e.Sender.text & ".%'",t.Position +1,True)
If r >= 0 Then
t.Position = r
End If
e.Cancel = True
e.Sender.Select
End If
本来是希望输入完条件以后,能够定位到表的行。
但看到的行并不是期望的行时,希望继续按回车可以继续往下搜索,直到找到满意的行为止。
但现在在文本框中输入了字符串,然后回车,表是定位行了,但焦点并未回到文本框中。应当怎么做呢?