网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

VBS中RegExp对象的用法-创新互联

这篇文章主要讲解了“VBS中RegExp对象的用法”,文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习“VBS中RegExp对象的用法”吧!

目前创新互联已为近1000家的企业提供了网站建设、域名、虚拟主机成都网站托管、企业网站设计、香坊网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。


下面的代码说明了RegExp对象的用法:

Function RegExpTest(patrn, strng)
 Dim regEx, Match, Matches   ' 建立变量。
 Set regEx = New RegExp     ' 建立正则表达式。
 regEx.Pattern = patrn     ' 设置模式。
 regEx.IgnoreCase = True     ' 设置是否区分字符大小写。
 regEx.Global = True     ' 设置全局可用性。
 Set Matches = regEx.Execute(strng)  ' 执行搜索。
 For Each Match in Matches   ' 遍历匹配集合。
  RetStr = RetStr & "Match found at position "
  RetStr = RetStr & Match.FirstIndex & ". Match Value is '"
  RetStr = RetStr & Match.Value & "'." & vbCRLF
 Next
 RegExpTest = RetStr
End Function
MsgBox(RegExpTest("is.", "IS1 is2 IS3 is4"))

RegExp对象在VBScript中提供正则表达式支持功能,该对象有3个属性和3个方法。

1)Execute方法

该方法用于对指定正则表达式进行匹配检测,其值返回一个Matches集合,其中包含了所有检测到匹配的Match对象。如果没有检测到任何匹配则返回一个空的Matches集合。

语法格式:regexp.Execute(string)
其中,regexp为RegExp对象的变量名称;string为要进行匹配检测的有效字符串表达式。

2)Replace方法

调用Replace方法时,如果在指定字符串中找到与指定正则表达式相匹配的字符(串),则用指定的其他字符(串)进行替换。该方法的返回值为替换以后的字符串表达式。

语法格式:regexp.Replace(string1,string2)
其中,regexp为RegExp对象的变量名称;string1为要被检测并替换的字符串表达式;string2为用于替换的字符串表达式。

sub window_onLoad()
  dim str,regexp
dim msgstr
str="How are you"

msgstr="替换前:"&str&""
'//创建RegExp对象
set regexp=new RegExp
'//设置正则表达式

regexp.Pattern="o."
'//设置是否替换所有匹配
regexp.Global=True
document.write msgstr
'//替换操作

msgstr=regexp.Replace(str,"test")
msgstr="替换后:"&msgstr
document.write msgstr
end sub

3)Test方法

该方法的作用是判断指定的字符串中是否有与指定的正则表达式相匹配的内容。如果有,则返回Ture;否则返回False。同Replace方法类似,调用该法时,正则表达式是由Pattern属性指定的。二者不同在于,Global属性的设置对该方法没有影响。

sub window_onLoad()
  dim str,regexp
dim blvar
str="This is a test"

'//创建RegExp对象
set regexp=new RegExp
'//设置正则表达式
regexp.Pattern=".s"

'//调用Test方法
blvar=regexp.Test(str)
if blvar then
 document.write "在"&str&"中找到了与"®exp.pattern&"相匹配的内容"

else
 document.write "没有找到匹配内容"  
end if
end sub

感谢各位的阅读,以上就是“VBS中RegExp对象的用法”的内容了,经过本文的学习后,相信大家对VBS中RegExp对象的用法这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是创新互联网站建设公司,,小编将为大家推送更多相关知识点的文章,欢迎关注!


网站栏目:VBS中RegExp对象的用法-创新互联
浏览路径:http://bjjierui.cn/article/ddcgco.html

其他资讯