锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net搜索文件名 vb查找指定目录下的指定文件

IT技术文件名

在VB中如何获取指定文件夹下的所有文件名？VB可以使用FileListBox 控件来获取指定文件夹内的所有文件名 。
FileListBox 控件，在运行时，在 Path 属性指定的目录中，FileListBox 控件将文件定位并列举出来 。该控件用来显示所选择文件类型的文件列表 。例如，可以在应用程序中创建对话框，通过它选择一个文件或者一组文件 。
以下是组合使用DriveListBox 、控件DirListBox 控件和FileListBox 控件来获取硬盘下任何一个文件夹内的文件名 。
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub File1_Click()
Dim i As Long
Debug.Print "目录夹内存在"File1.ListCount"个文件 。"
End Sub
vb.net关键字搜索文件窗体上添加一个文本框，一个列表框，一个按钮：
代码如下：
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从文件路径中获取文件名获取方法vb.net搜索文件名 ， 参考实例如下vb.net搜索文件名：
'获取路径名各部分:
如vb.net搜索文件名：
c:\dir1001\aaa.txt
'获取路径路径
c:\dir1001\
Public
Function
GetFileName(FilePathFileName
As
String)
As
String
'获取文件名
aaa.txt
On
Error
Resume
Next
Dim
i
As
Integer,
J
As
Integer
i
Len(FilePathFileName)
J
InStrRev(FilePathFileName,
"\")
GetFileName
Mid(FilePathFileName,
J
1,
i)
End
Function
''获取路径路径
c:\dir1001\
Public
Function
GetFilePath(FilePathFileName
As
String)
As
String
'获取路径路径
c:\dir1001\
On
Error
Resume
Next
Dim
J
As
Integer
J
InStrRev(FilePathFileName,
"\")
GetFilePath
Mid(FilePathFileName,
1,
J)
End
Function
'获取文件名但不包括扩展名
aaa
Public
Function
GetFileNameNoExt(FilePathFileName
As
String)
As
String
'获取文件名但不包括扩展名
aaa
On
Error
Resume
Next
Dim
i
As
Integer,
J
As
Integer,
k
As
Integer
i
Len(FilePathFileName)
J
InStrRev(FilePathFileName,
"\")
k
InStrRev(FilePathFileName,
".")
If
k
Then
GetFileNameNoExt
Mid(FilePathFileName,
J
1,
i
-
J)
Else
GetFileNameNoExt
Mid(FilePathFileName,
J
1,
k
-
J
-
1)
End
If
End
Function
'＝＝＝＝＝
'获取扩展名
.txt
Public
Function
GetFileExtName(FilePathFileName
As
String)
As
String
'获取扩展名
.txt
On
Error
Resume
Next
Dim
i
As
Integer,
J
As
Integer
i
Len(FilePathFileName)
J
InStrRev(FilePathFileName,
".")
If
J
Then
GetFileExtName
".txt"
Else
GetFileExtName
Mid(FilePathFileName,
J,
i)
End
If
End
Function
vb.net 如何用通配符查找文件步骤如下vb.net搜索文件名：
【vb.net搜索文件名 vb查找指定目录下的指定文件】窗体上添加2个列表框vb.net搜索文件名，一个按钮vb.net搜索文件名：
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查找文件问题思路vb.net搜索文件名：
1vb.net搜索文件名，使用ListBox1控件来存放搜索到vb.net搜索文件名的文件名，然后ListBox1.SelectedItem就可以返回选中项vb.net搜索文件名的文本；
2，利用获得vb.net搜索文件名的选中项文本（即文件与路径），使用打开文本文件的方法，读取内容显示在文本框里 。
关于vb.net搜索文件名和vb查找指定目录下的指定文件的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：为什么英雄联盟的服务器总是这么差？ 英雄联盟服务器怎么那么差

    下一篇：无锡手机游戏开发，无锡手机游戏开发公司