這個正則表達式怎麼寫

Relta 2004-12-23 05:07:17
Dim mc As MatchCollection
Dim r As New Regex("<ab>.*</ab>", RegexOptions.Compiled)
mc = r.Matches("<ab>.....</ab><ab>...</ab><ab>.........</ab>")
Dim i As Integer
MsgBox(mc.Item(0).Value)

'上面代碼中的....表示一些不規則的字串
'我的顯示結果是:"<ab>.....</ab><ab>...</ab><ab>.........</ab>"
'我實際需要的結果:<ab>.....</ab>
這個表達式該如何寫呢?
...全文
184 12 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
Relta 2004-12-24
  • 打赏
  • 举报
回复
急啊!
Relta 2004-12-24
  • 打赏
  • 举报
回复
up
Relta 2004-12-24
  • 打赏
  • 举报
回复
'這樣就不可以了

Dim str1 As String = "<C1DataColumn>?[^<C1DataColumn>]*</C1DataColumn>"
Dim str2 As String = "<C1DataColumn> Level=""0"" Caption=""USERID"" DataField=""USERID""><ValueItems /><GroupInfo /></C1DataColumn><C1DataColumn> Level=""0"" Caption=""USERNAME"" DataField=""USERNAME""><ValueItems /><GroupInfo /></C1DataColumn><C1DataColumn> Level=""0"" Caption=""PASSWORD"" DataField=""PASSWORD""><ValueItems /><GroupInfo /></C1DataColumn>"
Dim r As New Regex(str1)
Dim mc As MatchCollection = r.Matches(str2)
Dim m As Match = r.Match(str2)
Dim i As Integer = 0
'MsgBox(mc.Count)
For Each m In mc
MsgBox(mc.Item(i).Value)
i += 1
Next

landlordh 2004-12-24
  • 打赏
  • 举报
回复
对呀,这样更好,我想得太多了,让紧跟其后是</..>就行了,

呵呵,长一智
saucer 2004-12-24
  • 打赏
  • 举报
回复
try

"<ab>.*?</ab>"
landlordh 2004-12-24
  • 打赏
  • 举报
回复
<C1DataColumn>.*?[^<C1DataColumn>].*?</C1DataColumn>
landlordh 2004-12-23
  • 打赏
  • 举报
回复
改进一下:
Dim str1 As String = "<ab>?[^<ab>]*</ab>"
Dim str2 As String = "<ab>.....</ab><ab>...</ab><ab>.........</ab>"
Dim r As New Regex(str1)
Dim mc As MatchCollection = r.Matches(str2)
Dim m As Match = r.Match(str2)
Dim i As Integer = 0
For Each m In mc
MsgBox(mc.Item(i).Value)
i += 1
Next
landlordh 2004-12-23
  • 打赏
  • 举报
回复
:
Dim mc As MatchCollection
Dim r As New Regex("<ab>?[^<ab>]*</ab>", RegexOptions.Singleline)
mc = r.Matches("<ab>.....</ab><ab>...</ab><ab>.........</ab>")
Dim i As Integer
Dim m As Match = r.Match("<ab>.....</ab><ab>...</ab><ab>.........</ab>")

MsgBox(mc.Item(0).Value)
Relta 2004-12-23
  • 打赏
  • 举报
回复
up
E0888 2004-12-23
  • 打赏
  • 举报
回复
推荐一个C#群:6613147,欢迎热心的C#爱好者加入(注:为保持群活力,对潜水者,将不定期删除。)
Relta 2004-12-23
  • 打赏
  • 举报
回复
現在:mc.count顯示為1,我想要的結果應該是3
haoztao 2004-12-23
  • 打赏
  • 举报
回复
<ab>.*</ab>这个表达式是正确,是不是matches的问题?我正则表达式也是刚会用,呵呵。

16,722

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧