vb.net 有個文件路徑C：\Users\New York\SoHo\abc.doc，我想從這個路徑中提取出SoHo\abc.doc如何實現(xiàn)？

' The file system path we need to split

創(chuàng)新互聯(lián)公司2013年至今，是專業(yè)互聯(lián)網(wǎng)技術服務公司，擁有項目做網(wǎng)站、成都做網(wǎng)站網(wǎng)站策劃，項目實施與項目整合能力。我們以讓每一個夢想脫穎而出為使命，1280元安福做網(wǎng)站,已為上家服務,為安福各地企業(yè)和個人服務,聯(lián)系電話:13518219792

Dim s As String = "C：\Users\New York\SoHo\abc.doc"

' Split the string on the backslash character

Dim parts As String() = s.Split(New Char() {"\"c})

之后取數(shù)組的最后兩個 用“\”連接起來就可以了。

關于在vb.net中獲取文件路徑的問題，如何解決？

當然不能~！ Me.OpenFileDialog1. FileNames這個是多選文件時，一個文件數(shù)組， 不是單個文件，單個文件用Me. OpenFileDialog1.FileName 而Str(Me.OpenFileDialog1. FileNames) 又是什么意思呢~？把數(shù)組轉化成字符串~？~~？~？ strFileDirectary = Me.OpenFileDialog1.FileName 這樣strFileDirectary 得到的是完整的文件路徑，不是文件夾 我搞不懂你到底要獲得文件路徑還是文件所在的文件夾~~？~？

希望采納

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當前目錄路徑
分享網(wǎng)址：http://chinadenli.net/article31/dsgcosd.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站設計、外貿(mào)建站、手機網(wǎng)站建設、云服務器、網(wǎng)站導航、標簽優(yōu)化

廣告

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