用规则表达式怎么表示下列string

PrinceT 2003-08-21 07:04:32
<TD ALIGN=center>297</TD>
<TD ALIGN=center><font color=#FF0000>[+1]</TD>

<TD ALIGN=center>([^<]+)</TD>
<TD ALIGN=center>><font color=#FF0000>([^<]+)</TD>

怎么才能用一个规则表达式描述出这两种情况
或者说查找下一个"</TD>",而不是仅仅是"<"
...全文
26 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
PrinceT 2003-09-01
  • 打赏
  • 举报
回复
again
PrinceT 2003-08-29
  • 打赏
  • 举报
回复
不对,这样match的是最后一个</td>之前的所有内容。
percyboy 2003-08-28
  • 打赏
  • 举报
回复
你想匹配什么? 是 <td></td> 中间的内容吗?

\<td ALIGN=center\>((.|\n)+)\</td\>
PrinceT 2003-08-27
  • 打赏
  • 举报
回复
ask one more time
PrinceT 2003-08-26
  • 打赏
  • 举报
回复
who knows?
PrinceT 2003-08-22
  • 打赏
  • 举报
回复
就是说用一条规则表达式 既能表达出
<TD ALIGN=center>297</TD>
也能表达出
<TD ALIGN=center><font color=#FF0000>[+1]</TD>
jornet 2003-08-22
  • 打赏
  • 举报
回复
用instr函数,
功能是查找子串匹配的位置,如果没有就返回0
yijiansong 2003-08-22
  • 打赏
  • 举报
回复
没明白意思!
PrinceT 2003-08-22
  • 打赏
  • 举报
回复
他不是两行,而是可能交替出现,我是要把交替出现的全部用规则表达式概括出来。
danielinbiti 2003-08-21
  • 打赏
  • 举报
回复
可以以行行读入,一行的处理方法如下
才两个符号,做个标记就成了
Private Sub Command4_Click()
Dim i As Integer
Dim str1 As String
Dim temp As String
Dim start_pos As Integer
Dim isx As Integer
isx = 1
str1 = "<TD ALIGN=center>297</TD>"
start_pos = 1
For i = 1 To Len(str1)
temp = Mid(str1, i, 1)
If temp = "<" Then isx = 2: start_pos = i
If isx = 2 And temp = ">" Then
isx = 1
Print Mid(str1, start_pos, i)
End If
Next i
End Sub

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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