查找具有通配符或部分模式的所有文件

Find all files with wildcard or partial pattern

我有一个我收集到 string() 中的文件列表,我想查看该列表内部,如果我使用任何通配符模式找到匹配项,则增加一个计数器。我不确定如何实现。这是我到目前为止得到的:

Dim mytotal As Integer = 0
Dim lookFor as String = "IWantThisFile"

Dim myList As ObjectModel.ReadOnlyCollection(Of String)
myList = My.Computer.FileSystem.GetFiles("C:\myfolder\")
Dim filename As String

For Each File As String In myList 
    filename = Path.GetFileNameWithoutExtension(File)

    If lookFor Like filename Then
        mytotal = mytotal Like + 1
    End If
Next

这里有 3 个问题:

  • lookFor 不是模式。是的,但它只会匹配自己
  • If lookFor Like filename 不会剪的。 MSDN 指出模式必须在 Like 运算符的右侧。只是反过来而已。
  • mytotal = mytotal Like + 1
  • 中迷路Like

发布固定代码。

Dim mytotal As Integer = 0
Dim lookFor as String = "IWantThisFile*"
Dim myList As ObjectModel.ReadOnlyCollection(Of String)
myList = My.Computer.FileSystem.GetFiles("C:\myfolder\")
Dim filename As String

For Each File As String In myList 
    filename = Path.GetFileNameWithoutExtension(File)

    If filename Like lookFor Then
        mytotal = mytotal + 1
    End If
Next