sol8-4.vbs

来自「Apress - Managing Enterprise Systems Wit」· VBS 代码 · 共 8 行

VBS
8
字号
Dim objRegExp, strName

Set objRegExp = New RegExp
 objRegExp.IgnoreCase = True
 objRegExp.Pattern = "^(\d{1,2})\/(\d{1,2})\/(\d{2,4})$" 

 Wscript.Echo objRegExp.Replace("5/3/2000","$2/$1/$3")

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?