這個(gè)就是你要的了!希望你能用!
10余年的吉縣網(wǎng)站建設(shè)經(jīng)驗(yàn),針對(duì)設(shè)計(jì)、前端、開(kāi)發(fā)、售后、文案、推廣等六對(duì)一服務(wù),響應(yīng)快,48小時(shí)及時(shí)工作處理。營(yíng)銷(xiāo)型網(wǎng)站建設(shè)的優(yōu)勢(shì)是能夠根據(jù)用戶(hù)設(shè)備顯示端的尺寸不同,自動(dòng)調(diào)整吉縣建站的顯示方式,使網(wǎng)站能夠適用不同顯示終端,在瀏覽器中調(diào)整網(wǎng)站的寬度,無(wú)論在任何一種瀏覽器上瀏覽網(wǎng)站,都能展現(xiàn)優(yōu)雅布局與設(shè)計(jì),從而大程度地提升瀏覽體驗(yàn)。成都創(chuàng)新互聯(lián)公司從事“吉縣網(wǎng)站設(shè)計(jì)”,“吉縣網(wǎng)站推廣”以來(lái),每個(gè)客戶(hù)項(xiàng)目都認(rèn)真落實(shí)執(zhí)行。
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim AppPath As String = Directory.GetCurrentDirectory() '獲取應(yīng)用程序的當(dāng)前工作目錄
Process.Start(AppPath) '打開(kāi)當(dāng)前目錄
End Sub
忘了說(shuō),這個(gè)要引用命名空間!
把Imports System.IO 寫(xiě)到代碼最上邊就好了!
Imports System.IO '引用命名空間
Dim AppPath As String = Directory.GetCurrentDirectory() '獲取應(yīng)用程序的當(dāng)前工作目錄
Process.Start(AppPath) '打開(kāi)當(dāng)前目錄
用Io.Directory.GetFiles("D:\")函數(shù)獲得一個(gè)存放D盤(pán)目錄文件的字符串?dāng)?shù)組
代碼:
For Each item As String In IO.Directory.GetFiles("D:\")
ListBox1.Items.Add(item)
Next
運(yùn)行之后,ListBox1里就會(huì)有這些文件
先用System.IO.Directory.GetDirectories函數(shù)獲取子目錄的名稱(chēng)(包括其路徑),再用System.IO.Path.GetFileName獲取子目錄的名稱(chēng)。下面是代碼:
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
...
可能有更簡(jiǎn)潔的方法,你可以到MSDN看看
System.IO.Directory.GetDirectories:
System.IO.Path.GetFileName:
通用 I/O 任務(wù):
新聞標(biāo)題:vb.net獲取根目錄 vbs獲取當(dāng)前路徑
URL網(wǎng)址:http://vcdvsql.cn/article4/doissie.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供云服務(wù)器、定制開(kāi)發(fā)、域名注冊(cè)、定制網(wǎng)站、網(wǎng)站建設(shè)、標(biāo)簽優(yōu)化
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶(hù)投稿、用戶(hù)轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)