vb.net從文件路徑中獲取文件名

獲取方法，參考實(shí)例如下：

成都創(chuàng)新互聯(lián)公司主要從事成都做網(wǎng)站、網(wǎng)站制作、網(wǎng)頁設(shè)計(jì)、企業(yè)做網(wǎng)站、公司建網(wǎng)站等業(yè)務(wù)。立足成都服務(wù)建始,十多年網(wǎng)站建設(shè)經(jīng)驗(yàn),價(jià)格優(yōu)惠、服務(wù)專業(yè),歡迎來電咨詢建站服務(wù):18980820575

'獲取路徑名各部分: 如： 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

'獲取文件名但不包括擴(kuò)展名 aaa

Public Function GetFileNameNoExt(FilePathFileName As String) As String '獲取文件名但不包括擴(kuò)展名 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 0 Then

GetFileNameNoExt Mid(FilePathFileName, J + 1, i - J)

Else

GetFileNameNoExt Mid(FilePathFileName, J + 1, k - J - 1)

End If

End Function

'＝＝＝＝＝ '獲取擴(kuò)展名 .txt

Public Function GetFileExtName(FilePathFileName As String) As String '獲取擴(kuò)展名 .txt

On Error Resume Next

Dim i As Integer, J As Integer

i Len(FilePathFileName)

J InStrRev(FilePathFileName, ".")

If J 0 Then

GetFileExtName ".txt"

Else

GetFileExtName Mid(FilePathFileName, J, i)

End If

End Function

vb 讀取打開的文件名

如果你的文件名是存在filename這個(gè)變量中的話，那么可以寫：

Me.Caption

=

filename

+

"

-

記事本"

或者如果是用通用對話框獲取的文件名，那就是

Me.Caption

=

commdlg.filename

+

"

-

記事本"

當(dāng)然，如果你用的是VB6，上面的代碼沒有問題。但如果是VB.net的話，Me.caption要改成me.text才行

VB.NET關(guān)于listview中顯示所選文件夾內(nèi)文件名以及圖標(biāo)的問題

首先你要在工程里面添加至少一個(gè)imagelist1控件，把里面放上合適的圖標(biāo)。然后在listview的largeimagelist（對應(yīng)大圖表顯示模式）或者smalllimagelist（對應(yīng)其他顯示模式）屬性里面指定imagelist1控件。

最后在你的代碼添加上文件類型判斷代碼，根據(jù)不同的文件選擇不同的圖標(biāo)，最后添加到集合當(dāng)中去。

VB怎樣顯示文件夾內(nèi)所有的文件名稱

VB可以使用FileListBox 控件來獲取指定文件夾內(nèi)的所有文件名。

FileListBox 控件，在運(yùn)行時(shí)，在 Path 屬性指定的目錄中，F(xiàn)ileListBox 控件將文件定位并列舉出來。該控件用來顯示所選擇文件類型的文件列表。例如，可以在應(yīng)用程序中創(chuàng)建對話框，通過它選擇一個(gè)文件或者一組文件。

以下是組合使用DriveListBox 、控件DirListBox 控件和FileListBox 控件來獲取硬盤下任何一個(gè)文件夾內(nèi)的文件名。

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?"目錄夾內(nèi)存在"??File1.ListCount??"個(gè)文件。"

End?Sub

當(dāng)前題目：關(guān)于vb.net顯示文件名的信息
文章起源：http://chinadenli.net/article15/dsiecgi.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供企業(yè)網(wǎng)站制作、用戶體驗(yàn)、網(wǎng)站制作、、網(wǎng)站導(dǎo)航、品牌網(wǎng)站設(shè)計(jì)

廣告

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