Textbox输入不同字符，如何判断其类型：
for i=0 to len(text1.text)
select case asc(i)
case asc(“0″) to asc(“9″) ‘数字
case asc(“A”) to asc(“z”) ‘字母
case <0 ‘汉字
case else
end select
next
select case asc(i)
case asc(“0″) to asc(“9″) ‘数字
case asc(“A”) to asc(“z”) ‘字母
case <0 ‘汉字
case else
end select
next
转载请注明 ：IT樵客
