![](/img/trans.png)
[英]Regex / Vim: Matching everything except a pattern, where pattern is multi-line?
[英]VBScript Regex: Match everything except multi-line pattern
有一个与我需要回答的问题非常相似的问题( Regex / Vim:匹配除模式以外的所有内容,其中模式是多行吗? ):我需要将以下Vim正则表达式转换为VBScript正则表达式:
:%s/\%(^end\n*\|\%^\)\zs\_.\{-}\ze\%(^begin\|\%$\)//
基本上,我需要做的是获取方法之前,之间和之后的所有文本(不包括方法中的代码)。 我已经有了一个VBScript正则表达式来获取方法和它们体内的代码,如下所示:
((?:(?:Public|Private)) (?:Sub|Function).+)\n(.*\n)*?End (?:Sub|Function)
以下是全局代码和方法代码的示例文本:
'-----------------------------------------------------------------------------------------
'
' the code: Header
'
'-----------------------------------------------------------------------------------------
Dim GLOBAL_VARIABLE_1
Dim GLOBAL_VARIABLE_2
Public Function doThis(byVal xml)
'' Created : dd/mm/yyyy
'' Return : string
'' Param : xml- an xml blob
return = replace(xml, "><", ">" & vbLf & "<")
GLOBAL_VARIABLE_1 = 2 + 2
doThis= return
End Function
msgbox GLOBAL_VARIABLE_1
Public Function doThat(byVal xPath)
'' Created : dd/mm/yyyy
'' Return : array
' 'Param : xPath
return = split(mid(xPath, 2), "/")
doThat = return
End Function
GLOBAL_VARIABLE_2 = 2 + 2
Public Function alsoDoThis(byRef obj)
'' Created : dd/mm/yyyy
'' Return : string
' 'Param : obj, an xml document object
For i = 0 To 4
return = return & "hi" & " "
Next
alsoDoThis = trim(return)
End Function
GLOBAL_VARIABLE_3 = 2 + 2
如何获取或翻转我拥有的VBscript正则表达式,或转换所需的Vim正则表达式,以便在方法级代码之前,之间或之后获取所有全局级代码(不包括方法声明和“结束子/功能”部分)?
删除所有过程和功能,剩下的就是您要寻找的东西。
text = "..."
Set re = New RegExp
re.Pattern = "((public|private)\s+)?(function|sub)[\s\S]+?end\s+(function|sub)"
re.Global = True
re.IgnoreCase = True
rest = re.Replace(text, "")
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.