试题 试卷
题型：单选题 题类：常考题 难易度：普通
浙江省高中信息技术 算法及VB语言表达基础同步练习
Private Sub Command1_Click()
Dim i As Integer
Dim a(10)As Integer ‘①
For i=1 To 10 ‘②
a(i)=Rnd* 100 ‘③
Next i
Label1.Caption=Str(a(i)) ‘④
End Sub
Private Sub Command1_C1ick ( )
Dim a(0 to 5) As Integer
a(5)=Val(Text1.text)
For I=4 to 1 step -1
a(I)=a(I+1)/2
Next I
Text2.text=str(a(I))
End sub
在文本框Text1中输入“96”，单击命令按钮Command1后，文本框Text2中显示的内容是（ ）
For i=1 to 30
If i mod 5=0 then
s=s+i
i=i+6
end if
next i
试题篮
