Monday 1 December 2014

Reverse String VBA

Sub ReverseString()

Dim revstring As String

revstring = InputBox("Enter your name :")

MsgBox (" Reverse name  : " & StrReverse(revstring))

End Sub

No comments:

Post a Comment