问题
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click()Dim i As IntegerDim sum As IntegerDim sum1 As IntegerDim a(1 To 20)，xFor i = 1 To 10 a(i)=iNext iFor Each x In a If x Mod 2 = 0 Then sum1=sum1+x Else sum = sum+x End IfNext xPrint sum；sum1 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是
A．25 30
B．10 20
C．20 30
D．1 10
答案
参考答案：A
解析：
[分析]： 程序的前部分给数组a赋初值，后部分利用For Each-Next语句对其进行循环操作，将奇数和偶数之和分别赋值给变量sum和sum1。本题的难点就是要理解For Each-Next语句。注意：For Each语句的控制变量必须为变体变量。窗体上显示的答案是1～10之内奇数与偶数之和。