一个含有n个元素的整数数组，如果数组两个连续元素之间差的绝对值包括了[1,n-1]之间的所有整数，则称之为一组“完美跳数”。小余制作了验证完美跳数的VB程序，功能如下：在文本框Text1中输入一组以逗号分隔且以逗号结尾的整数数组，单击“验证”按钮Command1，在标签Label1中显示验证结果，运行界面如图所示。

Private Sub Command1_Click()

    Dim n As Integer, i As Integer, j As Integer

    Dim a(1 To 100) As Integer, b(1 To 100) As Integer Dim s As String, chr As String, temp As String

    s = Text1.Text

    i = 1: n = 0

    Do While i <= Len(s)

        ch = Mid(s, i, 1)

        If ch >= "0" And ch <= "9" Then

            temp = temp + ch

        Else

            n = n + 1

               ①  

            temp = ""

        End If

        i = i + 1

    Loop

    For i = 2 To n

           ②   

    Next i

    For i = 1 To n - 2

        For j =

            If b(j) < b(j - 1) Then

                t = b(j): b(j) = b(j - 1): b(j - 1) = t

            End If

        Next j

    Next i

    For i = 1 To n - 1

        If b(i) <> i Then Exit For

    Next i

    If i = n Then Label1.Caption = "完美跳数" Else Label1．Caption = "非完美跳数"

End Sub