首页 > 学院 > 开发设计 > 正文

清除字符串中指定的字符

2019-11-18 17:51:30
字体:
来源:转载
供稿:网友
该函数在字符串s中清除Search(注意:如果s为AAABBB,Search为AB。如何?):
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

007快速交换整数
可用以下的代码快速交换两个整数(Interger):
a=axorb
b=axorb
a=axorb->


发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表