Question

是否可以检查文本框值是否包含特定格式的字母数字：

以两个大写字母字符开头，后跟六个数字

例如：SO123456

我更喜欢

背后的检入代码

感谢

Answer 1

只是一点正则表达式

    Imports System.Text.RegularExpressions

Dim regex As Regex = New Regex("([A-Z]{2})([0-9]{6})")

Dim match As Match = regex.Match(TextBox1.Text)

If (match.Success) Then
MessageBox.Show("Valid")
Else
MessageBox.Show("Not Valid")
End If

Answer 2

也可以尝试：

Dim str As String = TextBox1.Text.Trim()
    Dim num As Integer            
    If str.Length = 8 _
    And Convert.ToInt32(str(0)) > 64 _
    And Convert.ToInt32(str(0)) < 91 _
    And Convert.ToInt32(str(1)) > 64 _
    And Convert.ToInt32(str(1)) < 91 _
    And Integer.TryParse(str.Substring(2, 6), num) Then
        MessageBox.Show("Correct id.")
    Else
        MessageBox.Show("Wrong id.")
    End If

希望它有所帮助。

VB检查文本框是否包含特定字母数字格式的文本

2 个答案: