AutoCAD 3DMAX C语言 Pro/E UG JAVA编程 PHP编程 Maya动画 Matlab应用 Android
Photoshop Word Excel flash VB编程 VC编程 Coreldraw SolidWorks A Designer Unity3D
 首页 > VB编程

移除字串中不要的字符

51自学网 2016-08-19 http://www.51zixue.net
参数 : 1:要检查的字串 [准备移除其中某些字符]
2:要移除的字符 (数字/中英文)

程序码
Function StringCleaner(s As String, Search As String) As String
Dim i As Integer, res As String
res = s
Do While InStr(res, Search)
i = InStr(res, Search)
res = Left(res, i - 1) & Mid(res, i + 1)
Loop
StringCleaner = res
End Function

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

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

 

 

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