Imports System

Imports System.Text.RegularExpressions

Public Module Module1

    Public Sub Main()

        Dim pattern As String = "StatTDLabel"">.*?(StatTDLabel"">)(.*)<\/td>"

        Dim input As String = "</td> <td class=""StatTDLabel"">Dallas</td> <td class=""StatTDLabel"">dal.socks.ipvanish.com</td> </tr>"

        Dim options As RegexOptions = RegexOptions.Multiline

        Dim Match = Regex.Matches(input, pattern, options)

        Console.WriteLine (Match(0).Groups(2))

    End Sub

End Module