VBA：按字符分配字符串

Question

大多数人都会问如何从字符串中获取字符，这可以通过Mid（）来完成。我试图在VBA代码中按字符分配字符串。要分配的字符取决于某些计算结果。

我不想使用字符串连接来形成字符串。

我在网上搜索过，但是在我的2007 Access VBA中无法识别已发布的解决方案strName.Chars（i）（例如，在MS开发网络上）。 感谢

Answer 1

您也可以使用Mid来设置值。

Sub showMidExample()

    Dim s As String
    s = "aaaaa"

    Dim i As Integer
    For i = 1 To Len(s)
        Mid(s, i) = "n"
        Debug.Print s

    Next i

End Sub

打印出来

naaaa
nnaaa
nnnaa
nnnna
nnnnn

您正在寻找的是什么。

Answer 2

由于没有发布工作答案。我假设无法在VBA中完成，我必须使用连接来形成字符串，尽管在我的情况下这很麻烦。