'模仿C# string.Format()
'没有设置数量的判断,使用时自己判断好{n}
'例:正常写作 "hello " & str,可以用此函数写作StringFormat("hello {0}",str)
'By Gao Dawei,2020-10-09
Function StringFormat(ByVal str As String, ParamArray arr_replace_with() As Variant)
Dim item As Variant
Dim n As Long, n_source As String
Dim result As String
result = str
For Each item In arr_replace_with
n_source = "{" & n & "}"
result = Replace(result, n_source, item)
n = n + 1
Next
StringFormat = result
End Function
【VBA】字符串连接,模仿C# string.Format
最新推荐文章于 2024-06-24 09:41:08 发布