Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/3/wix/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net Regex允许输入确认_Vb.net - Fatal编程技术网

Vb.net Regex允许输入确认

Vb.net Regex允许输入确认,vb.net,Vb.net,下面的正则表达式是否正确,以检查a-z a-z空格是否是唯一允许键入的空格 Dim pattern As String = "^([a-zA-Z0-9 ]+\s)*[a-zA-Z0-9 ]+$" Dim r As New Regex(pattern) If Not r.IsMatch(TextBoxX1.Text) Then MsgBox("not allowed") End If 据我所知,它符合你的要求,但这是一个不必要的表达。与其检查每个字

下面的正则表达式是否正确,以检查
a-z a-z空格
是否是唯一允许键入的空格

   Dim pattern As String = "^([a-zA-Z0-9 ]+\s)*[a-zA-Z0-9 ]+$"
    Dim r As New Regex(pattern)

    If Not r.IsMatch(TextBoxX1.Text) Then
        MsgBox("not allowed")
    End If

据我所知,它符合你的要求,但这是一个不必要的表达。与其检查每个字符是A-Z、0-9还是空格,不如查找任何不属于该字符的

注意:通过指定
RegexOptions.IgnoreCase
匹配不区分大小写,因此即使我指定了
A-Z
它也将匹配
A-Z

在线测试:

模式说明:

[^=>匹配任何不是。。。
A-Z0-9=>…A-Z,0-9或一个空格(在其末尾有一个空格)。
]=>字符组结束。
Dim pattern As String = "[^A-Z0-9 ]"
Dim r As New Regex(pattern, RegexOptions.IgnoreCase)

If r.IsMatch(TextBoxX1.Text) Then
    MessageBox.Show("Invalid input!", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End If