' The file system path we need to split

創(chuàng)新互聯(lián)公司專業(yè)為企業(yè)提供廣平網(wǎng)站建設、廣平做網(wǎng)站、廣平網(wǎng)站設計、廣平網(wǎng)站制作等企業(yè)網(wǎng)站建設、網(wǎng)頁設計與制作、廣平企業(yè)網(wǎng)站模板建站服務,十載廣平做網(wǎng)站經(jīng)驗,不只是建網(wǎng)站,更提供有價值的思路和整體網(wǎng)絡服務。
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ù)組的最后兩個 用“\”連接起來就可以了。
Dim my_path() As String = System.IO.Directory.GetFiles("d:\", "文件名", IO.SearchOption.AllDirectories)
因為有可能在多個地方,所以進行了全盤搜索,歌曲的所有地址路徑在數(shù)組my_path中
獲取方法,參考實例如下:
'獲取路徑名各部分: 如: 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 0 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 0 Then
GetFileExtName ".txt"
Else
GetFileExtName Mid(FilePathFileName, J, i)
End If
End Function
見上圖,用鼠標按照上述三個步驟先后次序,一一單擊進行選擇和設置,“生成輸出路徑”。
那么,在你的程序代碼里使用:
MsgBox(Application.StartupPath)
顯示的就是,你的當前默認的相對路徑。
也可以按照自己的需要重新設置該路徑。
選擇文件夾??在工具箱?-?對話框?里選擇?FolderBrowserDialog?添加?到設計器中
然后?代碼寫在??按鈕事件里
FolderBrowserDialog1.ShowDialog()
textbox1.text?=FolderBrowserDialog1.SelectedPath
選擇文件?在工具箱?-?對話框?里選擇?OpenFileDialog
把?OpenFileDialog1.ShowDialog()
TextBox1.Text?=?OpenFileDialog1.FileName
寫到按鈕事件下
如圖
點擊按鈕會彈出?通用對話框??選擇好路徑后?確定?,編輯框里就會顯示選擇的路徑
System.Environment.CurrentDirectory;
//例:?c:/test/
Application.ExecutablePath;(包括名稱)
//例:?c:/test/myapp.exe
Application.StartupPath;(不包括名稱)
//例:?c:/test/
絕對路徑是直接到達目標位置,通常是從盤符開始的路徑。完整的描述文件位置的路徑就是絕對路徑,以web站點根目錄為參考基礎的目錄路徑。
絕對路徑名的指定是從樹型目錄結(jié)構頂部的根目錄開始到某個目錄或文件的路徑,由一系列連續(xù)的目錄組成,中間用斜線分隔,直到要指定的目錄或文件,路徑中的最后一個名稱即為要指向的目錄或文件。之所以稱為絕對,意指當所有網(wǎng)頁引用同一個文件時,所使用的路徑都是一樣的。
擴展資料
幾種編程語言獲取程序所在路徑的方法:
1、在golang程序里面獲取程序所在路徑:
package main
import (
"path/filepath"
"os"
"fmt"
"log"
)
func main() {
execDir, err := filepath.Abs(filepath.Dir(os.Args[0]))
if err = nil {
log.Fatal(err)
}fmt.Println(execDir)
}
2、python腳本所在路徑:
import os
print(os.path.split(os.path.realpath(__file__))[0])
3、shell腳本獲取腳本的絕對路徑:
DIR="$( cd "$( dirname "${BASH_SOURCE[0]}" )" pwd )"
網(wǎng)站名稱:vb.net輸出文件路徑,vb中怎樣引用文件路徑
當前網(wǎng)址:http://chinadenli.net/article6/dsgscig.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供軟件開發(fā)、營銷型網(wǎng)站建設、ChatGPT、用戶體驗、網(wǎng)站策劃、App設計
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)