檢查字符串列表包含一個值

Question

我：

Public lsAuthors As List(Of String) 

我要值添加到這個列表中，但加入我需要檢查是否精確值已經在它之前。我如何解釋這一點？

Answer 1

您可以使用List.Contains：

If Not lsAuthors.Contains(newAuthor) Then 
    lsAuthors.Add(newAuthor) 
End If 

或LINQs Enumerable.Any：

Dim authors = From author In lsAuthors Where author = newAuthor 
If Not authors.Any() Then 
    lsAuthors.Add(newAuthor) 
End If 

你也可以使用一個有效的HashSet(Of String)而不是列表，它不允許重複，並返回False在HashSet.Add如果字符串已經在集合。

Dim isNew As Boolean = lsAuthors.Add(newAuthor) ' presuming lsAuthors is a HashSet(Of String) 

Answer 2

通用列表有一個稱爲Contains方法如果用於已選定類型默認的比較發現匹配搜索條件的元素，則返回true。

對於List（串），這是正常的字符串比較，這樣你的代碼可能是

Dim newAuthor = "Edgar Allan Poe" 
if Not lsAuthors.Contains(newAuthor) Then 
    lsAuthors.Add(newAuthor) 
End If 

作爲一個側面說明，對字符串的缺省認爲比較兩個字符串不同，如果他們沒有相同的情況。所以，如果你嘗試添加一個名爲「愛倫坡」一個作家，你已經添加了一個名爲「愛倫坡的」準系統包含沒有注意到它們是相同的。
如果你要管理這種情況，那麼你需要

.... 
if Not lsAuthors.Contains(newAuthor, StringComparer.CurrentCultureIgnoreCase) Then 
    ..... 

Answer 3

要檢查列表中是否存在元素，可以使用list.Contains()方法。如果您正在使用點擊一個按鈕來填充字符串列表，然後看到代碼：

Public lsAuthors As List(Of String) = New List(Of String) ' Declaration of an empty list of strings 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click ' A button click populates the list 
    If Not lsAuthors.Contains(TextBox2.Text) Then ' Check whether the list contains the item that to be inserted 
     lsAuthors.Add(TextBox2.Text) ' If not then add the item to the list 
    Else 
     MsgBox("The item Already exist in the list") ' Else alert the user that item already exist 
    End If 
End Sub 

注：一行行的解釋給出評論

Answer 4

你可以得到的匹配項的列表你的情況是這樣的：

Dim lsAuthors As List(Of String) 

Dim ResultData As String = lsAuthors.FirstOrDefault(Function(name) name.ToUpper().Contains(SearchFor.ToUpper())) 
If ResultData <> String.Empty Then 
    ' Item found 
Else 
    ' Item Not found 
End If