これでStartTagとEndTagに囲まれた文字列をarrayに入れたいんですが、
うまくいきません。
どこがおかしいのでしょうか？

Dim r As New System.Text.RegularExpressions.Regex( _
StartTag & "(.*?)" & EndTag)

'TextBox1.Text内で正規表現と一致する対象をすべて検索
Dim mc As System.Text.RegularExpressions.MatchCollection = r.Matches(src.ToString)

Dim array As New ArrayList
Dim i As Integer = 0
For Each m As System.Text.RegularExpressions.Match In mc
array.Add(m.Groups(2).Value)
i += 1
Next

If array.Count = 0 Then
array.Add(String.Empty)
End If

Return array