下列VB程序运行时，单击命令按钮command1后，在列表框 list1 中输出的是。 Private Sub Command1_Click() Dim I as integer For i=1 to 10 step 2 If i&gt;=5 then List1.additem str(i-3) Else List1.a...

题型：填空题题类：模拟题难易度：普通

浙江省杭州市2015年高考信息技术模拟卷3

下列VB程序运行时，单击命令按钮command1后，在列表框 list1 中输出的是。

Private Sub Command1_Click()

Dim I as integer

For i=1 to 10 step 2

If i>=5 then

List1.additem str(i-3)

Else

List1.additem str(i)

Next i

End Sub

举一反三

For i = 1 To Len(Text1.Text)

c = Mid(Text1.Text, i, 1)

If c >= "0" And c <= "9" Then c = Chr(Asc(c) + 1)

If c >= "A" And c <= "Z" Then c = Chr(Asc(c) + 32)

s =s + c

Next i

若文本框Text1的内容为“Number 2468！”执行程序后，变量s的值为（）

Private Sub Command1_Click()

Dim a(0 To 4) As Integer

Dim i As Integer

a(4) = Val(Text1.Text)

For i = 3 To 1 Step -1

a(i) = a(i + 1) / 2

Next i

Text2.Text = Str(a(i+2))

End Sub

s=0

For k=1 To 5

s=s * k

Next k

Print s

相关试卷