Dim reg As New System.Text.RegularExpressions.Regex("bar = (""(?<VAL>.*?)""|(?<VAL>.*?)"")")

        Dim m = reg.Match(TextBox1.Text)
        If m.Success Then
            Console.WriteLine(m.Groups("VAL"))
        End If


こんなんでどうでしょう？