Skip to content

Instantly share code, notes, and snippets.

@asynxc

asynxc/rtcStrReverse

Created September 28, 2016 21:02
Show Gist options
  • Save asynxc/2b8e901202394c7cfaac3f032bd4aa80 to your computer and use it in GitHub Desktop.
Save asynxc/2b8e901202394c7cfaac3f032bd4aa80 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
rtcStrReverse
'StrReverse() Alternative function
'MSVBVM60.rtcStrReverse
Public Declare Function rtcStrReverse Lib "MSVBVM60" (ByVal sStr As String) As String
Public Function Alternative_StrReverse(ByVal sStr As String) As String
Alternative_StrReverse = StrConv(rtcStrReverse(StrConv(sStr, vbUnicode)), vbFromUnicode)
End Function
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment