在一大篇的文章中，要查找字符串是不可能通过肉眼来整篇查找的，我们都是在如word，文本中通过查找功能在查找的，
下面的示例是Access窗体中在文本框中输入文字，通过筛选查找出字符串，然后标黑。
下面的代码是查找功能
Dim intWhere As Integer
With objTextBox
'指定一字符串在另一字符串中最先出现的位置
intWhere = InStr(.Value, strSearch)
If intWhere Then
'查找
.SetFocus
.SelStart = intWhere - 1
.SelLength = Len(strSearch)
Else
'如未有指定字符，提示.
MsgBox "未找到你所查找的字符串！", vbOKOnly + vbInformation, "系统提示："
End If
