麻烦创建函数来检查字符串的特定格式

Question

我想创建一个函数，检查一个字符串是否在一个坐标的格式（例如：362,352），但我似乎无法想象它正确地输出。这里是我所尝试的：

Private Function CheckPointIsValid(ByVal CoordsText As String) As Boolean 
    If CoordsText.Contains(",") AndAlso Integer.TryParse(CoordsText = CoordsText.Replace(",", String.Empty), Nothing) Then Return True 
    Return False 
End Function 

无论传递给函数的东西总是返回false。

Answer 1

检查你的TryParse ...你把它设置成什么都没有，并且你忘了还有其他的东西返回false ...看到我的答案在下面。

Dim intNumber As Integer = 0 
Dim result As Boolean = Int32.TryParse(CoordsText.Replace(",",String.Empty), intNumber) 

因此，这里是你的函数...

Private Function CheckPointIsValid(ByVal CoordsText As String) As Boolean 

Dim intNumber As Integer = 0 
Dim result As Boolean = Int32.TryParse(CoordsText.Replace(",",String.Empty), intNumber)  

    Return CBool(CoordsText.Contains(",") AndAlso result) 

End Function 

Answer 2

这就是我现在使用（它工作正常）：

Private Function CheckPointIsValid(ByVal CoordsText As String) As Boolean 
    If CoordsText.Contains(",") AndAlso Integer.TryParse(CoordsText.Replace(",", String.Empty), Nothing) = True Then Return True 
    Return False 
End Function