Question

您好我正在尝试使用contains方法查看列表块（仅由文件路径组成）＆＃39;是否包含＆＃39;某个字符串。如果字符串包含在文件路径中，则应该删除相应的条目（在for循环中）。

    Dim index As Integer = findNumFiles("Archer", 6) '//returns number of files in archer directory
    Dim iString As String = "Archer"



    For i = 0 To index
    If Lookup.Items(index).contains(iString) Then
        removeFromList(Lookup, index) '//passes "Lookup" as a ListBlock name and removes the index number
    End If
    Next

示例文件路径为

"Z:\Movies and TV\Archer\Season 6\1.mp4"

编辑：我忘了提到它不起作用。我用一个名为＆＃34; archer＆＃34;的列表条目测试了该命令。如果iString = =＆＃34; archer＆＃34;，则删除该列表条目。似乎我试图在文件路径上使用contains方法是个问题，但我不确定。感谢您的任何见解！

Answer 1

使用Instr函数检查字符串是否存在，我不确定“Lookup.Items”是什么。使用'i'in for循环而不是索引

希望以下代码可以帮助您

Sub test1()

Dim index  As Integer

    index = findNumFiles("Archer", 6)

'//returns number of files in archer directory

    Dim iString As String
    iString = "Archer"

    For i = 0 To index
        If InStr(1,Lookup.Items(i), iString, 1) > 0 Then
          ' removeFromList(Lookup, index) '//passes "Lookup" as a ListBlock name and removes the index number
        End If
    Next

End Sub

使用contains（）方法

1 个答案: