ExcelTip.Net留存知识帖 ---【注:附件之前被网盘供应商清空后,现已修复-现已修复-现已修复为本地下载!】
现在位置:首页 > 我的酷贴 > Excel VBA > 常见的正则表达式写法知识点

常见的正则表达式写法知识点

作者:绿色风 分类: 时间:2022-08-18 浏览:74
楼主
wise
常见的正则表达式写法知识点,整理一下写出来:
1、正整数:"^[0-9]*[1-9][0-9]*$"  
2、非正整数(负整数 + 0):"^((-\\d+)|(0+))$"  
3、负整数:"^-[0-9]*[1-9][0-9]*$"  
4、整数:"^-?\\d+$"    
5、正浮点数:"^(([0-9]+\\.[0-9]*[1-9][0-9]*)|([0-9]*[1-9][0-9]*\\.[0-9]+)|([0-9]*[1-9][0-9]*))$"
6、负浮点数:"^(-(([0-9]+\\.[0-9]*[1-9][0-9]*)|([0-9]*[1-9][0-9]*\\.[0-9]+)|([0-9]*[1-9][0-9]*)))$"
7、由26个英文字母组成的字符串:"^[A-Za-z]+$" 
8、由26个英文字母的大写组成的字符串:"^[A-Z]+$"
9、由26个英文字母的小写组成的字符串:"^[a-z]+$"  
10、由数字和26个英文字母组成的字符串:"^[A-Za-z0-9]+$"  
11、由数字、26个英文字母或者下划线组成的字符串:"^\\w+$"
可以使用下面代码替换测试:
  1. Sub MyRegName()
  2. Dim reg As Object
  3. Dim str1 As String
  4. Set reg = CreateObject("vbscript.regexp")
  5. str1 = InputBox("请输入字符:", "输入", 1)
  6. reg.Pattern = "^[0-9]*[1-9][0-9]*$"
  7. MsgBox reg.test(str1)
  8. End Sub
 
2楼
wise



居然输入有乱码
3楼
wise


删除了好几个有乱码的
4楼
DJ_Soo
2.非正整数好像多了个\:
  1. "^((-\d+)|(0+))$"

11.好像也多了个\:
  1. "^\w+$"
5楼
ryueifu
11、由数字、26个英文字母或者下划线组成的字符串:"^\\w+$"
w的前面一个反斜杠就够了吧
6楼
tiger2003
学习了,谢谢!

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素, 经与ExcelTip.Net站长Apolloh商议并征得其同意, 现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示, 供有需要的人士查询使用,也慰缅曾经的论坛时代。 所示各个帖子的原作者如对版权有异议, 可与本人沟通提出,或于本站点留言,我们会尽快处理。 在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表
sitemap