Private Sub Command1_Click()

Dim ch As String, s As String

Dim i As Integer, j As Integer

ch = Text1.Text

   For i = 1 To {#blank#}1{#/blank#} 

        j = Asc(Mid(ch, i, 1))

        If j > 96 And j < 123 Then

           s = s + Chr(j - 32)

        Else

         s = s + Chr(j)    

        End If

   Next

   {#blank#}2{#/blank#}

End Sub

a（1）=68：a（2）=88：a（3）=76：a（4）=60：a（5）=98

a（6）=100：a（7）=64：a（8）=85：a（9）=99：a（10）=59

For i=1 to 9

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

    c（b（i）\10）=c（b（i）\10）+1

Next i

For i = 0 To 10

    If c（i）> 0 Then Label1. Caption = Label1. Caption + " "+Str（c（i））

Next i

数组c各元素初值为0，执行该程序段，标签Label1上显示的内容是（   ）