Dim
創(chuàng)新互聯(lián)是一家專(zhuān)業(yè)提供天峻企業(yè)網(wǎng)站建設(shè),專(zhuān)注與網(wǎng)站建設(shè)、網(wǎng)站制作、H5頁(yè)面制作、小程序制作等業(yè)務(wù)。10年已為天峻眾多企業(yè)、政府機(jī)構(gòu)等服務(wù)。創(chuàng)新互聯(lián)專(zhuān)業(yè)的建站公司優(yōu)惠進(jìn)行中。
dir
As
New
IO.DirectoryInfo("C:\TDDownload")
//
目錄下就一個(gè)文件夾
If
dir.GetDirectories.Length
Then
MessageBox.Show(dir.GetDirectories.GetValue(0).ToString())
End
If
//
目錄下多個(gè)文件夾
'For
Each
d
As
IO.DirectoryInfo
In
dir.GetDirectories
'
MessageBox.Show(d.FullName)
'Next
命名空間:System.Windows.Forms
Application.StartupPath 屬性(返回String)
獲取啟動(dòng)了應(yīng)用程序的可執(zhí)行文件的路徑,不包括可執(zhí)行文件的名稱(chēng)。
Application.ExecutablePath 屬性(返回String)
獲取啟動(dòng)了應(yīng)用程序的可執(zhí)行文件的路徑,包括可執(zhí)行文件的名稱(chēng)。
Vb.net獲取某個(gè)目錄下文件夾名稱(chēng)(不包含隱藏文件夾)實(shí)現(xiàn)代碼如下:
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
用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.Environment.CurrentDirectory
這才是vb.net的獲取程序運(yùn)行路徑的方法
Server.MapPath("~") "\" "Web.config"Server.MapPath("~") 是取當(dāng)前目錄上一級(jí)的路徑Server.MapPath(".") 是取當(dāng)前目錄的路徑
網(wǎng)頁(yè)標(biāo)題:vb.net獲得目錄 vbnet打開(kāi)指定目錄下的文件
鏈接分享:http://jinyejixie.com/article38/dosdppp.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供企業(yè)網(wǎng)站制作、全網(wǎng)營(yíng)銷(xiāo)推廣、搜索引擎優(yōu)化、Google、定制開(kāi)發(fā)、網(wǎng)頁(yè)設(shè)計(jì)公司
聲明:本網(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)