Access仿word查找功能--查找文本框中的字符
时间：2013-09-05 15:53 来源：Office中国 作者：tanhong 阅读：次
软件类型：国产软件
授权方式：免费软件
界面语言：简体中文
软件大小：18 KB
文件类型：.zip
运行环境：Win2003,WinXP,Win7,Win8
软件等级：★★★★★
发布时间：2013-09-05
插件情况：
下载次数：
下载次数：
软件介绍：
在一大篇的文章中，要查找字符串是不可能通过肉眼来整篇查找的，我们都是在如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
顶一下
(1)
100%
踩一下
(0)
0%
下载地址：
注意事项：
☉推荐使用第三方专业下载工具下载本站软件，使用 WinRAR v3.10 以上版本解压本站软件。
☉如果这个软件总是不能下载的请点击报告错误,谢谢合作!!
☉下载本站资源，如果服务器暂不能下载请过一段时间重试！
☉如果遇到什么问题，请到本站论坛去咨寻，我们将在那里提供更多 、更好的资源！
☉本站提供的一些商业软件是供学习研究之用，如用于商业用途，请购买正版。
相关软件
最新软件
推荐软件