vb6有Replace替换字符的功能吗?

[ning1958]

Excel的VBA中Replace经常用,比较得以应手
=replace(a单元格,3,空格数,替换值）
在VB6中,主要用的是SPLIT
s = Split(str1, "aabb")
再通过S(0) & "ff" & s(1) 实现替换

请问
vb6有Replace替换字符的功能吗?

再请问各位大侠
VB6替换字符串有几种方法.谢谢.

[饮水需思源]

Replace函数


描述

返回一个字符串，该字符串中指定的子字符串已被替换成另一子字符串，并且替换发生的次数也是指定的。

语法

Replace(expression, find, replacewith[, start[, count[, compare]]])

Replace函数语法有如下几部分：

部分 描述
expression 必需的。字符串表达式，包含要替换的子字符串。
find 必需的。要搜索到的子字符串。
replacewith 必需的。用来替换的子字符串。
start 可选的。在表达式中子字符串搜索的开始位置。如果忽略，假定从1开始。
count 可选的。子字符串进行替换的次数。如果忽略，缺省值是 –1，它表明进行所有可能的替换。
compare 可选的。数字值，表示判别子字符串时所用的比较方式。关于其值，请参阅“设置值”部分。


设置值

compare参数的设置值如下：

常数 值 描述
vbUseCompareOption –1 使用Option Compare语句的设置值来执行比较。
vbBinaryCompare 0 执行二进制比较。
vbTextCompare 1 执行文字比较。
vbDatabaseCompare 2 仅用于Microsoft Access。基于您的数据库的信息执行比较。


返回值

Replace的返回值如下：

如果 Replace返回值
expression长度为零 零长度字符串("")。
expression为Null 一个错误。
find长度为零 expression的复本。
replacewith长度为零 expression的复本，其中删除了所有出现的find 的字符串。
start > Len(expression) 长度为零的字符串。
count is 0 expression.的复本。


说明

Replace函数的返回值是一个字符串，但是，其中从start所指定的位置开始，到expression字符串的结尾处的一段子字符串已经发生过替换动作。并不是原字符串从头到尾的一个复制。

[ldy888]

a = replace("111222111","1","0"）

结果 "000222000"

[ldy888]

a = Replace("111222111", "1", "0", 5, 2)

结果 "22001"

说明 从第5 个字符开始，只题换 两次

[chinaboyzyq]

VB6下replace函数
替换字符串的方式有很多种，看怎么方便怎么用吧。

[yachong]

VB6也有replace函数，不用split那么麻烦。

[wangzibo_tim]

有replace函数，可以替换掉字符串中指定部分

[chinaboyzyq]

[Quote=引用 4 楼 chinaboyzyq 的回复:]

替换字符串的方式有很多种，看怎么方便怎么用吧。
[/Quote]
给你一个例子：
Private Sub Command1_Click()
s = "aabbcc"
Mid(s, 3) = "gg"
MsgBox s

End Sub

[无·法]

恩 还可以用RegExp.replace

[guyehanxinlei]

友情接分!

[ACMAIN_CHM]

当然有！ 你在MSDN中搜索一下不就知道了？

[xuggzu]

肯定有！！！！！！！！！！！！！！