FoxPro/Visual FoxPro - Arreglos

HHELLLLPPPPPPPP

Tengo un problema con asort () no se como se usa.... pogo asort (arreglo,1) y no hace nada....

no me ordena mi arreglo...

Grax mil.....

Este ejemplo viene en la ayuda, puedes revisar la sintaxis para comprender su funcionamiento:

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'Data estdata')
USE Customer && Abre la tabla Customer.

COUNT TO gnCount && Número de contactos.
DIMENSION gaContact(gnCount,1) && Crea una matriz de contactos.
COPY TO ARRAY gaContact FIELD contact && Llena la matriz.

CLEAR
? 'Nombres de contactos:'
?
FOR nCount = 1 TO 20
? gaContact(nCount) && Muestra los 20 primeros contactos.
ENDFOR
= ASORT(gaContact) && Ordena la matriz.

?
? 'Nombres de contactos ordenados:'
?
FOR nCount = 1 TO 20
? gaContact(nCount) && Muestra los 20 primeros contactos ordenados.
ENDFOR
*---
ASORT(NombreMatriz [, nElementoInicial [, nNúmeroOrdenado [, nOrden]]])

DIMENSION arreglo(6)
arreglo(1)=thisform.text1.Value
arreglo(2)=thisform.text2.Value
arreglo(3)=thisform.text3.Value

?'arreglo',arreglo(1)
?'arreglo',arreglo(2)
?'arreglo',arreglo(3)

ASORT (arreglo,1,1,1)

?'arreglo',arreglo(1)
?'arreglo',arreglo(2)
?'arreglo',arreglo(3)


no los ordenaaaaaa

prueba poniendo

arreglo(1)=alltrim(thisform.text1.value)
...
...
y
asort(arreglo)