已解决 如何用正则批量替换IF...Then... 中Then之前的内容？

Qokelate

If Not IsDeclared("ERROR_NO_MORE_ITEMS") Then Global Const $ERROR_NO_MORE_ITEMS = 259

把这种句型直接删除Then前的内容，比如上例替换后是Global Const $ERROR_NO_MORE_ITEMS = 259

答案见2楼和4楼

zch11230

正则我还很菜 只知道能达到效果 不知是否标准

$str = 'If Not IsDeclared("ERROR_NO_MORE_ITEMS") Then Global Const $ERROR_NO_MORE_ITEMS = 259'
MsgBox (0,0,StringRegExpReplace($str,'If.+Then (.+)','$1'))

lixiaolong

Local $Str = _
                'If Not IsDeclared("ERROR_NO_MORE_ITEMS") Then Global Const $ERROR_NO_MORE_ITEMS = 259' & @CRLF & _
                ' wwwwwwwwwwwwwww' & @CRLF & _
                'wwww' & @CRLF & _
                ' If Not IsDeclared("ERROR_NO_MORE_ITEMS") Then Global Const $ERROR_NO_MORE_ITEMS = 259' & @CRLF & _
                '        If Not IsDeclared("ERROR_NO_MORE_ITEMS") Then Global Const $ERROR_NO_MORE_ITEMS = 259' & @CRLF & _
                ' deeeeee' & @CRLF & _
                'If Not IsDeclared("ERROR_NO_MORE_ITEMS") Then Global Const $ERROR_NO_MORE_ITEMS = 259'
MsgBox(0, '原字符串', $Str)
Local $Test = StringRegExpReplace($str, '(?mi)^\s*if.+Then\s*(.+)', '\1')
MsgBox(0, '替换结果', $Test)