7,763
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
verybelial 2003-03-01
- 打赏
- 举报
呵呵呵
slbluefox 2003-03-01
- 打赏
- 举报
不好意思，我没说清楚，里面还有可能包含除了英文字符，数字，还有可能其他的字符，比如：-，=、，？，#，￥，《》.....,判断ASCII码，好像不行。
fbmsf 2003-03-01
- 打赏
- 举报
to ; slbluefox(石头)
可以的，不知道你试 我的程序没有？我的代码，就是只认，a-z,A-Z,0-9的字符，其他的错
可以的，不知道你试 我的程序没有？我的代码，就是只认，a-z,A-Z,0-9的字符，其他的错
northwolves 2003-02-28
- 打赏
- 举报
先设置合法字符的ASCII范围。
用户 昵称 2003-02-28
- 打赏
- 举报
汉字ascii码小于0
标准ascii字符集为0-127
扩展的ascii字符集为0-255，所以用mid函数得到128-255之间的就可能是半个汉字。
标准ascii字符集为0-127
扩展的ascii字符集为0-255，所以用mid函数得到128-255之间的就可能是半个汉字。
fbmsf 2003-02-28
- 打赏
- 举报
dim a as string
a="sdfdf施肥"
for i=1 to lenb(a)
select case ascb(midb(a,i,1))
case ascb("a") to ascb("z")
case ascb("A") to ascb("Z")
case ascb("0") to ascb("9")
else case
call msgbox("wrong")
exit for
end select
next
a="sdfdf施肥"
for i=1 to lenb(a)
select case ascb(midb(a,i,1))
case ascb("a") to ascb("z")
case ascb("A") to ascb("Z")
case ascb("0") to ascb("9")
else case
call msgbox("wrong")
exit for
end select
next
verybelial 2003-02-28
- 打赏
- 举报
具体点啊。
fbmsf 2003-02-28
- 打赏
- 举报
反过来算了，看他是不是有效的字符。也是看asc码
verybelial 2003-02-28
- 打赏
- 举报
正在关注哦
verybelial 2003-02-28
- 打赏
- 举报
还没人答出吗？
slbluefox 2003-02-28
- 打赏
- 举报
不行啊，那也是有ASCII码啊？
outer2000 2003-02-28
- 打赏
- 举报
判断ASCII码啊
verybelial 2003-02-28
- 打赏
- 举报
没考虑过的问题，唔，学习。
