如何在VB脚本中为字符串添加特定字符？

Question

我有一个字符串2014.我想添加一个。 （点）第1个字后。所以结果将是2.014。

如何实现它？

Answer 1

试试这个：

' Assuming str = "2014"
Mid(str, 1, 1) & "." & Mid(str, 2)

Answer 2

一种选择是使用正则表达式：

Set re = New RegExp
re.Pattern = "^(\d)(\d+)"

s = "2014"
WScript.Echo re.Replace(s, "$1.$2")