|
Esta funcion devuelve True si el dato es numerico y false si es NADA ó no numerico.
Tienes que leer una cadena, y validarla con este algoritmo
Bucle...
Bucle ...
leercadena StrNumero
While not isnumeric(strnumero)
leercadena StrNumero
wend
Fin Bucle
Fin bucle
Espero haberte servido de ayuda
Un Saludo
Jorge
|