niusouti.com
在窗体上添加一个名称为Command1的命令按钮，然后编写如下程序：Private Sub f(ByVa1 x As Integer)x=x+4End SubPrivate Sub Command1_Click()i=3Call f(1)If i＞4 Then i=i*2MsgBox iEnd Sub打开窗体运行后，单击命令按钮，则消息框的输出结果为______。
题目
在窗体上添加一个名称为Command1的命令按钮，然后编写如下程序：
Private Sub f(ByVa1 x As Integer)
x=x+4
End Sub
Private Sub Command1_Click()
i=3
Call f(1)
If i＞4 Then i=i*2
MsgBox i
End Sub
打开窗体运行后，单击命令按钮，则消息框的输出结果为______。
相似考题
参考答案和解析
3 解析：本题考查VBA中参数传递的知识。在VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVa1声明，说明此参数为传值调用；若用ByRef声明，说明此参数为传址调用：没有说明传递类型，则默认为传址传递。本题中在定义子过程f的时候用ByVa1声明了形参x，说明为传值调用，此时对x的任何更改不会影响调用它的实参i，所以执行完Call f(i)这条语句后i的值不变仍为3，当然也不满足If语句的条件，故此最后输出结果为3。
更多“在窗体上添加一个名称为Command1的命令按钮,然后编写如下程序: Private Sub f(ByVa1 x As Intege ”相关问题
-
第1题：
在窗体上添加一个命令按钮(名为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。 -
第2题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在面体上显示的内容是（ ）。
正确答案：A
A) 【解析】本题考查循环嵌套程序分析。外层循环共执行2次，第一次执行外循环，内层循环变量为1到1，执行一次；第二次执行外循环，内层循环变量为1到2，执行2次。String 函数产生i个“Hello”中的第一个字符H。
-
第3题：
在窗体上添加一个命令按钮(名为Command1)，然后编写如下程序：
Function m(x as Integer，y as Integer) as Integer
m=IIf(x＞y，x，y)
End Function
Private Sub Commandl Click()
Dim a as Integer,b as Integer
a=1
b=2
MsgBox m(a,B)
End Sub
打开窗体运行后，单击命令按钮，消息框的输出结果为【 】。
正确答案：2
2 解析：本题考查考生VBA程序设计的能力。在本题中，考生应该掌握IIF条件接口。题目中调用函数m(x,y)，并将a的值传给x，将b的值传给y，因此x=1，y=2。对于函数IIf(x＞y,x,y)来说，其功能是当x＞y为真时返回x的值，当 x＞y为假时返回y的值。在本题中，因为x＞y为假，因此应该返回y的值，即返回2。 -
第4题：
在窗体中添加一个名称为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。 -
第5题：
在窗体上画一个命令按钮，名称为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时，退出循环。