一個(gè)含有 n 個(gè)元素的整數(shù)數(shù)組，如果數(shù)組兩個(gè)連續(xù)元素之間差的絕對值包括了[1，n-1]之間的所有整數(shù)，則稱之為一組“完美跳數(shù)”。小余制作了驗(yàn)證完美跳數(shù)的 VB 程序，功能如下：在文本框 Text1 中輸入一組以逗號分隔且以逗號結(jié)尾的整數(shù)數(shù)組，單擊“驗(yàn)證”按鈕 Command1，在標(biāo)簽 Label1 中顯示驗(yàn)證結(jié)果，運(yùn)行界面如圖所示。
（1）觀察程序界面，具有 Caption 屬性的對象有

3

3

個(gè)。（填個(gè)數(shù)）
Private Sub Command1_Click

（　?。?/div>

（　?。?/div>
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

a（n）=Val（temp）

a（n）=Val（temp）

temp=““
End If
i=i+1
Loop
For i=2 To n

b（i-1）=Abs（a（i）-a（i-1））或b（i-1）=Abs（a（i-1）-a（i））

b（i-1）=Abs（a（i）-a（i-1））或b（i-1）=Abs（a（i-1）-a（i））

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=“完美跳數(shù)“
Else
Label1．Caption=“非完美跳數(shù)“End Sub
（2）請?jiān)谏鲜龀绦虻臋M線處填上合適的代碼。
（3）上述程序加框處代碼有誤，請改正。

n-1 To i+1 Step-1或2 To n-i

n-1 To i+1 Step-1或2 To n-i