VB正则表达式问题
发布网友
发布时间:2022-04-29 10:13
我来回答
共1个回答
热心网友
时间:2022-06-26 00:55
版本2
。大会彗星正则表达式类,开放
。程序设置变量表达式,反对
。子程序_初始化,基于这个类的对象创建之后,当,则此方法将被自动调用
。局部变量的脚本对象,该对象
。局部变量RET,变
脚本对象。创建(“MSScriptControl.ScriptControl”)
Script对象。写性能(“语言”,“VBSCRIPT”)
脚本对象。数值计算方法(“AddCode”,“功能GetRegExp()”+#+换行“设置GetRegExp =新的正则表达式”+#换行符+“端功能”)
RET =脚本对象。一般方法(“评估和演示”,“GetRegExp()”)
表达=沤。服用对象() - 欧洲。子程序_破坏,当基于类的对象的前方被破坏时,该方法将被自动调用
。子程序取表达式对象,对象,开放,GetRegExp
收益率(表达) - 中东。子程序准备,逻辑型,打开并查看正则表达式进行初始化。有限公司返回(否定(表达式,无论是空的())) - 欧洲。子程序模式,基于文本的,开放的,设置或返回搜索正则表达式模式。
。参数属性值来写,文本类型,空,空白被搜索正则表达式的字符串读取。
。如果真(是否为空(想写的属性值))有限公司返回(表情读出文本属性(“模式”,))
。如果你真的完飞往表现风格。写性能(“模式”,想写的属性值)有限公司返回(字符(0)) - 欧洲。子程序忽略的情况下,逻辑型,开放设置或返回一个逻辑值,指明模式搜索是区分大小写的。
。参数属性值来写,逻辑型,空,空白被读取,不能写入空白,如果成功返回。有限公司返回(选择(无论是空(写入属性值),表达逻辑读取属性(“IGNORECASE”),则表达式。写的属性(“IGNORECASE”,想写的属性值)) ) - 亚洲。子程序全局匹配,逻辑型,开放设置或返回一个逻辑值,指示当整个搜索字符串模式匹配的全部或只匹配第一个。
。参数属性值来写,逻辑型,空,空白被读取,不能写入空白,如果成功返回。有限公司返回(选择(无论是空(写入属性值),表达逻辑读取属性(“环球”),则表达式。写的属性(“环球”,想写的属性值)) ) - 亚洲。子程序匹配多行,逻辑型,开放式,设置或返回匹配多行。
。参数属性值来写,逻辑型,空有限公司返回(选择(无论是空(写入属性值),表达逻辑读取属性(“多行”),表达写性能( “多行”,希望写的属性值))) - 欧洲。子程序的执行,对象,开放的,进行相应的正则表达式搜索字符串。
。参数想搜索的文本,文本类型,在其上执行正则表达式的文本字符串。有限公司返回(表达。对象类型的方法(“执行”,希望成为搜索的文本)) - 欧洲。常规搜索,逻辑型,开放式,并执行指定字符串的正则表达式搜索,并返回一个布尔值指示是否找到匹配的模式。
。参数想搜索的文本,文本类型,执行正则表达式搜索文本字符串。有限公司返回(表达。逻辑方法(“测试”,想成为可搜索的文本)) - 欧洲。基于文本的子程序代替,公开,正则表达式搜索找到的文本。
。参数要通过文本,文本类型所取代,该文本将通过一个字符串
所取代。参数被用作替换文本,文本类型,空,用作替换文本有限公司返回(表达式。文字法(“替换”,希望文本替换,用于替换文本))
BR>。子程序GetRegExp,对象,开放的,以表达对象有限公司返回(表情)