Dim expr As String = "\w+:\s+""(?<w1>\w+)"",\s+\w+:\s+""(?<w2>\w+)"""
        Dim rx As New Regex(expr)
        Debug.WriteLine(expr)
        Dim s As String = "  Wort: ""Wert1"", Wort2: ""Wert2""     EinWort:" & _
          """Wert3"", ZweiWort2: ""Wert4""   "
 
        For Each m As Match In rx.Matches(s)
            Debug.WriteLine(m.Groups("w1"))
            Debug.WriteLine(m.Groups("w2"))
        Next

Dim expr As String = "\w+:\s+""(?<w1>\w+)"",*\s*"

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist