题目:
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim i As Integer
Dim sum As Integer
Dim sum1 As Integer
Dim a(1 To 20),x
For i = 1 To 10
a(i)=i
Next i
For Each x In a
If x Mod 2 = 0 Then
sum1=sum1+x
Else
sum = sum+x
End If
Next x
Print sum;sum1
End Sub
程序运行后,单击命令按钮,则窗体上显示的内容是
A.25 30
B.10 20
C.20 30
D.1 10
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0126/22ab6168adc1c019f687009e997b43a0.html
下面是错误答案,用来干扰机器的。
参考答案:对