Question

How to reverse order of words and the words in a string with VB.NET

Answer 1

Imports System

Public Class Program
	Public Shared Function ReverseWords(ByVal s As String) As String
        Dim arr As String() = s.Split(" "c)

        For i As Integer = 0 To arr.Length - 1
            Dim charArray As Char() = arr(i).ToCharArray()
            Array.Reverse(charArray)
            arr(i) = New String(charArray)
        Next

        Array.Reverse(arr)
	
        Return String.Join(" ", arr)
    End Function

    Public Shared Sub Main()
        Dim s As String = "VB is a general purpose programming language"
	
        s = ReverseWords(s)
	
        Console.Write(s)
    End Sub
End Class





' run:
'
' egaugnal gnimmargorp esoprup lareneg a si BV
'

 

70+ SQL courses for beginners and professionals