Dim i%For i = 1 To Len(Text1.Text) MsgBox Asc(Mid(Text1.Text, i, 1))Next''''asc值在0-255为标准ascii字符你查查msdn可以找到英文字母的ascii值，当返回的值是5位数，则肯定不是英文字符，但有可能是日韩或其他非英语的语言字符，不知道能判断不是英文字符是不是就够了
加入时间：2001-2-22阅读次数：83
Copyright ＠ 2007-2012 敏韬网(敏而好学，文韬武略--MinTao.Net)（学习笔记） Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长：MinTao ICP备案号：鄂ICP备11006601号-18
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
