>>181
こうしておいて、後でスペースを取れば？
Dim str As String = "<a href="".."">松井玲奈</a> と " + _
"<a href="".."">仁藤萌乃</a> が " + _
"<a href="".."">大好き</a> です"

Dim result As String = Regex.Replace(str, "<a[^>]*>(.*?)</a>", New MatchEvaluator(Function(m As Match) m.Groups(1).Value))
result = result.Replace(vbNewLine, String.Empty)
Console.WriteLine(result)