rtipton
3/20/2010 - 2:55 AM

C#/VB -- Reverse String

C#/VB -- Reverse String

Module RevString

    Sub Main()
        Dim inputString As String = Console.ReadLine()
        ReverseOrder(inputString)
    End Sub

    Private Sub ReverseOrder(ByVal textInput As String)
        Dim text2Rev As String = textInput
        Dim reversed As String

        Dim charArray() As Char = textInput.ToCharArray()
        Array.Reverse(charArray)
        reversed = charArray

        Console.WriteLine("")
        Console.WriteLine("Original Text: " + text2Rev)
        Console.WriteLine("Reversed Text: " + reversed)
    End Sub

End Module
using System;
using System.Text;

namespace ReverseCs
{
    class RevString
    {
        static void Main(string[] args)
        {
            string inputString = Console.ReadLine();
            StringBuilder workString = new StringBuilder(inputString);
            StringBuilder reversed = new StringBuilder();

            int len = workString.Length;
            for (int i = len - 1; i >= 0; i--)
                reversed.Append(workString[i]);

            Console.WriteLine("");
            Console.WriteLine("Original Text: {0}", workString);
            Console.WriteLine("Reversed Text: {0}", reversed.ToString());
        }
    }
}