读书人

怎么过滤除英文字母、上划线和数字以外

发布时间: 2013-01-27 13:55:24 作者: rapoo

如何过滤除英文字母、下划线和数字以外的字符???
原字符串:abc123你好!

滤除后符串:abc123
[解决办法]
本帖最后由 bcrun 于 2012-12-29 19:37:58 编辑

function getit(s as string ) as string
dim c as string
dim i as long
for i=1 to len(s)
c=mid(s,i,1)
select case c
case "A" to "Z","a" to "z","0" to "9"
getit=getit & c
end select
next
end function

[解决办法]
正则表达式。regexp.Replace("abc123你好!", "[!a-zA-Z0-9]", "")

读书人网 >VB

热点推荐