% Functioncutbadchar(str) badstr=不|文|明|字|符|列|表|格|式此处填写不文明的词语,用|分开 badword=split(badstr,|) Fori=0toUbound(badword) Ifinstr(str,badword(i))0then str=Replace(str,badword(i),***) EndIf
% Functioncutbadchar(str) badstr=不|文|明|字|符|列|表|格|式此处填写不文明的词语,用|分开 badword=split(badstr,|) Fori=0toUbound(badword) Ifinstr(str,badword(i))0then str=Replace(str,badword(i),***) EndIf Next cutbadchar=str EndFunction %
-
发表于 2020-12-18 08:08
- 阅读 ( 239 )
- 分类:互联网