本帖最后由 afan 于 2012-11-20 15:12 编辑 Local $Str = _
'节能产品惠民工程高效节能容积式空气压' & @CRLF & _
'缩机推广实施细则发布 节能压缩机概念' & @CRLF & _
'股 发表于 2012-11-20 14:20:04 ' & @CRLF & _
' 关于印发《节能产品惠民工程高效节能' & @CRLF & _
'容积式空气压缩 ...' & @CRLF & @CRLF & _
'小俞2009 ' & @CRLF & @CRLF & _
'粉色魔窟——与你同行' & @CRLF & @CRLF & _
'设置关注' & @CRLF & _
'清除信息' & @CRLF & _
'120/120' & @CRLF & _
'<11' & @CRLF & @CRLF & _
'-' & @CRLF & @CRLF & _
'20' & @CRLF & @CRLF & @CRLF & @CRLF & _
'14' & @CRLF & @CRLF & _
':' & @CRLF & @CRLF & _
'22>'
MsgBox(0, '原字符串', $Str)
Local $sRER = StringRegExpReplace($str, '\r\n(?!\r)', '')
Local $aSR1 = StringRegExp($sRER, '\V+', 3)
If Not @Error Then MsgBox(0, '分开取', '第一行:' & @TAB & $aSR1[0] & @CRLF & _
'第二行:' & @TAB & $aSR1[1] & @CRLF & _
'第三行:' & @TAB & $aSR1[2])
#include <Array.au3>
_ArrayDisplay($aSR1, '')
提醒下,解决了要加“已解决”,不是“解决”。 |