则密码强度为“强”。

For i=1 To 10

    b(a(i) Mod 10)= b(a(i) Mod 10)+1

    b(a(i)\10)=b(a(i)\10)+1

Next i

num=0

For i=0 To 9

    If b(i)>num Then num b(i)

Next i

数组b各元素初始值为0，数组元素a(1)到a(10)的值依次为“68，17，24，30，36，40，55，58，61，66”，执行该程序段，num的值为（   ）

X=a(1)：s=0

For i=2 To 5

    If a(i) > x Then

        x = a(i)

    ElseIf a(i) < x Then

        s = s+a(i)

    End If

Next i

数组元素a(1)~a(5)的值依饮为“1，2，3，2，1”，执行该程序段后s的值为（    ）

Private Sub Command1_Click()

    Dim a(0 To 9) As Integer

    Dim t as Long

    t = Val(Text1.Text)

    Do While t <> 0

        a(t Mod 10) = 1

        t = t \ 10

    Loop

    For i = 0 To 9

        x = x + a(i)

    Next i

End Sub

若在文本框Text1中输入10242048，则程序执行后，变量x的值为（  ）

请回答下列问题：