<?xml version="1.0" standalone="yes"?>
<?xml-stylesheet type="text/xsl" href="css/rss.xslt"?>
<rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:trackback="http://madskills.com/public/xml/rss/module/trackback/" xmlns:wfw="http://wellformedweb.org/CommentAPI/" xmlns:slash="http://purl.org/rss/1.0/modules/slash/"><channel><title>林海波-增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><link>http://www.linhaibo.com/post/9.html</link><generator>RainbowSoft Studio Z-Blog 1.8 Walle Build 91204</generator><language>zh-CN</language><pubDate>Sun, 27 Mar 2011 02:12:26 +0800</pubDate><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author>5468840@qq.com (andyjin)</author><link>http://www.linhaibo.com/post/9.html#cmt1573</link><pubDate>Tue, 14 Mar 2017 15:50:35 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt1573</guid><description><![CDATA[请教了～～～～<br/>为什么总是显示   没有权限: 'CreateObject' <br/><br/>]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt23</link><pubDate>Wed, 23 Sep 2015 16:42:23 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt23</guid><description><![CDATA[<img src="http://www.linhaibo.com/image/face/Smile.gif" style="padding:2px;border:0;" width="48" title="Smile" alt="Smile" />要不，你把源码公开，看看哪里出问题了~~]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt22</link><pubDate>Mon, 14 Sep 2015 11:23:41 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt22</guid><description><![CDATA[<img src="http://www.linhaibo.com/image/face/Sleep.gif" style="padding:2px;border:0;" width="48" title="Sleep" alt="Sleep" /><br/>博主还打算修复Bug吗？<blockquote><div class="quote quote3"><div class="quote-title">linhaibo 于 2015-9-23 15:49:22 回复</div>当然修，不过最近很忙呐<img src="http://www.linhaibo.com/image/face/Cry.gif" style="padding:2px;border:0;" width="48" title="Cry" alt="Cry" /></div></blockquote>]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt21</link><pubDate>Fri, 11 Sep 2015 14:17:48 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt21</guid><description><![CDATA[<img src="http://www.linhaibo.com/image/face/Adore.gif" style="padding:2px;border:0;" width="48" title="Adore" alt="Adore" />]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt20</link><pubDate>Wed, 09 Sep 2015 18:21:54 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt20</guid><description><![CDATA[博主 在不在啊？]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt19</link><pubDate>Sat, 05 Sep 2015 19:10:10 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt19</guid><description><![CDATA[NewXing.RegExp.split(&quot;12345678abc&quot;, &quot;&quot; )<br/>发现此法可以分割每个字符到数组了，谢谢博主的努力改进！！<br/><img src="http://www.linhaibo.com/image/face/Haha.gif" style="padding:2px;border:0;" width="48" title="Haha" alt="Haha" />]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt18</link><pubDate>Sat, 05 Sep 2015 18:48:59 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt18</guid><description><![CDATA[估计是指针没处理好，野指针乱飞，导致随机出现崩溃现象~<br/><img src="http://www.linhaibo.com/image/face/Sad.gif" style="padding:2px;border:0;" width="48" title="Sad" alt="Sad" />]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt16</link><pubDate>Sat, 05 Sep 2015 18:11:46 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt16</guid><description><![CDATA[还是有崩溃的现象~<br/><img src="http://www.linhaibo.com/image/face/Hehe.gif" style="padding:2px;border:0;" width="48" title="Hehe" alt="Hehe" /><br/>就是用 9楼的代码，<br/>在调试模式 ，打开 本地窗口，察看 m 的 item1 的 value，居然是乱码。<br/>而正常的值 应该是  &quot;&quot; 。<br/><br/>然后，就崩掉了~<br/>excel2003 vba]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt15</link><pubDate>Sat, 05 Sep 2015 18:06:37 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt15</guid><description><![CDATA[m(0).Value 的  .Value  不能做为默认值省略不写，<br/>而 vb regexp5.5  是可以省略的。]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt14</link><pubDate>Sat, 05 Sep 2015 18:03:59 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt14</guid><description><![CDATA[Sub test2()<br/>    Dim reg, i&amp;, s$, m<br/>    s = &quot;aa cat 1234 ,hjy 889z&quot;<br/>    Set reg = CreateObject(&quot;newxing.regexp&quot;)<br/>    <br/>    reg.Pattern = &quot;(?=cat )&quot;<br/>    Set m = reg.Execute(s)<br/>    Debug.Print reg.Pattern, m(0).Value, m(0).FirstIndex, m(0).Length<br/>    <br/>    reg.Pattern = &quot;(?&lt;=cat )&quot;<br/>    Set m = reg.Execute(s)<br/>    Debug.Print reg.Pattern, m(0).Value, m(0).FirstIndex, m(0).Length<br/>    <br/>    Debug.Print String(50, &quot;-&quot;)<br/>    Debug.Print<br/>End Sub<br/>]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (linhaibo)</author><link>http://www.linhaibo.com/post/9.html#cmt10</link><pubDate>Sat, 13 Dec 2014 00:19:46 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt10</guid><description><![CDATA[能不能发代码上来看看呀，你怎么写的导致崩溃呀。<blockquote><div class="quote quote3"><div class="quote-title">VB 于 2015-9-5 17:45:43 回复</div>一直在用 1.0版，最近崩了几次，上来看到博主已经在 2105-01-11 更新到 1.4 了。<br/>以前没注意到啊~~<br/>谢谢博主，下载试用~~</div></blockquote>]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt9</link><pubDate>Wed, 10 Dec 2014 18:27:22 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt9</guid><description><![CDATA[奔溃 = 崩溃]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt8</link><pubDate>Wed, 10 Dec 2014 18:26:38 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt8</guid><description><![CDATA[博主，你好！<br/>此组件用了一段时间，发现不太稳定啊。<br/>我在 Excel2003 的VBA中用此组件，当用递归表达式的时候，很容易导致Excel奔溃。<br/>无论是 前期绑定 还是 后期绑定，都会奔溃。<br/>希望您能改进一下啊~~]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt7</link><pubDate>Tue, 25 Nov 2014 22:25:59 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt7</guid><description><![CDATA[如果设置了：<br/>RegExp.IgnoreCase = True<br/>RegExp.Global = True<br/><br/>然后又用 flags=&quot;s&quot; 设置，<br/>这时，flags 会不会屏蔽 I 和 G 模式？<blockquote><div class="quote quote3"><div class="quote-title">VB 于 2014-11-25 22:30:41 回复</div>经测试，<br/>flags 会 屏蔽 I 和 G 模式 </div></blockquote>]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt6</link><pubDate>Tue, 25 Nov 2014 22:15:27 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt6</guid><description><![CDATA[ split(&quot;&quot;) 希望能改成像 js 那样。<br/>按每个字分割。]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (linhaibo)</author><link>http://www.linhaibo.com/post/9.html#cmt5</link><pubDate>Tue, 25 Nov 2014 22:09:00 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt5</guid><description><![CDATA[replace 的参数上面已经对每个参数的作用说明的非常详细了哦，其它方面和微软的VBScript.RegExp使用一样，只要你会用微软的，就按照微软的语法那样用就可以了。<br/><br/>replace() 第二个参数<b>replaceVar</b> ，里面可以调用 $1 $2 $3 ……$999来获取捕获到的分组内容，替换参数还有一些其它语法，比如：<br/>$number<br/>${name}<br/>$$<br/>$&amp;<br/>$`<br/>$'<br/>$+<br/>$_<br/><br/>详细作用请下载帮助文档，查看Replace 替换操作语法说明。<br/><br/>split() 第二个参数pattern正则表达式如果为空的话，匹配结果是有点差异。<blockquote><div class="quote quote3"><div class="quote-title">VB 于 2014-11-25 22:38:28 回复</div>博主，多写几个例子啊。<br/>新增的语法，不会用啊。<br/>想看例子来学啊~<br/>谢谢博主！</div></blockquote>]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author> (VB)</author><link>http://www.linhaibo.com/post/9.html#cmt4</link><pubDate>Mon, 24 Nov 2014 16:31:07 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt4</guid><description><![CDATA[博主，你好！<br/>感谢你开发了此组件，正在使用，效果很好。<br/>还希望你能做些改进：<br/>1、NewXing.RegExp.split(Str, &quot;&quot; )<br/>此句得到的结果出乎意料。既不是vb中原来的样子，也不是 js 的样子。<br/>希望能改成像 js 那样。<br/>js中，split(&quot;&quot;)得到按每个字符分割的数组：<br/>&quot;12345abc&quot;.split(&quot;&quot;)<br/>结果是：[1,2,3,4,5,a,b,c]<br/><br/>2、多写几个例子吧，有些规则不会用啊，希望能有例子作参考。<br/>特别是 replace()中 替换语法，。<br/><br/>再次感谢博主！]]></description></item><item><title>Re:增强版VB正则表达式(VBScript.RegExp)组件,兼容Perl正则语法</title><author>599246460@qq.com (您好)</author><link>http://www.linhaibo.com/post/9.html#cmt3</link><pubDate>Thu, 15 Aug 2013 19:30:21 +0800</pubDate><guid>http://www.linhaibo.com/post/9.html#cmt3</guid><description><![CDATA[您好，不能下载了吗？可不可以发一份给我，谢谢了啊！599246460@qq.com]]></description></item></channel></rss>
