字符串处理

Question

1. 是不是访问字符串中的某个字符只能用 mid 函数呢,好像分析时效率很低吧?
能不能像访问数组一样地来访问字符串呢?2. 怎样修改一个字符串中间的几个字符呢?
比如
str1="1234567"
我想结果为str1="1abc34567"(即把第二个字符改为"abc"),该怎么办呢?
(replace要替换所有的,而且要重新搜索一遍,效率很低,好像不恰当)
如果需要结果为 str1="12567"呢(即删除掉"34")

Answer 1

Option ExplicitPrivate Sub Form_Load()
    Dim s As String
    s = "fdsafdsafdsafdsa"
    Dim a() As Byte
    a = StrConv(s, vbFromUnicode)
    Dim i As Integer
    For i = LBound(a) To UBound(a)
        Debug.Print Chr(a(i))
    Next i
End Sub看看就知道了

Answer 2

2、
replace("1234567","2","abc")
replace("1234567","34","")

Answer 3

谢谢大家,我决定还是用replace
原来这个函数并不像我开始以为的那么死板,
它可以指定开始位置,可以指定替换的个数
因此,它可以满足我的要求