UC知道VB 搜索文本显示在listbox
来源：百度知道 编辑：UC知道 时间：2024/06/01 01:09:02
文本内容是
123
1234
456
4567
789
7891
程序有2个listbox 1个textbox 一个按钮.
X:\路径\ 下有3个txt
listbox1 显示X:\路径\ 下的文本.点击后加载到listbox2.
在textbox输入某个任意一个内容后按下按钮可以将整行显示在listbox2上
双击listbox上的任意一行的内容将内容写在消息框上然后将消息框弹出.
谢谢.本人菜鸟.
回答者： ljl88900 - 区域总裁 十三级 2009-10-8 13:40
能否请您再改进下程序呢?
我需要的是关键字搜索.
123
1234
456
4567
789
7891
比如输入7后可以显示出
4567
789
7891
.
其他无关的内容就不显示了.而且再次搜索时不用再次在listbox1 打开文件.
然后双击条目显示的消息框应该是他的内容,不是文本的标题.麻烦改进
200等你.
123
1234
456
4567
789
7891
程序有2个listbox 1个textbox 一个按钮.
X:\路径\ 下有3个txt
listbox1 显示X:\路径\ 下的文本.点击后加载到listbox2.
在textbox输入某个任意一个内容后按下按钮可以将整行显示在listbox2上
双击listbox上的任意一行的内容将内容写在消息框上然后将消息框弹出.
谢谢.本人菜鸟.
回答者： ljl88900 - 区域总裁 十三级 2009-10-8 13:40
能否请您再改进下程序呢?
我需要的是关键字搜索.
123
1234
456
4567
789
7891
比如输入7后可以显示出
4567
789
7891
.
其他无关的内容就不显示了.而且再次搜索时不用再次在listbox1 打开文件.
然后双击条目显示的消息框应该是他的内容,不是文本的标题.麻烦改进
200等你.
根据你的补充要求，修改了源代码，新下载地址是：
http://www.fileurls.com/download.ashx?id=rqwhic
以下是旧的示例下载地址：
http://www.fileurls.com/download.ashx?id=kpgfom
不明白在说什么
'我帮您改了模糊查找的功能了
Private Sub Command1_Click()
For i = 0 To List2.ListCount - 1
If InStr(1, List2.List(i)