Question

在我的应用程序中 - 当用户打开特定表单时，在page_load上我希望能够进入特定目录 - 更新一些文件然后将其显示给用户。为了做到这一点，我使用了这段代码....

Dim di as New DirectoryInfo ("C:\inbox")
dim ArrFi as FileInfo() = di.GetFiles()
Dim fri as FileInfo

if fri.count = 0 then 'If there's no files then no need to stay
  Exit sub
End if

现在在下面的循环中，我的目标是检查特定文件是否具有特定扩展名。我在其他地方做过这个，但我使用STRING作为我的目录/文件名，在这种情况下我做了这个......

if stringFileName.EndsWith("TIF") then
  'DO whatever
End if

但是我无法在这里做到这一点。我基本上想要循环遍历每个文件，只在扩展名为.TIF时才做某事，但由于我使用的是FileInfo，因此我不确定如何处理

For each fri in ArrFi
     if Fri.endsWith = "TIF" Then
       'do something
     else
        'Onto next file
     End if
Next Fri

使用FileInfo循环遍历目录中的文件

0 个答案: