WEB开发网
开发学院软件开发VB 移除字串中不要的字符 阅读

移除字串中不要的字符

 2006-02-27 21:10:21 来源:WEB开发网   
核心提示:参数:1:要检查的字串[准备移除其中某些字符]2:要移除的字符(数字/中英文)程序码FunctionStringCleaner(sAsString,SearchAsString)AsStringDimiAsInteger,resAsStringres=sDoWhileInStr(res,Search)i=InStr(r
参数:1:要检查的字串[准备移除其中某些字符]
2:要移除的字符(数字/中英文)

程序码
FunctionStringCleaner(sAsString,SearchAsString)AsString
DimiAsInteger,resAsString
res=s
DoWhileInStr(res,Search)
i=InStr(res,Search)
res=Left(res,i-1)&Mid(res,i 1)
Loop
StringCleaner=res
EndFunction

返回值移除某些字符后的字串

实例:
我想移除Text1中的字符"A"
Text1=StringCleaner(Text1,"A")->

Tags:不要 字符

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接