Question

我有一个PIN码列表=，其中三个列在下面：

"12 171H01 003"应该返回True
"12 371 04 003"应该返回False
"12 671 C04 029"

所有PIN号码之间都有空格。有些人至少有一个角色。

如果任何PIN号码有字符，则返回true，否则返回false。

以下功能无效。无论传递给它的PIN号是否有字符，它都返回false。

任何想法我做错了什么？

Public Function FoundChar(ByVal strPIN As String) As Boolean

    Dim Pattern As String = "[a-zA-Z]"
    Dim reg As New Regex(Pattern)

    Return reg.IsMatch(strPID)

End Function

Answer 1

您的代码运行良好：

Sub Main
    Console.WriteLine(FoundChar("12 171H01 003")) 'True
    Console.WriteLine(FoundChar("12 371 04 003")) 'False
    Console.WriteLine(FoundChar("12 671 C04 029")) 'True
End Sub

Public Function FoundChar(ByVal strPIN As String) As Boolean

    Dim Pattern As String = "[a-zA-Z]"
    Dim reg As New Regex(Pattern)

    Return reg.IsMatch(strPIN)

End Function

唯一的区别是代码中的拼写错误 - 您有strPID而不是strPIN。

如果给定的PIN号码有字符，则返回true;否则是假的？

1 个答案: