「VB.net」Collectionオブジェクトに指定要素の存在判定
書式
Public Function Contains (Key As String) As Boolean
Collection オブジェクトに特定のキーを持つ要素が含まれている場合は true。それ以外の場合は false。
使用例
Module ModuleTest
Public Sub Main()
'Collectionオブジェクトの宣言
Dim users As New Collection()
Dim strA As String = "4567"
users.Add(users, strA)
'検索文字列指定
Dim searchStr = "4567"
'Containsで指定要素が存在かどうか
If users.Contains(searchStr) Then
MsgBox("コレクションに検索要素が存在です")
Else
MsgBox("コレクションに検索要素が存在ではない")
End If
End Sub
End Module
Module ModuleTest
Public Sub Main()
'Collectionオブジェクトの宣言
Dim users As New Collection()
Dim strA As String = "4567"
users.Add(users, strA)
'検索文字列指定
Dim searchStr = "4567"
'Containsで指定要素が存在かどうか
If users.Contains(searchStr) Then
MsgBox("コレクションに検索要素が存在です")
Else
MsgBox("コレクションに検索要素が存在ではない")
End If
End Sub
End Module
Module ModuleTest Public Sub Main() 'Collectionオブジェクトの宣言 Dim users As New Collection() Dim strA As String = "4567" users.Add(users, strA) '検索文字列指定 Dim searchStr = "4567" 'Containsで指定要素が存在かどうか If users.Contains(searchStr) Then MsgBox("コレクションに検索要素が存在です") Else MsgBox("コレクションに検索要素が存在ではない") End If End Sub End Module
結果
コレクションに検索要素が存在です