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