移除字串中不要的字符

文章： | | | | | | | | | |

您当前的位置：中国IT资源网 -> 文章 -> 软件开发 -> VB -> 文章内容

　移除字串中不要的字符

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

【评论】【打印】【大中小】【关闭】

通往 Internet 的捷径---捷径档的结构

Visual Basic 实现某一天的下/上一个星期几是那一天




关于本站 - 网站帮助 - 广告合作 - 下载声明 - 友情连接 - 网站地图 - 在线投稿中国IT资源网版权所有 Copyright © 2002-2006 Gz235.Com All Rights Reserved 中华人民共和国电信与信息服务业务经营许可证编号粤ICP备05022918号本站在线服务QQ：105754049 程序定制：105754049 广告受理/投搞/投诉：105754049 本站所提供的程序均来自于 Internet(下载后首先检测是否有毒),仅供学习使用。因其产生的一切问题本站不负任何责任