Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]特殊字符的验证


  共有2834人关注过本帖树形打印复制链接

主题：[求助]特殊字符的验证
帅哥哟，离线，有人找我吗？
blsu33
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2928 积分：20184 威望：0 精华：0 注册：2012/2/3 17:45:00 		[求助]特殊字符的验证  发帖心情 Post By：2016/2/19 9:59:00 [只看该作者]

红袍老师，

想要验证不包含特殊字符 ，正则怎么写，下列提示应为表达式？

Dim s As String =".^ "
If RegularExpressions.Regex.IsMatch(s,"@"^\w*$").Count > 0 Then
  MessageBox.show("有特殊符号")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/2/19 10:01:00 [只看该作者]

 

[此贴子已经被作者于2016/2/19 10:01:15编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/2/19 10:07:00 [只看该作者]

Dim s As String ="我们"
If RegularExpressions.Regex.IsMatch(s,"[""@\^*$]+") = False Then
  MessageBox.show("没有特殊符号")
End If

 回到顶部
帅哥哟，离线，有人找我吗？
blsu33
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2928 积分：20184 威望：0 精华：0 注册：2012/2/3 17:45:00 		  发帖心情 Post By：2016/2/19 10:36:00 [只看该作者]

Dim s As String ="*|"
Dim s1 As String ="我 们"
Dim s2 As String ="我们"
Dim s3 As String ="(我们)"
If RegularExpressions.Regex.IsMatch(s,"[""@\^*$]+") =True Then
MessageBox.show("有特殊符号")
End If
If RegularExpressions.Regex.IsMatch(s1,"\s+") =True Then
MessageBox.show("有空格")
End If
If RegularExpressions.Regex.IsMatch(s2,"/^([\u4E00-\u9FA5])*$/") =False Then
  MessageBox.show("不是文本")
End If
If RegularExpressions.Regex.IsMatch(s2,"/^[\u4e00-\u9fa5a-zA-Z\/\(\)]+$/;") =False Then
    MessageBox.show("只能输入中英文字符和 // 和()")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
blsu33
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2928 积分：20184 威望：0 精华：0 注册：2012/2/3 17:45:00 		  发帖心情 Post By：2016/2/19 10:37:00 [只看该作者]

老师，
  对S和s1的判断放在一起怎么写？


s2 s3 的判读正则怎么写，判读不出来？
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/2/19 10:42:00 [只看该作者]

1、

 

Dim s1 As String ="我们"
If RegularExpressions.Regex.IsMatch(s1,"[""@\^*$\s]+") = True Then
    MessageBox.show("有空格")
End If

 

2、

 

Dim s2 As String ="(我/  们)"

If RegularExpressions.Regex.IsMatch(s2,"^[\u4e00-\u9fa5a-zA-Z\/\(\)]+$") =False Then
    MessageBox.show("只能输入中英文字符和 // 和()")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
blsu33
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2928 积分：20184 威望：0 精华：0 注册：2012/2/3 17:45:00 		  发帖心情 Post By：2016/2/19 11:32:00 [只看该作者]

红袍老师，
还得麻烦您，

存货编码正则怎么写,其中-只能在中间，不能再起始和末尾
EdAUT15001-001

Dim s2 As String =""

If RegularExpressions.Regex.IsMatch(s2,"^[\u4e00-\u9fa5a-zA-Z\/\-]+$") =False Then

    MessageBox.show("只能输入中英文字符和-")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
blsu33
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2928 积分：20184 威望：0 精华：0 注册：2012/2/3 17:45:00 		  发帖心情 Post By：2016/2/19 11:33:00 [只看该作者]

另外，
我需要逐个把不符合的字符加进去，这块怎么加“个符号 试了一下 \"不正确
If RegularExpressions.Regex.IsMatch(s1,"[""@\^*$\s]+") = True Then
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/2/19 11:41:00 [只看该作者]

Dim s2 As String ="我们aEdAUT15001-/001"

If RegularExpressions.Regex.IsMatch(s2,"^[\u4e00-\u9fa5a-zA-Z0-9]+-*[\u4e00-\u9fa5a-zA-Z0-9]+$") = False Then

    MessageBox.show("只能输入中英文字符和-")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2016/2/19 11:43:00 [只看该作者]

8楼没有问题，两个 "" 就是表示 "

 回到顶部
总数 18 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询