03/06/2010, 01:40
|
| | | Fecha de Ingreso: mayo-2010 Ubicación: Chile
Mensajes: 31
Antigüedad: 14 años, 8 meses Puntos: 0 | |
Respuesta: decir si un carácter es vocal, consonante, número o signo de puntuación se puede simplificar aun mas ...
numeros="01234567890"
vocales="AEIOU"
consonantes="BCDFGHJKLMNPQRSTVWXYZ"
signos=",.:;"
Caracter=Ucase(Caracter)
if (Instr(numeros,Caracter) <> 0) then msgbox "numero"
if (Instr(vocales,Caracter) <> 0) then msgbox "vocal"
if (Instr(consonantes,Caracter) <> 0) then msgbox "consonante"
if (Instr(signos,Caracter) <> 0) then msgbox "signos"
pd: como le hacen para meter el codigo en esos frames con lineas y todo ?
Última edición por donyoyo; 03/06/2010 a las 01:47 |