我使用以下代码计算文件夹中的文本文件数:
Dim MekdamFiles As String() = Directory.GetFiles(MekdamFolder, "*.txt")
Dim MekdamTextFiles = CStr(MekdamFiles.Count)
问题是,当文件夹中的文本文件数超过10时,显然这不起作用。我尝试了以下代码,但它会给出文本文件数量的错误:
Dim MekdamTextFiles(250)
MekdamTextFiles = CStr(MekdamFiles.Count)
任何帮助解决这个问题都表示赞赏。
答案 0 :(得分:0)
The code below worked for the purpose above:
Dim MekdamTextFiles As Integer = IO.Directory.GetFiles(MekdamFolder, "*.txt").Length
感谢大家的帮助和评论。