求帮忙写个正则

liuyq

不会正则，求大神帮忙。

Windows6.1-KB2491683-X86

想在这个种字符中取KBxxxxxxx的字符串。
字符串中的英文有大小写不同的问题。

afan

Local $sSource = 'Windows6.1-KB2491683-X86'
;~MsgBox(0, '源字符串', $sSource)
Local $aSRE = StringRegExp($sSource, '(?i)kb[^-]+', 1)
If Not @Error Then MsgBox(0, '匹配数量: ' & UBound($aSRE), '其中[0]元素为: ' & $aSRE[0])

liuyq

回复 2# afan
感谢版主。