ajuda getElementsByClassName

[Smokin 0]

Olá!

Estou desenvolvendo um aplicativo para mim e estou tendo um problema, alguém pode me ajudar?
Eu tenho um módulo
 

Module Extensions
    <Runtime.CompilerServices.Extension()> _
    Public Function GetElementsByClassName(ByVal Source As HtmlDocument, ByVal ClassName As String) As HtmlElement()
        Dim output As New List(Of HtmlElement)
        For i As Integer = 0 To Source.All.Count - 1
            Try
                If (Source.All(i).GetAttribute("className") = ClassName) Then
                    output.Add(Source.All(i))
                End If
            Catch ex As Exception

            End Try
        Next
        Return output.ToArray()
    End Function
End Module

 

Enfim, o problema é que eu preciso para obter mais de uma classe em uma única linha.
Eu tenho o seguinte código plus está retornando erro

 

 Dim app As HtmlElement = WebBrowser1.Document.GetElementsByClassName("pid-1-high" & "pid-1-ask & pid-1-ask2")(0)

 

Quero adicionar esta classe automaticamente em um listview

Dim z As ListViewItem
        z = New ListViewItem(app.GetAttribute("InnerText"))

 

Alguém pode me ajudar? Obrigado