(原创)正则表达式练习测试页

最新推荐文章于 2022-09-06 08:20:17 发布
最新推荐文章于 2022-09-06 08:20:17 发布
阅读量1.6k 收藏
点赞数
文章标签： 正则表达式 测试 border table html vbscript
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/bpfish/article/details/210009
版权

前段时间差不多都要和正则表达式打交道,所以当时就弄了这个测试练习页面.把以下代码保存为一个HTML文件用IE打开即可使用:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>正则表达式测试</title>
<style type="text/css">
<!--
td {
 font-family: "宋体";
 font-size: 12px;
 color: #666666;
 text-decoration: none;
}
input {
 font-family: "宋体";
 font-size: 12px;
 color: #666666;
 text-decoration: none;
 border: 1px solid #000000;
 height: 18px;
}
textarea {
 font-family: "宋体";
 border: 1px solid #333333;
 word-spacing:inherit
}
.table {
 font-family: "宋体";
 font-size: 12px;
 border: 1px solid #000000;
 white-space: normal;
 table-layout: fixed;
 WORD-BREAK: break-all;
 WORD-WRAP: break-word;
 display: table;
}
.checkbox {
 border: 1px dotted #CCCCCC;
}
-->
</style>
</head>

<body>
<table width="100%" height="306"  border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td valign="top"><div align="center">
      <table width="700"  border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td><div align="center">
            <textarea name="InputBox" cols="100" rows="20" id="InputBox"></textarea>
          </div></td>
        </tr>
      </table>
      <table width="700" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="1"></td>
        </tr>
      </table>
      <table width="722" border="0" cellpadding="0" cellspacing="1" class="table">
        <tr>
          <td height="25" bgcolor="#F2F2F2"><div align="center">正则表达式:
            <input name="RegExpBox" type="text" id="RegExpBox" size="100">
          </div></td>
        </tr>
      </table>
      <table width="700" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="1"></td>
        </tr>
      </table>    
      <table width="722" border="0" cellpadding="0" cellspacing="0" class="table">
        <tr>
          <td width="580" height="25" bgcolor="#F2F2F2"><div align="center">
    <input name="SingleLine" type="checkbox" class="checkbox" value="1">
          <span title="将更改(.)的意思,使它包含所有字符">单行模式查找</span>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
          <input name="IgnoreCase" type="checkbox" class="checkbox" value="1">
          <span title="不区分字母的大小写">不区分大小写</span>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
          <input name="Global" type="checkbox" class="checkbox" value="1">         
          <span title="查找所有的可匹配项">全局模式查找</span>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
          <input name="ShowSub" type="checkbox" class="checkbox" value="1">         
          <span title="只显示在()里面的记录集">只显示子记录集结果</span>
           </div></td>
          <td width="140" bgcolor="#F2F2F2"><input name="btnSearch" type="button" id="btnSearch" value="搜  索" onClick="vbscript:SearchRegExp()"></td>
        </tr>
      </table>
      <table width="700" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td height="1"></td>
        </tr>
      </table> 
      <table width="722" border="0" cellpadding="0" cellspacing="1" class="table">
        <tr>
          <td height="25" bgcolor="#FFFFCC"><div align="left" id="ShowText">
          </div></td>
          </tr>
      </table>
    </div></td>
  </tr>
</table>
</body>
<script language="vbscript">
 Function SearchRegExp()
  Dim HTML,IgnoreCase,Global,Pattern,ShowSub
  HTML = document.all.InputBox.value
  Pattern = document.all.RegExpBox.value
  If Trim(HTML) = "" Or IsNull(HTML) Or Pattern = "" Then
     document.all.ShowText.innerHTML = "<font color='red'>---------请输入要查找的文本---------</font>"
     Exit Function
  End If
  If document.all.SingleLine.checked Then
     HTML = Replace(HTML,VbCrlf,"")
  End If
  Global = document.all.Global.checked
  IgnoreCase = document.all.IgnoreCase.checked
  ShowSub = document.all.ShowSub.checked
  Dim RegExpObj,RegMatch,I,II,SubMatch
  Set RegExpObj = New RegExp
  RegExpObj.IgnoreCase = IgnoreCase
  RegExpObj.Global = Global
  RegExpObj.Pattern = Pattern
  Set RegMatch = RegExpObj.Execute(HTML)
  If RegMatch.Count < 1 Then
     document.all.ShowText.innerHTML = "<font color='red'>---------共查找到0个记录---------</font>"
     Set RegMatch = Nothing
     Set RegExpObj = Nothing
     Exit Function
  End If
  document.all.ShowText.innerHTML = "<font color='red'>-----------------------查找开始--------------------</font><br>"
  Dim innerHTML
  innerHTML = document.all.ShowText.innerHTML
  For I = 0 To RegMatch.Count - 1
   Set SubMatch = RegMatch(I).SubMatches
   If Not ShowSub Then
      innerHTML = innerHTML + "<font color='red'>记录集" & I & ":</font><font color='blue'>" + HTMLEncode(RegMatch(I).Value) + "</font>"
   End If
   For II = 0 To SubMatch.Count - 1
          innerHTML = innerHTML + "<br><font color='#FF00FF'>" +HTMLEncode("     子记录") & II & ":</font>" + HTMLEncode(SubMatch(II))
   Next
   innerHTML = innerHTML + "<br><hr width=""100%"" size=""1"">"
  Next
  document.all.ShowText.innerHTML = innerHTML
  Set RegMatch = Nothing
  Set RegExpObj = Nothing
 End Function
 Function HTMLEncode(ByVal fString)
 If Not IsNull(fString) then
  fString = Replace(fString, ">", "&gt;")
  fString = Replace(fString, "<", "&lt;")
  fString = Replace(fString, " ", "&nbsp;")
  fString = Replace(fString, CHR(32), "<I></I>&nbsp;")
  fString = Replace(fString, CHR(9), "&nbsp;")
  fString = Replace(fString, CHR(34), "&quot;")
  fString = Replace(fString, CHR(39), "&#39;")
  fString = Replace(fString, CHR(13), "")
  fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
  fString = Replace(fString, CHR(10), "<BR> ")
  HTMLEncode = fString
 Else
  HTMLEncode=""
 End If
End Function
</script>
</html>

bpfish
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
vba正则表达式测试工具
01-28
支持win10，没有替换功能，可以替代vba进行的测试工具
正则表达式练习题（含答案）
a34921324的博客
10-17 1万+
python 正则表达式
Python每日一练——第30天：正则表达式练习
热门推荐
努力让自己发光，对的人才能迎着光而来
09-06 1万+
Python每日一练——第30天：正则表达式练习
常用的正则表达式练习
dear_mRZhou_的博客
05-30 1988
嗨喽，大家好，正则表达式作为我们日常开发中的一个非常重要的技能，如果我们能熟练的掌握，那么在很多情况下可以极大的提高我们的工作效率，今天，我能就来对一些我们经常用到的正则表达式来进行一个训练与学习： 1：验证是否为有效数字 /** * 验证是否为有效数字 * 规则分析： * 1.可能出现 + - 符号，也可能不出现 => [+-]? * 2.如果是一位数 0-9 都可以，如果是多位数字 首位不能是 0 => (\d|([1-9]\d+)) * 3.如果是小数的话，那么后面必须有小数点
正则表达式练习
读书郎
07-12 763
正则表达式： 单字符匹配： # 匹配某个字符串： # text = "abc" # ret = re.match('a',text) 从第一个位置开始查找 # print(ret.group()) # 点（.）：匹配任意的字符(除了'\n')： # text = "\nabc" # ret = re.match('.',text) # print(ret.group()) # \d：匹配任意的数字： # text = "aab" # ret = re.match('\d',text)
正则表达式练习题
weixin_47580522的博客
03-17 2186
正则表达式练习题 匹配 带有\n
Java使用正则表达式对注册页面进行验证功能实现
10-21
本文给大家分享一段有关java使用正则表达式对注册页面进行验证的代码，代码比较简单，非常不错，感兴趣的朋友一起学习吧
JavaScript正则表达式
01-08
1、正则表达式是描述字符模式的对象，正则表达式用于对字符串模式匹配及检索替换，是对字符串执行模式匹配的强大工具。 2、String和RegExp都定义了使用正则表达式进行强大的模式匹配和文本检索与替换的函数。 3、...
正则表达式测试工具C#版(src)
10-25
正则表达式测试工具C#完整源码，包括查找和替换功能，标注显示匹配结果。
正则表达式测试文本正则表达式测试文本
10-17
正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本正则表达式测试文本
python正则表达式练习
weixin_46713695的博客
06-18 1568
正则表达式练习方法
正则表达式
weixin_43289689的博客
03-15 508
数字：1*$ n位的数字：^\d{n}$ 至少n位的数字：^\d{n,}$ m-n位的数字：^\d{m,n}$ 零和非零开头的数字：^(0|[1-9][0-9]*)$ 非零开头的最多带两位小数的数字：^([1-9][0-9]*)+(.[0-9]{1,2})?$ 带1-2位小数的正数或负数：^(-)?\d+(.\d{1,2})?$ 正数、负数、和小数：^(-|+)?\...
正则表达式练习(Regex Golf)
weixin_47532216的博客
01-21 1042
  为了提高自己的数学能力（总结归纳、逻辑推理、抽象），准备每天做1~3道有点挑战性的题目。那就先从正则表达式开始吧，网站是https://alf.nu/RegexGolf。感兴趣的同学也可以去玩玩。目标是匹配上下图左边的所有表达式，并且不能匹配右边的所有表达式（而且正则表达式越短越好）。 1. Warmup   这个题很简单，答案为foo。 2. Anchors   容易观察到左边的都是以ick结尾的(ick$)。那看看能不能减少正则表达式长度->左边都是以k结尾的（k$）。 3. It nev
正则表达式及作业
q1017262470的博客
03-24 410
正则表达式及作业 正则表达式 什么是正则表达式 # 正则是一种用来处理文本数据的一种工具。（一般用于处理复杂的文本问题） # 1）检测输入的数据是否是手机号？ # 2）检查输入的ip地址是否合法？ # 3）获取字符串中所有的数字数据：'sjhfj23世纪东方和79sk试试928sjd' # .... 正则表达式的语法 - 用不同的符号来描述字符串规则 # 1) 匹配类符号 # 2) 检测类符号 # 3) 控制次数的符号 # 4) 分组和分支 # 5) 其他常用参数 # fullmat
Python 正则表达式小练习
weixin_41429444的博客
08-02 668
正则表达式 小练习 一、不定项选择题 能够完全匹配字符串"(010)-62661617"和字符串"01062661617"的正则表达式包括（A B D） A.r"\(?\d{3}\)?-?\d{8}" B. r"[0-9()-]+" C.r"[0-9(-)]*\d*" D.r"[(]?\d*[)-]*\d*" 能够完全匹配字符串“back”和“back-end”的正则表达式包括（A B C D） A. r“\w{4}-\w{3}|\w{4}” B. r“\w{4}|\w{4}-\w{3}
新的测试asp和asp.net测试页面
superhoy的专栏
03-27 1万+
用于测试iis是否正常安装和asp.net是否正常注册 asp页面，测试iis安装正常，新建一个test.asp页面（vbscript动态脚本语言）： 代码如下即可： response.write("hello world,vbscript!") %> 注意vbscript不用加分号，不区分大小写。 aspx页面，测试asp.net安装正常，新建一个test.a
正则表达式测试程序
zgqtxwd的专栏
04-24 219
<!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--><script type="text/javascript"
java正则表达式练习
最新发布
09-20
以下是一些Java正则表达式的练习： 1. 判断字符串是否满足正则表达式的规则： ``` String regex = "正则表达式"; String str = "要匹配的字符串"; boolean isMatch = str.matches(regex); ``` 2. 按照正则...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 2
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值