在窗体中添加一个名称为Command1的命令按钮，然后编写如下代码： Function F(a As Integer) b=0 Static c b=b+1 c=c+1 F=a+b+c End Function Private Sub Command1 Click() Dim a As Integer Dim b As Integer a=2 For i=1 To 3 b=F(A) Print b Next i End Sub 程序运行后，如果单击按钮，则在窗体上显示的内容是A．4 4 4B．4 5 6C
题目
在窗体中添加一个名称为Command1的命令按钮，然后编写如下代码： Function F(a As Integer) b=0 Static c b=b+1 c=c+1 F=a+b+c End Function Private Sub Command1 Click() Dim a As Integer Dim b As Integer a=2 For i=1 To 3 b=F(A) Print b Next i End Sub 程序运行后，如果单击按钮，则在窗体上显示的内容是
A．4 4 4
B．4 5 6
C．5 6 7
D．5 5 5
相似考题
更多“在窗体中添加一个名称为Command1的命令按钮,然后编写如下代码:FunctionF(a AsInteger)b=0Static ”相关问题
-
第1题：
在窗体中添加一个名称为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。 -
第2题：
在窗体中添加一个命令按钮(名称为Command1)，然后编写如下代码： Private Sub Command1_Click() a=3:b=4:c=5 MsgBox a=b+c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为( )。
A．0
B．9
C．a=9
D．假
正确答案：D
解析： 本题考查VBA程序设计的基础知识。程序中的”MsgBox a=b+c”语句中的“=”的含义是判断是否相等而不是赋值，这条语句的含义是在消息框中显示a与b+c的值比较的结果t由于变量的初值”a=3:b=4:c=5”。所以判断条件语句相当于判断3=9是否为真，很明显结果为假，所以消息框的输出结果为逻辑假False。 -
第3题：
在窗体中添加一个命令按钮（名称为Command1），然后编写如下代码： Private Sub Command1_Click（) a=0:b=5:c=6 MsgBox？ a=b+c End Sub 窗体打开运行后，如果单击命令按钮，则消息框的输出结果为（)。
A．11
B．a=11
C．0
D．假
1234 -
第4题：
在窗体中添加—个名称为Command1的命令按钮，然后编写如下代码： Function F(a As Integer) b=0 Static c b=b+1 C=c+1 F=a+b+c End Function Private Sub Command1_Click( ) Dim a As Integer Dim b As Integer a=2 For i=l To 3 b=F(A)Print b Next i End Sub 程序运行后，如果单击按钮，则在窗体上显示的内容是
A．4 4 4
B．4 5 6
C．5 6 7
D．5 5 5
正确答案：B
解析：解题的关键是理解Static定义变量，使变量具有的数据存储功能。本题在Fori的三次循环中，每调用一次函数过程F(a)，c的值都会在上次调用的基础上加1，b的数值保持不变，a的数值也保持不变，故单击按钮时，窗体上显示的内容为B项内容，即数值分别为4、5、6。 -
第5题：
（ 11 ）在窗体中添加一个命令按钮（名称为 Command1 ），然后编写如下代码：
Private Sub Command1_Click( )
Static b As Integer
b=b+1
End Sub
窗体打开运行后，三次单击命令按钮后，变量 b 的值是 【 11 】 。
正确答案：