For i=1 to 10

    b(i)=0

    Next i

For i=1 To 5

  For j=1 To 10

    If b(i)<a(j)Then

    b(i)=a(j)

    t=j

    End If

    Next j

    a(t)=0

    List1．AddI tem Str(b(i))

Next i

其中数组元素a(1)到a(10)的值依次为“25，42，53，66，77，83，98，14，38，99”，执行程序后，在列表框List1中依次输出的数据是（  ）

s = "2019.06 Visual Basic 6.0": n = 0 For i = 1 To Len(s)

    ch = Mid(s, i, 1)

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

        m = Asc(ch) - Asc("0") + 1

        a(m) = a(m) + 1

    End If

 Next i

 For i = 1 To 10

    If a(i) > 1 Then n = n + i

 Next i

数组 a 各元素的初始值都为0，执行该程序段后，则变量n的值为（  ）

a = [ 6 , 12 , 9 , 20 , 8 , 11 , 4 ]

for j in range( 1 , len( a ) ) :

    if  a[ j ] < a[ j - 1 ] :

 a[ j ] = a[ j ] + a[ j - 1 ] ;  a[ j - 1 ] = a[ j ] - a[ j - 1 ] ;  a[ j ] = a[ j ] - a[ j - 1 ]

执行该段程序后，列表a的值是（   ）