移除字串中不要的字符

参数: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")->

 如果您对本文有任何疑问或者建议，请到讨论区发表您的意见: >> 论坛入口 <<

上一篇：VisualBasic实现某一天的下/上一个星期几是那一天   下一篇：通往Internet的捷径---捷径档的结构

【文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【我要投稿】 【论坛讨论】