>>760さんが教えてくれたMSDNを見て、自分でちょっと考えてみたんですけど
行末の改行文字を削除するなら

Dim str1 As String = str2.Replace(ControlChars.NewLine, "")
で出来るんでしょうか？それか

Dim str1 As String = str2.Replace(Chr(13) & Chr(10),"")
でやればいいんでしょうか？改行コードはCRLFです。