移除字串中不要的字符

參數: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")->