
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 .逐帧动画;B .动画补间动画;C .形状补间动画)