编号控件,不能绑定表【员工.编号】,这个控件不能绑定的。
然后 textChanged 事件写代码,如
Dim i As Integer = Tables("员工").FindRow("编号 like '%" & e.sender.text & "%'")
If i >= 0 Then
Tables("员工").position = i
End If