某程序部分代码如下: Dim i As Integer,s As String Dim a(1 To 10)As Integer,b(1 To 10)As Integer a(1)= 82:a(2)= 96:a(3)= 68:a(4)= 93:a(5)=87 a(6)=95:a(7)=84:a(8)=91:a(9)=80:a(10)=98 For i=1 To 10 b(a(i)\10)= b(a(i)\10)+1 Next i For i=1 To 10 If b(i)> 0 Then s=s &Str(b(i))&" " End If Next i Text1.Text=s 运行该程序后,在文本框Text 1中显示的内容为( )
A . 5 4 1
B . 1 1 3 5
C . 1 4 5
D . 5 3 1 1
答案:C