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 vote246 views2 answers
Thymeleaf radio button
BASIC
0 vote143 views1 answer
Add user to multiple groups ubuntu
BASIC
0 vote157 views1 answer
Script to add value of 2 coulms of grid and show result in 3rd column
BASIC
0 vote156 views1 answer
Resttemplate authorization basic
BASIC
0 vote157 views1 answer
Robocopy sync one way
BASIC
0 vote151 views1 answer
Powershell how to removve only empty direcoties
BASIC
0 vote165 views2 answers
Get next/previous record
BASIC
0 vote153 views1 answer
Pmatplotlib draw a square with a magenta dotted line and pentagon markersython matplotlib overlaped
BASIC
0 vote262 views1 answer
Basic latex document
BASIC
0 vote108 views1 answer
How to simulate tail in dos/cmd without tail
BASIC