Imports System
Imports Microsoft.VisualBasic
' vbCrLf = "\r\n"
' vbCr = "\r"
' vbLf = "\n"
Public Class Program
Public Shared Sub Main()
Dim str As String = "vb.net c# c++ c python" & vbLf & vbCr & vbCrLf
str = str.TrimEnd(vbLf, vbCr, vbCrLf)
Console.Write(str)
End Sub
End Class
' run:
'
' vb.net c# c++ c python
'