Sequnce function vb.net

    Private Function SequentialNumbers(ByVal input As String) As Boolean
        Dim numbers() As Int32 = Array.ConvertAll(input.ToCharArray(), Function(c) Convert.ToInt32(c))
        For index As Int32 = 0 To numbers.Length - 2
            For nestedIndex As Int32 = index + 1 To numbers.Length - 1
                If numbers(index) = numbers(nestedIndex) - 1 Then
                    Return True
                End If
            Next
        Next

        Return False
    End Function

Source: vbforums.com

Similar codes

1 vote236 views2 answers
Thymeleaf radio button
BASIC
6 votes97 views1 answer
Vs code unindent
BASIC
0 vote236 views1 answer
Loop inner fiter()
BASIC
0 vote154 views1 answer
New list VB
BASIC
0 vote155 views1 answer
Wussup
BASIC
0 vote219 views1 answer
How to remove characters from the end of a string visual basic
BASIC
0 vote164 views1 answer
Basic authentication in REST api Dajngo
BASIC
0 vote143 views1 answer
How to close form in vb.net
BASIC
1 vote222 views1 answer
How to add basic authentication on haproxy backend server
BASIC
0 vote146 views1 answer
JsonFileWrapper
BASIC