单项选择题
阅读程序:
Private Sub Form_Click( )
Dim i As Integer, sum As Integer
For i=2 To 10
If i Mod 2<>0 Then
Print i;
Else
sum=sum+i
End If
Next i
Print sum
End Sub
程序运行后,单击窗体,在窗体上的输出结果是______。
A.3 5 7 9 30
B.1 3 5 7 9
C.2 4 6 8 20
D.11 15 17 19 20
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) Dim m As Integer,i As Integer,x(3)As Integer For i=0 To 3 : x(i)=i:Next i For i=1 To 2:Call subl(x,i):Next i For i=0 To 3:Print x(i);:Next i End Sub Private Sub subl(a( )As Integer,k As Integer) Dim j As Integer Do a(k)=a(k)+a(k+1) j=j+1 Loop While j<2 End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是______。
A.0 3 7 5
B.0 1 2 3
C.3 2 4 5
D.0 5 8 3
点击查看答案&解析
单项选择题
在窗体上画一个名称为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_Click( ) d=0 : c=10 X=Array(10,12,21,32,24) For i=1 To 5 If x(i)>c Then d=d+x(i) c=x(i) Else d=d-c End If Next i Print d End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为______。
A.89
B.99
C.23
D.77
点击查看答案&解析
相关试题
编写程序,当按下某个键时,在窗体上分别以...
Arr(i)>Max
当下列程序运行,单击窗体后,分别输入72...
假定有一个文本框,其名称为Text1,为了使...
Arr(1)