Hi
Maybe this would work.
Dim test As String = "abcDEF" & vbCr & "ABCDefg" & vbLf & "WERTY" & vbCrLf & "YTRE" & "abcDEF" & vbCr & "ABCDefg" & vbLf & "WERTY" & vbCrLf & "YTRE"
'abcDEF
'ABCDefg
'WERTY
'YTREabcDEF
'ABCDefg
'WERTY
'YTRE
Dim res As String = test.Replace(vbCrLf, " < br > ").Replace(vbLf, " < br > ").Replace(vbCr, " < br > ")
'abcDEF < br > ABCDefg < br > WERTY < br > YTREabcDEF < br > ABCDefg < br > WERTY < br > YTRE