关于正则表达式

[红衣老大]

Dim re As New System.Text.RegularExpressions.Regex(Rstr)
Dim mc As System.Text.RegularExpressions.MatchCollection = re.Matches(QText)

结果 mc.Count 只有1

但是用测试工具
结果应该有5个
.Matches 应该返回多个结果
.Match 是返回一个

我哪里用的不对？