FoxPro/Visual FoxPro - Como quito los números en una cadena de caracteres

   
Vista:

Como quito los números en una cadena de caracteres

Publicado por jarod (1 intervención) el 24/04/2008 04:19:01
¿Como quito los números en una cadena de caracteres (letras,simbolos y numeros )en foxpro?
por ejemplo tengo una cadena "6fd4j%k(r3"
quiero dejarla "fdj%k(r"
que filtro aplico???
Gracias por sus respuestas
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como quito los números en una cadena de caracte

Publicado por rCIARDO (153 intervenciones) el 24/04/2008 11:35:46
LOCAL lcCadena, lcChar,lnInd, lcCadenaSalida
lcCadena= "6fd4j%k(r3"
lcChar = ""
lnInd = 0
lcCadenaSalida = ""
FOR lnInd = 1 TO LEN(ALLTRIM(lcCadena)
lcChar = SUBSTR(lcCadena,lnInd,1)
IF ISALPHA(lcChar)
lcCadenaSalida = lcCadenaSalida + lcChar
ENDIF
*!* O PUEDES USAR

*!* IF !ISDIGIT(lcChar)
*!* lcCadenaSalida = lcCadenaSalida + lcChar
*!* ENDIF

next

RETUR lcCadenaSalida
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Mauricio Gonzalez

Como quito los números en una cadena de caracte

Publicado por Mauricio Gonzalez (1368 intervenciones) el 24/04/2008 16:49:29
*--- Eliminar numeros de una cadena
PUBLIC cadena, nuevo, caracter
cadena = '6fd4j%k(r3'
STORE '' TO caracter, nuevo
FOR I = 1 TO LEN(ALLT(cadena))
caracter = SUBSTR(cadena,I,1)
IF !ISDIGIT(caracter)
nuevo = nuevo + caracter
ENDIF
ENDFOR

Espero te sirva!!!!!! Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como quito los números en una cadena de caracte

Publicado por enrique (1041 intervenciones) el 24/04/2008 20:13:08
cadena = '6fd4j%k(r3'
for i=1 to 10
cadena = strtran(cadena,allt(str(i-1)),"")
endfor
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar