Question

我有一个文件列表，我收集到一个字符串（），我想查看该列表内部，如果我找到使用任何通配符模式匹配，增加一个计数器。我不知道如何实现这一目标。这是我到目前为止所得到的：

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

Answer 1

这里有3个问题：

lookFor不是一种模式。嗯，但它只会匹配自己
If lookFor Like filename不会削减它。 MSDN声明该模式必须位于Like运算符的右侧。这只是相反的方式。
Like

mytotal = mytotal Like + 1

发布固定代码。

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

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

1 个答案: