[已解决]求高手给个判断是否包含指定字母的正则

king8462 · 发表于 2017-5-23 11:08:42

本帖最后由 king8462 于 2017-5-23 14:59 编辑

$result变量包含1-3个字母，字母为ABCD中的任意一个且位置不固定（比如BC，DA，CBA，ACD，C等）。需要判断是否包含“A”，“B”，“C”，“D”中的任意一个并返回结果。

求高手写个正则代码，谢谢！

cfwyy · 发表于 2017-5-23 11:18:29

[ABCD]{1,3}

king8462 · 发表于 2017-5-23 11:21:10

cfwyy 发表于 2017-5-23 11:18

楼上给的看不懂。

zghwelcome · 发表于 2017-5-23 14:32:34

Local $result = 'ACXYZSDEFZ'
Local $sChk = 'ABCD'
$sReg = StringRegExpReplace($result, '[' & StringRegExpReplace($result, '[' & $sChk & ']+', "") & ']+', "")
MsgBox(512,"","包含字符：" & $sReg)

king8462 · 发表于 2017-5-23 14:58:09

回复 4# zghwelcome

谢谢楼上！

zghwelcome · 发表于 2017-5-23 15:28:36

回复 5# king8462
之前的好像写复杂了

Local $result = 'ACXYZSDEFZ'
Local $sChk = 'ABCD'
$sReg = StringRegExpReplace($result,'[^' &$sChk&']',"")
MsgBox(512,"","包含字符：" & $sReg)

king8462 · 发表于 2017-5-23 21:17:59

回复 6# zghwelcome

能不能再帮忙写个：

$result变量包含1-3个字母，字母为ABCD中的任意一个且位置不固定（比如BC，DA，CBA，ACD，C等）。需要返回“A”，“B”，“C”，“D”中不包含的：比如$result=DC 则返回AB ；$result=A则返回BCD。谢谢！

afan · 发表于 2017-5-24 14:24:31

回复 7# king8462

Local $result = 'BC'
;~ Local $result = 'DA'
;~ Local $result = 'CBA'        ;ACD，C
MsgBox(0, $result, _NoSz($result))

Func _NoSz($str, $sPc = 'ABCD')
        Return StringRegExpReplace($sPc, '[' & $str & ']', '')
EndFunc   ;==>_NoSz

king8462 · 发表于 2017-5-24 15:01:49

回复 8# afan

拜谢A版，正则太强大。

		自动登录	找回密码
密码			加入

[AU3基础] [已解决]求高手给个判断是否包含指定字母的正则

相关帖子

评分