Fast string comparison
Hi Robert,
Am Sun, 17 May 2015 01:53:18 -0700 schrieb Robert Crandal:
"AAA" = "aaa" ' True!
why do you want to compare the strings? Do you want to sort them?
If so and you have stored your strings in varOut (1D Array) then try:
For n = UBound(varOut) - 1 To LBound(varOut) Step -1
For i = LBound(varOut) To n
If varOut(i) varOut(i + 1) Then
strTemp = varOut(i)
varOut(i) = varOut(i + 1)
varOut(i + 1) = strTemp
End If
Next i
Next n
For i = LBound(varOut) To UBound(varOut)
Debug.Print varOut(i)
Next
Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional
|