「VB.net」Collectionオブジェクトに指定要素の存在判定

2021年9月8日

書式
Public Function Contains (Key As String) As Boolean
Collection オブジェクトに特定のキーを持つ要素が含まれている場合は true。それ以外の場合は false。
使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
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

結果
コレクションに検索要素が存在です

VB.net

Posted by arkgame