HOW TO：在 Visual Basic 中判斷某一目錄中有多少個檔案
更新：2007 年 11 月
您可以先使用 My.Computer.FileSystem.GetFiles 方法傳回唯讀字串集合，表示指定之目錄內的檔案名稱。然後，您就可以使用 Count 屬性判斷檔案數目。
若要判斷目錄中的檔案數目
使用 GetFiles 方法，傳回指定之目錄中的檔案集合。這個範例會傳回 TestDir 目錄中的檔案。
Dim counter As _ System.Collections.ObjectModel.ReadOnlyCollection(Of String) counter = My.Computer.FileSystem.GetFiles("C:\TestDir")使用 Count 屬性，判斷集合中的檔案數目。這個範例會顯示訊息方塊中的結果。
MsgBox("number of files is " & CStr(counter.Count))
範例
這個範例是上述程式碼片段的完整格式，它會計算 TestDir 中的檔案數目，並在訊息方塊中回報。
Dim counter As _
System.Collections.ObjectModel.ReadOnlyCollection(Of String)
counter = My.Computer.FileSystem.GetFiles("C:\TestDir")
MsgBox("number of files is " & CStr(counter.Count))
編譯程式碼
這個範例需要：
存取 System.Collections 命名空間的成員。如果您的程式碼中未完整限定成員名稱，請加入 Imports 陳述式。如需詳細資訊，請參閱 Imports 陳述式 (.NET 命名空間和型別)。
名為 TestDir 的目錄位於指定的位置上。請以您想要檢查的目錄路徑取代這個路徑。
穩固程式設計
下列情形可能會造成例外狀況：
因下列其中一項原因而導致路徑無效：它是長度為零的字串、它只包含空白字元、它包含無效的字元，或者它是裝置路徑 (開頭為 \\.\) (ArgumentException)。
路徑無效，因為它是 Nothing (ArgumentNullException)。
目錄不存在，或此目錄為檔案 (DirectoryNotFoundException)。
directory 會指向現有的檔案 (IOException)。
路徑超過系統定義的最大長度 (PathTooLongException)。
路徑中的檔案或資料夾名稱含有冒號 (:)，或者是無效的格式 (NotSupportedException)。
使用者缺乏必要的使用權限來檢視路徑 (SecurityException)。
使用者缺乏必要的使用權限 (UnauthorizedAccessException)。
請參閱
工作
HOW TO：在 Visual Basic 中取得目錄的檔案集合
HOW TO：在 Visual Basic 中尋找具有特定模式的檔案
參考
My.Computer.FileSystem.GetFiles 方法