Intervallo ASCII

[scottied]

Ho bisogno di una funzione che, semplificata, sia più o meno così:

if 0<=variabile<=9 then
'la variabile è un numero
elseif a<=variabile<=z then
la variabile è una lettera
else
errore
end if

So che puo' aiutarmi il codice ascii.. ma non ricordo la sintassi..

Grazie

[albis]

if asc(Variabile)>= 48 and asc(Variabile)<= 57 then
'numero
elseif asc(Variabile)>= 97 and asc(Variabile)<= 122 or if asc(Variabile)>= 65 and asc(Variabile)<= 90 then
'lettera
end if


solo che la variabile deve contenere solo un carattere

altrimenti per verificare se una variabile contiene un numero
if IsNumeric(Variabile) then

[Corwin]

if variabile >= "0" and variabile <= "9" then
'la variabile è un numero
elseif variabile >= "a" and variabile <="z" or variabile >= "A" and variabile <="Z"
'la variabile è una lettera
else
errore
end if

[scottied]

Originariamente inviato da albis
if asc(Variabile)>= 48 and asc(Variabile)<= 57 then
'numero
elseif asc(Variabile)>= 97 and asc(Variabile)<= 122 or if asc(Variabile)>= 65 and asc(Variabile)<= 90 then
'lettera
end if


solo che la variabile deve contenere solo un carattere

altrimenti per verificare se una variabile contiene un numero
if IsNumeric(Variabile) then

Sì la variabile contiene solo un carattere
Grazie