Vb.net 函数溢出错误

Vb.net 函数溢出错误,vb.net,function,overflow,runtime-error,Vb.net,Function,Overflow,Runtime Error,嘿,我正在使用上面的函数检查字符串中的字符数组,但是如果字符串太长,则会出现算术溢出错误(表明我已除以0)。现在我实际使用的是一个整数值。toString,有人能解释一下吗 谢谢您的代码有一些问题,我对其进行了一些修改。检查它是否适合你 Public Function checkForChars(ByVal arrayOfChars As String(), ByVal stringToCheck As String) As Boolean Dim i As Integer

嘿,我正在使用上面的函数检查字符串中的字符数组,但是如果字符串太长,则会出现算术溢出错误(表明我已除以0)。现在我实际使用的是一个整数值。toString,有人能解释一下吗


谢谢

您的代码有一些问题,我对其进行了一些修改。检查它是否适合你

Public Function checkForChars(ByVal arrayOfChars As String(), ByVal stringToCheck As String) As Boolean
        Dim i As Integer
        Dim numEntries As Integer = arrayOfChars.Length - 1
        For i = 0 To numEntries
            If (stringToCheck.Contains(arrayOfChars(numEntries)) = True) Then
                Return True
            End If
        Next

        Return False

End Function

数组的长度大于最大整数值?这听起来太大了,表明你应该以不同的方式面对这个问题。你能解释一下这么大的数组是从哪里来的吗?你能告诉我们确切的错误信息以及在哪一行得到异常吗?上面的代码有点奇怪。您总是检查最后一个字符串,那么为什么要循环这些条目呢?对不起,我修改了一个变量名,忘了修改其余的代码。弗拉德的回答似乎奏效了,谢谢你们的时间伙计们。。。我总是犯最奇怪的错误。。。
Public Function checkForChars(arrayOfChars As String(), stringToCheck As String) As Boolean
    For i As Integer = 0 To arrayOfChars.Length - 1
        If stringToCheck.Contains(arrayOfChars(i)) Then
            Return True
        End If
    Next

    Return False
End Function