读书人

怎么获取TEXT1里面某两个字符中间滴字

发布时间: 2013-01-09 09:38:16 作者: rapoo

如何获取TEXT1里面某两个字符中间滴字显示到TETX2中?
比如TEXT里有

sfds <strong>WWWW</strong>;sac
sfds <strong>WWWW</strong>;sssaasfds
<strong>WWWW</strong>;sac
sfds <strong>WWWW</strong>;sac
sf
ds <strong>WWWW</strong>;sac
sf
ds <strong>WWWW</strong>c
sfds <strong>WWWW</strong>;sac
sf
ds <strong>WWWW</strong>;sac


如何获取<strong>WWWW</strong>中间的WWW并自动在WWW两边加上括号??

[解决办法]
'这样试试:
text1.text=replace(text1.text,"<strong>","(")
text1.text=replace(text1.text,"</strong>",")")

[解决办法]
使用传说中的正则表达式,请sysxxxx出马
[解决办法]
instr()
mid()
去截取

或正则表达式截取。

[解决办法]
p1=0
p2=0
p1=instr(p2+1,s,"<strong>")
p2=instr(p1+1,s,"</strong>")

if p2>p1 then
text2=mid(s,p1+8,p2-p1-8)
end if

读书人网 >VB

热点推荐