试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙江省衢州市2018-2019学年高二下学期信息技术期末教学质量检测试卷
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))
其中数组元素a(1)到a(10)的值依次为“25,42,53,66,77,83,98,14,38,99”,执行程序后,在列表框List1中依次输出的数据是( )
Dim i As Integer, s As String
i = 0
Do While i < 5
s = Str(i) + s
i = i + 1
Loop
试题篮