填空题

有如下程序:
Private Sub Command1_Click()
j =10
For i= -1 To 1 Step 0.3
j =j + 1
Next i
Print j
End Sub
该程序共循环 【7】 次,程序执行完毕后j的值是 【8】 。

【参考答案】

[7] 7 [8] 17
<上一题 目录 下一题>
热门 试题

单项选择题
有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) Next i End Sub运行上面程序,单击命令按钮,输出结果为______ 。
A.2
4
6
8
B.5
2
2
2
C.10
12
14
16
D.出错
填空题
有如下程序,该程序的执行结果是 【6】 。Private Sub Command1 Click() For i=1 To 4 x=4 For j=1 To i x =3 For k=1 To 2 x= x + 5 Next k Next j Next i Print x End Sub
相关试题
  • 以下程序用于求s=1+(1+2)+(1+...
  • 下列程序的运行机结果是 【15】 。 Pr...
  • 下列程序的作用是求所有小于或等于30的自...