限制输入特殊字符

时间：2022-12-19 17:00:04

前言

    有时候我们输入一些东西，或者发表一些文章，会提示，您输入的内容函数特殊字符，或者不正常的字眼，这样的功能是怎么实现的呢？本菜鸟找到了一个限制特殊字符输入小功能，现在分享给大家，希望对大家在后期的学习中，有帮助。

内容

代码实现

自定义方法：

<span style="font-family:KaiTi_GB2312;font-size:18px;">    '自定义要检查的字符
    Private Sub SpecialCheck()
        'strInputtext文中的特殊字符：引号(')或反斜杠(\)
        Dim strPatternSearchVal As String = "'|\\"
        Dim strInputtext As String = "我是美女\"
        Dim match As Match = Regex.Match(strInputtext, strPatternSearchVal)
        If match.Success = True Then
            MsgBox("含有特殊文字【" + match.Value + "】。", MsgBoxStyle.Exclamation, Me.Text)
        Else
            MsgBox("没有特殊文字。", MsgBoxStyle.Information, Me.Text)
        End If
    End Sub</span>

调用方法：

<span style="font-family:KaiTi_GB2312;font-size:18px;">    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Call SpecialCheck()
    End Sub</span>
结果：

限制输入特殊字符

遇到错误：

限制输入特殊字符

    

    一开始，我把“Dim strPatternSearchVal As String ="\'|\" ”规定的特殊字符中单个"\"，会显示在模式末尾非法，于是我把单个"\"，改为"\\"，就正常显示了，在C#版中遇到这种错误就在"\'.'?"前面加入@字符，变成@"\'.'?"就OK了。

小结

1、程序的世界真是越来越丰富了。

2、遇到常用的东西，不断的总结下来。

3、加油吧，少年！

 

感谢您的宝贵时间···

标签：

相关文章