vb.net搜索文件 vbs 搜索文件-成都创新互联网站建设

关于创新互联

多方位宣传企业产品与服务 突出企业形象

公司简介 公司的服务 荣誉资质 新闻动态 联系我们

vb.net搜索文件 vbs 搜索文件

vb.net关键字搜索文件

窗体上添加一个文本框,一个列表框,一个按钮:

创新互联是一家专业提供扎赉诺尔企业网站建设,专注与网站建设、成都网站设计H5网站设计、小程序制作等业务。10年已为扎赉诺尔众多企业、政府机构等服务。创新互联专业网站制作公司优惠进行中。

代码如下:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim MyDir As String = "C:\123"

Dim MyFilter As String = "*" TextBox1.Text "*"

ListBox1.Items.Clear()

For Each MyFile As String In System.IO.Directory.GetFiles(MyDir, MyFilter)

ListBox1.Items.Add(MyFile)

Next

End Sub

vb.net查找文件问题

思路:

1,使用ListBox1控件来存放搜索到的文件名,然后ListBox1.SelectedItem就可以返回选中项的文本;

2,利用获得的选中项文本(即文件与路径),使用打开文本文件的方法,读取内容显示在文本框里。

vb.net 如何用通配符查找文件

步骤如下:

窗体上添加2个列表框,一个按钮:

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim MyDir As String = "C:\123"

'搜索并显示子文件夹

ListBox1.Items.Clear()

For Each MySubDir As String In System.IO.Directory.GetDirectories(MyDir)

ListBox1.Items.Add(MySubDir)

Next

'搜索并显示文件

ListBox2.Items.Clear()

For Each MyFile As String In System.IO.Directory.GetFiles(MyDir)

ListBox2.Items.Add(MyFile)

Next

End Sub

End Class


本文名称:vb.net搜索文件 vbs 搜索文件
分享网址:http://kswsj.cn/article/ddopgcd.html

其他资讯