2. 计算机
  3. 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer Dim sum As Integer Dim su

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer Dim sum As Integer Dim su

admin2013-01-23  48
问题 在窗体上画一个名称为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
答案1
解析 程序的前部分给数组a赋初值，后部分利用For Each-Next语句对其进行循环操作，将奇数和偶数之和分别赋值给变量sum和sum1。本题的难点就是要理解For Each-Next语句。注意：For Each语句的控制变量必须为变体变量。窗体上显示的答案是1～10之内奇数与偶数之和。
转载请注明原文地址:https://www.kaotiyun.com/show/Oyhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)