在窗体上添加一个命令按钮控件，名为Command1，事件过程如下，则执行结果是 Option Base 1 Private Sub Command1_Click() Dim a(5)As Integer Dim k As Integer Dim total As Integer a(1) = 2 a(2) = 5 a(3) = 4 a(4) = 10 a(5) = 6 For k = 1 To 5 Total = total + a(k) Next k Print total End SubA. 10 B
题目
在窗体上添加一个命令按钮控件，名为Command1，事件过程如下，则执行结果是 Option Base 1 Private Sub Command1_Click() Dim a(5)As Integer Dim k As Integer Dim total As Integer a(1) = 2 a(2) = 5 a(3) = 4 a(4) = 10 a(5) = 6 For k = 1 To 5 Total = total + a(k) Next k Print total End SubA. 10 B.15 C. 27 D. 35
相似考题
更多“在窗体上添加一个命令按钮控件,名为Command1,事件过程如下,则执行结果是 Option Base 1 Private ”相关问题
-
第1题：
窗体上命令按钮Command1的事件过程如下：
End Sub 该程序执行后，输出结果是（ ）。
正确答案：A
A) 【解析】本题考查二维数组元素的赋值。二维数组中a中第i行j列元素为(i-1)*3+j，i、J分别从3变化到4，因此，输出a(3，3)、a(3，4)、a(4，3)、a(4，4)的元素为：9 10 12 13。
-
第2题：
在一个窗体上添加一命令按钮控件，名为Command1，事件过程如下，则该过程的执行结果是( )。 option base 1 Private Sub Command1_Ctick() Dim a (5) As Integer Dim k As Integer Dim total As Integer a(1)=2 a(2)=5 a(3)=4 a(4)=10 a(5)=6 For k=1 To 5 total=total+a(k) Next k Print total End Sub
A．10
B．15
C．27
D．35
正确答案：C
-
第3题：
（ 15 ）在窗体上添加一个命令按钮（名为 Command1 ），然后编写如下事件过程：
Private Sub Command1_Click （）
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是 【 15 】 。
正确答案：
-
第4题：
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：
Private Sub Command1_Cliek
Dim b, k
For k = 1 to 6
b=23+k
Next k
MsgBox b + k
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是【 】。
正确答案：51
51 解析：本题循环内部完成b=231+2+3+4+5+6的操作，当k=7时，结束循环，故消息框中显示的是51。 -
第5题：
在一个窗体上添加一个命令按钮控件，名为Command1，事件过程如下，则执行结果是( )。 Option Base 1 Private Sub Command1_Cliek() Dim a(5) As Integer Dim k As Integer Dim tota1 As Integer a(1)=2 a(2)=5 a(3)=4 a(4)=10 a(5)=6 Fork=1 To 5 tota1=tota1+a(k) Next k Print total End Sub
A．10
B．15
C．27
D．35
正确答案：C
解析：要得到数组中的每个元素时，可以通过数组的下标来分别引用数组中的各个元素。本程序的作用是通过一个for循环，计算数组中各个元素值的总和并输出，for循环条件是1～5，因此循环了5次，即将数组元素a(1)-a(5)累加起来，所以最后输出结果为： 2+5+4+10+6=27。