vb.net 獲取目錄下文件夾名不包括隱藏文件夾

Vb.net獲取某個目錄下文件夾名稱（不包含隱藏文件夾）實現代碼如下：

創新互聯公司網站建設提供從項目策劃、軟件開發，軟件安全維護、網站優化(SEO)、網站分析、效果評估等整套的建站服務，主營業務為網站設計制作、網站制作，成都APP應用開發以傳統方式定制建設網站，并提供域名空間備案等一條龍服務，秉承以專業、用心的態度為用戶提供真誠的服務。創新互聯公司深信只要達到每一位用戶的要求，就會得到認可，從而選擇與我們長期合作。這樣，我們也可以走得更遠！

Dim?dir?As?New?DirectoryInfo("D:\")

For?Each?d?As?DirectoryInfo?In?dir.GetDirectories

ComboBox1.Items.Add(d.Name)

Next

dim?finfo?as?new?fileinfo(d.name)

if?(finfo.attributes?and?FileAttributes.Hidden)FileAttributes.Hidden?then

ComboBox1.Items.Add(d.Name)

end?if

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獲取目錄文件夾名稱

先用System.IO.Directory.GetDirectories函數獲取子目錄的名稱（包括其路徑），再用System.IO.Path.GetFileName獲取子目錄的名稱。下面是代碼：

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

For Each s In System.IO.Directory.GetDirectories("C:\Windows")

Console.WriteLine(System.IO.Path.GetFileName(s))

Next

End Sub

下面是部分輸出：

Application Data

AppPatch

assembly

BOCNET

Boot

Branding

ConfigSetRoot

Cursors

Debug

DigitalLocker

Downloaded Installations

Downloaded Program Files

ehome

en-US

Fonts

Globalization

Help

...

可能有更簡潔的方法，你可以到MSDN看看

System.IO.Directory.GetDirectories：

System.IO.Path.GetFileName：

通用 I/O 任務：

分享名稱：vb.net提取文件名稱,VB讀取文件
網頁地址：http://vcdvsql.cn/article42/hsocec.html

成都網站建設公司_創新互聯，為您提供微信小程序、網站營銷、移動網站建設、標簽優化、網站導航、動態網站

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯