脫離具體的環境談并沒有任何意義,所以如果當前電腦上存在此文件就是文件,存在此文件夾則為文件夾,否則什么也不是。
創新互聯建站是一家集網站建設,淮上企業網站建設,淮上品牌網站建設,網站定制,淮上網站建設報價,網絡營銷,網絡優化,淮上網站推廣為一體的創新建站企業,幫助傳統企業提升企業形象加強企業競爭力。可充分滿足這一群體相比中小企業更為豐富、高端、多元的互聯網需求。同時我們時刻保持專業、時尚、前沿,時刻以成就客戶成長自我,堅持不斷學習、思考、沉淀、凈化自己,讓我們為更多的企業打造出實用型網站。
'Imports?System.IO
Dim?s?As?String?=?"C:\1.txt"
If?File.Exists(s)?Then
MessageBox.Show("文件")
ElseIf?Directory.Exists(s)?Then
MessageBox.Show("路徑")
Else
MessageBox.Show("什么都不是")
End?If
檢查文件是否正在被使用的函數 同意,樓上的 MFC下判斷文件夾是否存在,如不存在則創建文件夾 Dir()函數 Delphi怎么判斷一個文件存在···
System.Windows.Forms.OpenFileDialog
System.Windows.Forms.SaveFileDialog
System.Windows.Forms.FolderBrowserDialog
以上三個類均能夠很好的解決樓主的需求。
具體的請lz自己查msdn
解壓密碼:1299
假設路徑為C:\abc
代碼:
Public?Class?Form1
Private?Sub?Form1_Load(sender?As?Object,?e?As?EventArgs)?Handles?MyBase.Load
Dim?Files?As?ObjectModel.ReadOnlyCollection(Of?String)?=?My.Computer.FileSystem.GetFiles("C:\abc")
Dim?FileSize?As?Long,?FileName?As?String?=?Nothing
Dim?oFileSize?As?Long
For?Each?File?As?String?In?Files
oFileSize?=?My.Computer.FileSystem.GetFileInfo(File).Length
If?oFileSize??FileSize?Then
FileSize?=?oFileSize
FileName?=?File
End?If
Next
Dim?ListN?As?ListViewItem?=?New?ListViewItem(My.Computer.FileSystem.GetName(FileName))
ListN.SubItems.Add(oFileSize??"?byte")
ListN.SubItems.Add(My.Computer.FileSystem.GetFileInfo(FileName).Extension??"?文件")
ListN.SubItems.Add(FileName)
ListView1.Items.Add(ListN)
End?Sub
End?Class
詳見源代碼!!
網頁標題:vb.net偵聽文件夾 vbnet打開指定目錄下的文件
當前鏈接:http://vcdvsql.cn/article44/ddoeghe.html
成都網站建設公司_創新互聯,為您提供App開發、網站改版、云服務器、全網營銷推廣、商城網站、網站制作
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯