Skip to content

Instantly share code, notes, and snippets.

@asynxc
Created September 28, 2016 21:06
Show Gist options
  • Save asynxc/31012d5b13eca10b344833ef5b662091 to your computer and use it in GitHub Desktop.
Save asynxc/31012d5b13eca10b344833ef5b662091 to your computer and use it in GitHub Desktop.
'Alternatime_Trim Function
'MSVBVM60.rtcTrimBstr
Private Declare Function rtcTrimBstr Lib "MSVBVM60" (ByVal ItemPtr As String) As String
Function Alternatime_Trim(ByVal StrItem As String) As String
Alternatime_Trim = StrConv(rtcTrimBstr(StrConv(StrItem, vbUnicode)), vbFromUnicode)
End Function
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment