Question

How to remove trailing zeros from a string in VB.NET

Answer 1

Imports System

Public Class RemoveTrailingZeros_VB_NET
    Public Shared Function removeTrailingZeros(ByVal str As String) As String
        Dim index As Integer

		For index = str.Length - 1 To 0 step -1
            If str(index) <> "0"c Then
                Exit For
            End If
        Next

        Return str.Substring(0, index + 1)
    End Function

    Public Shared Sub Main(ByVal args As String())
        Dim str As String = "457833.8591000"
	
        str = removeTrailingZeros(str)
	
        Console.WriteLine(str)
    End Sub
End Class


' run:
'
' 457833.8591
'

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System

Public Class RemoveTrailingZeros_VB_NET
    Public Shared Sub Main(ByVal args As String())
        Dim str As String = "457833.8591000"
		
        str = str.TrimEnd("0"c)
		
        Console.WriteLine(str)
    End Sub
End Class



' run:
'
' 457833.8591
'

 

70+ SQL courses for beginners and professionals