Module Module1
 
    Sub Main()
        Dim sQuelltext As String
        sQuelltext = "<tr><td class=""key"">Produkttyp:</td><td>" & _
          "Notebook</td></tr>" & vbCrLf & _
                     "<tr><td class=""key"">Produktfarbe:</td><td>" & _
                     "Weiß</td></tr>" & vbCrLf & _
                     "<tr><td class=""key"">Formfaktor:</td><td> Klappgehäuse</td></tr>"
 
        sQuelltext = System.Text.RegularExpressions.Regex.Replace(sQuelltext, _
          "<.*?>", "")
 
        Console.WriteLine(sQuelltext)
        Console.Read()
 
    End Sub
 
End Module