SoloCodigo

gracias me sido de ran ayuda el codigo

bueno esta es otra manera de hacerlo y creo q es un poco más facil; bueno para mi lo es.....

[CODE]
'8 codigo ascii de la tecla backspace
'función asc convierte el caracter a su codigo ascii
If (Asc(e.keychar) <> 8) Then
     If (e.keychar < "0"  0r  e.keychar > "9") Then
            MsgBox("ingrese solo números")
      End If
End If

tengo q hacer un proyecto sobre el Manejo de cadenas. ( NO UTILIZAR LAS FUNCIONES PREDEFINIDAS DE CADENAS, LEN, LEFT, MID, RIGHT ETC.)la verdad no se hacerlo sin eso me dijeron q con pero no se hacerlo.
segunda.
1.Hacer una función que reciba una cadena y devuelva 0 si NO ES un palíndromo, y 1 si sí lo es. Recuerda una cadena es un palíndromo si se lee igual de izquierda a derecha que de derecha a izquierda. Por ejemplo: “aabbcceccbbaa”
2.Leer tres cadenas y visualizarlas en orden alfabético. Incluir en este ejercicio una función que reciba dos cadenas y devuelva: 0 si son iguales, 1 si la primera es menor que la segunda y 2 si la primera es mayor que la segunda.
3.Programa que lea de teclado una cadena y visualice el número de mayúsculas, el número de minúsculas, el número de dígitos y el número de vocales que la componen.

ENTRE OTRAS PERO NECESITA SABER COMO HACERLO PARA ASI PODER HACER LOS DEMAS. HELP ME PLEASE