Question

How to remove the last word from a string in VB.NET

Answer 1

Imports System
  
Public Class RemoveTheLastWordFromAString_VB_NET
	
	Public Shared Function RemoveTheLastWordFromAString(s As String) As String
        Dim arr() As String = s.Split(New Char() {" "c}, StringSplitOptions.RemoveEmptyEntries)
 
        Array.Resize(arr, arr.Length - 1)
 
		return String.Join(" ", arr)
	End Function
	
    Public Shared Sub Main()
        Dim s As String = "c# c c++ java vb.net python"
          
        s = RemoveTheLastWordFromAString(s)
          
        Console.WriteLine(s)
    End Sub
End Class
  
  
  
' run:
'
' c# c c++ java vb.net
'

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System
  
Public Class RemoveTheLastWordFromAString_VB_NET
	
	Public Shared Function RemoveTheLastWordFromAString(s As String) As String
		return s.Substring(0, s.LastIndexOf(" "))
	End Function
	
    Public Shared Sub Main()
        Dim s As String = "c# c c++ java vb.net python"
          
        s = RemoveTheLastWordFromAString(s)
          
        Console.WriteLine(s)
    End Sub
End Class
  
  
  
' run:
'
' c# c c++ java vb.net
'

 

70+ SQL courses for beginners and professionals