Объект RegExp

Метасимволы

\n

Описание:

Символ новой строки. Эквивалент "\x0a" и "\cJ".

Пример:

Set objRegExp = CreateObject("VBScript.RegExp")
objRegExp.Global = True
Str = vbCrLf
objRegExp.Pattern = "\r\n"
Set objMatches = objRegExp.Execute(Str)
MsgBox objMatches.Count