Local $Str = _
' 3CBA938BD52F9310787775F103C9E95A6B48FC23DFEC6ADA3F3827F80BF2EA4C' & @CRLF & _
' 9E52F931FF00BF5F3FEEB55BE819E5DC1CB94BE4C33FFE76F8FF0075A6B38FC2' & @CRLF & _
' 3DFEC6ADA3F3803D02FCB9CE7CA5F2631190EEDBE47FF4B4FF00018E5D4360F2' & @CRLF & _
' 97C98E47F875F3FEEB4D671FF8E26ADA3F380DF40BF2E3BF94AE4C7C96EBE7FD ' & @CRLF & _
' D683D031CB9839F299C9891C3BBAF98FFF0055A6B38FC226AD87CE0BFE033CBA' & @CRLF
MsgBox(0, '原字符串', $Str)
Local $Test = StringRegExpReplace($str, '\h*(\H+)\h*(?=\r)', "'$1' & _")
MsgBox(0, '替换结果', $Test)
|