快上网专注成都网站设计 成都网站制作 成都网站建设
成都网站建设公司服务热线:028-86922220

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net遍历文件数组 vb遍历文件夹的所有文件

用vb.net怎样实现在遍历某一文件夹下的所有文件

'把下面的目录改成你要遍历的目录

创新互联服务项目包括郏县网站建设、郏县网站制作、郏县网页制作以及郏县网络营销策划等。多年来,我们专注于互联网行业,利用自身积累的技术优势、行业经验、深度合作伙伴关系等,向广大中小型企业、政府机构等提供互联网行业的解决方案,郏县网站推广取得了明显的社会效益与经济效益。目前,我们服务的客户以成都为中心已经辐射到郏县省份的部分城市,未来相信会继续扩大服务区域并继续获得客户的支持与信任!

Dim MyDir = "C:\Windows"

Dim MyInfo = MyDir + "目录下的所有文件包括:"

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

MyInfo += Environment.NewLine + MyFile

Next

Me.RichTextBox1.Text =MyInfo

VB.NET遍历查找某个文件夹,并找出指定文件

解压密码:1299

假设路径为C:\abc

代码:

Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Dim Files As ObjectModel.ReadOnlyCollection(Of String) = My.Computer.FileSystem.GetFiles("C:\abc")

Dim FileSize As Long, FileName As String = Nothing

Dim oFileSize As Long

For Each File As String In Files

oFileSize = My.Computer.FileSystem.GetFileInfo(File).Length

If oFileSize  FileSize Then

FileSize = oFileSize

FileName = File

End If

Next

Dim ListN As ListViewItem = New ListViewItem(My.Computer.FileSystem.GetName(FileName))

ListN.SubItems.Add(oFileSize  " byte")

ListN.SubItems.Add(My.Computer.FileSystem.GetFileInfo(FileName).Extension  " 文件")

ListN.SubItems.Add(FileName)

ListView1.Items.Add(ListN)

End Sub

End Class

详见源代码!!

在VB.net中,如何遍历指定路径下的文件夹并把文件夹名存储在数组中?

给你一个提示吧!呵呵,剩下的要自己思考哦!

Path:是初始目录的路径

Private Sub WriteArray(ByVal Path As String)

'写入数组代码在这里,直接将Path写到数组就行了。

Dim dir As New IO.DirectoryInfo(Path)

For Each d As IO.DirectoryInfo In dir.GetDirectories

WriteArray(d.FullName) '递归

Next

End Sub

如果子目录较多那么递归会比较费时间,在调用递归前加入application.doevent就行了,这样在应对大递归时不会死机。

至于数组嘛使用 arraylist 最好了。

回答补充:

把递归去掉就行了啊!

VB.net遍历某个文件夹,并读取子目录中的指定文件

vb.net:

Dim

path

=

System.IO.Directory.GetFiles("D:\Log\abc",

"*.txt",

SearchOption.AllDirectories):搜索该路径下的所有txt类型的目录及子目录

path.AddRange(path)

Dim

_RecordInfo

As

String

Dim

_Reader

As

StreamReader

_Reader

=

New

StreamReader(file,

System.Text.Encoding.Default):'以Default编码的形式读取file文件(文件写入的编码要与读取的编码一致)


网站名称:vb.net遍历文件数组 vb遍历文件夹的所有文件
当前链接:http://6mz.cn/article/dojghpg.html

其他资讯