Write the below code in a notepad and save it as a .vbs file. Either run it from command prompt or run it by double-clicking on it.
VBScript Code - Reverse a string
x=inputbox("Enter the string to reverse!")
Msgbox "Reverse of String " & x & " is " & StrReverse(x)