itgle.com
在窗体上添加一个命令按钮，名称为Command1，然后编写如下程序：Private Sub Command1_Click()sum=0For i=1 To 100 step 2sum=sum+iNext iMsgBox sumEnd Sub打开窗体运行后，单击命令按钮，则消息框的输出结果为_______。
题目
在窗体上添加一个命令按钮，名称为Command1，然后编写如下程序：
Private Sub Command1_Click()
sum=0
For i=1 To 100 step 2
sum=sum+i
Next i
MsgBox sum
End Sub
打开窗体运行后，单击命令按钮，则消息框的输出结果为_______。
相似考题
更多“在窗体上添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() sum ”相关问题
-
第1题：
在窗体中添加一个命令按钮，名称为Command1，然后编写如下程序：
Private Sub Command1_Click()
sum=0
For i=1 To 100 step 2
Next i
MsgBox sum
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。
正确答案：2500
2500 解析： 本题考查循环的知识。这个问题比较简单，实际上就是求1到100之间的奇数和，最终结果为2500。 -
第2题：
在窗体中添加一个名称为Coml的命令按钮，然后编写如下程序：
正确答案：
3【解析】本题考查VBA程序的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用，此时形参的变化不会返回到实参；若用ByRef声明，说明此参数为传址调用，此时形参的变化将会返回到实参；没有说明传递类型，则默认为传址传递。此题中形参P被说明为ByVal传值形式的整型量，当运行Cornl-click过程时调用s函数，实参i传送其值给形参P，P发生变化p=p*2=3*2=6。但因为使用的是ByVal传值传递，所以实参i的值不发生变化，if语句中的判断条件为假，所以会直接执行MsgBox i语句后输出3。 -
第3题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A．
B．H
C．
D．
正确答案：A
【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。 -
第4题：
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：
Private Sub Command1_Click()
Dim a As Integer,b As Integer
x=10
y=20
End Sub
打开窗体运行后，单击命令按钮，消息框的输出结果为( )。
正确答案：20
20 解析： 本题考查IIf函数的知识。对于IIf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x＞y为假，所以返回y的值也就是返回20。 -
第5题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在面体上显示的内容是（ ）。
正确答案：A
A) 【解析】本题考查循环嵌套程序分析。外层循环共执行2次，第一次执行外循环，内层循环变量为1到1，执行一次；第二次执行外循环，内层循环变量为1到2，执行2次。String 函数产生i个“Hello”中的第一个字符H。