计算机二级
若有以下程序，当程序运行后，单击命令按钮，则输出的结果为( )。 Private Sub Command1_Click() Dim a%(1 To 4), b%(3 To 6), i%, s1#, s2# For i= 1 To 4 a(i) = i Next i For i=3 To 6 b(i) = i Next i s1 = Factorial (A) s2 = Factorial (B) Print "s1="; s1; "s2="; s2 End Sub Function Factorial(a
题目
若有以下程序，当程序运行后，单击命令按钮，则输出的结果为( )。 Private Sub Command1_Click() Dim a%(1 To 4), b%(3 To 6), i%, s1#, s2# For i= 1 To 4 a(i) = i Next i For i=3 To 6 b(i) = i Next i s1 = Factorial (A) s2 = Factorial (B) Print "s1="; s1; "s2="; s2 End Sub Function Factorial(a() As Integer) Dim t#, i% t=1 For i = LBound(A)To UBound(A) t = t * a(i) Next i Factorial = t End Function
A．s1=360 s2=24
B．s1=24 s2=360
C．s1=24 s2=24
D．s1=360 s2=360
相似问题和答案
第1题：
阅读程序：
运行上面的程序，单击命令按钮，输出结果为______。
A．8 16
B．9 14
C．10 20
D．7 14
解析：本题的难点是子函数调用过程和Static变量。子函数有Static变量c，在第一次子函数调用时其值为2，局部变量b为2，但在第二次子函数调用时c为“c=2+2=4”，b为“b=0+2=2”。表达式“a*b*c”的结果通过子函数名F返回。
第2题：
在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序：
窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。
A. 3
B. 4
C. 6
D. 7
本题考查VBA中参数传递的知识。在 VBA的过程调用时，参数有两种传递方式：传址传递和传值传递。如果在过程声明时形参用ByVal声明，说明此参数为传值调用；若用 ByRef声明，说明此参数为传址调用：没有说明传递类型，则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x，说明为传值调用，此时对X的任何更改不会影响调用它的实参i，所以执行完Call f(i)这条语句后i的值不变仍为3，当然也不满足If语句的条件，故此最后输出结果为3。
第3题：
在窗体上添加一个命令按钮(名为Commandl)，然后编写如下程序：
打开窗体运行后，单击命令按钮，消息框的输出结果为__________。
20【解析】本题考查IIf函数的知识。对于Ⅱf函数可用于执行简单的条件判断操作，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为x>y为假，所以返回Y的值也就是返回20。
第4题：
在窗体上画一个名为Command1的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是_________。
4
【解析】本题考查了数组的嵌套使用。程序首先通过一个For循环给数组M的各个数组元素赋值，然后通过数组下标嵌套本身。注意：这样的嵌套时，要保证数组下标不出界，否则程序将出错。
第5题：
若有以下程序：
include ＜iostream＞
using namespace std;
class Sample
{
private:
const int n;
public:
Sample(int i) :n(i) {)
void print()
{
cout＜＜"n="＜＜n＜＜end1;
}
};
int main()
{
sample a(10);
a.print();
return 0;
}
上述程序运行后的输出结果是【 】。
n=10 解析：本题考核常成员数据的应用。类Sample中，定义了一个常数据成员n，所以构造函数只能通过初始化列表来初始化它。
第6题：
在窗体中添加一个名称为commandl的命令按钮，然后编写如下程序：
体打开运行后，单击命令按钮，则消息框的输出结果为（ ）
A. 3
B. 7
C. 9
D. 16
考查变量作用域的知识。在整个程序中定义了一个全局变量x，在命令按钮的单击事件中对这个x赋值为3，然后依次调用n和f2；在f1中对x平方；在t2中又用Dim定义了一个局部变量X，按照局部覆盖全局的原则，在f2中的操作都是基于局部变量x而不是全局变量x。故此最终的输出结果为9。
第7题：
在窗体上画一个名为Commandl的命令按钮，编写如下程序：
程序运行后，单击命令按钮，输出的结果是（ ）。
A. 4
B. 5
C. 6
D. 8
A) 【解析】本题考查数组中元素的分析。数组中的第k个元素的值为12-k，因此M(6)数据为6，M(8)为4。
第8题：
在窗体上画一个命令按钮，其名称为Commandl，然后编写如下事件过程：
程序运行后，单击命令按钮，其输出结果为__________。
9【解析】本题考查VBA中程序设计的知识。对于这个问题，首先注意到循环的次数为6次；然后注意到循环内的两个If语句为顺序关系而不是嵌套关系，第一个If语句只有第一次循环时才会满足；第一次循环时首先执行第一个If语句把x赋值为1，然后执行第二个If语句；以后各次循环均照此分析，前4次循环x自加l，后两次循环X自加2，最后输出结果为9。
第9题：
在窗体上有一个命令按钮，然后编如下事件过程：
程序运行后，单击命令按钮，在输入对话框内输入-1，输出结果是 。
-1的平方根是一个虚数
【解析】在Sub过程中，定义了一个Double型变量N，并调用InputBox函数，给N赋值，即将从对话框中输入的-1赋给N；通过运算符”&”，将N与字符串”的平方根”连接起来并赋给Msg；在条件块语句中将N作为参数，调用SR事件过程，将Function过程的返回值作为测试表达式；在SR函数中，调用Sgn函数测试x的值为正数还是负数，如果是正数，那么就执行条件块语句中的SR=Sqr(x)，即将X的平方根作为返回值，如果x值为零，Sgn函数返回值为零，那么就将0作为返回值；如果为负数。Sgn函数返回值为-1，SR=-1，即将-1作为返回值；在Sub程序的条件块语句中，根据SR返回值的不同，执行不同操作，当返回值为0，将Msg字符串加”是0”，赋给Ms9，如果是-1，将Msg加”是一个虚数”赋给Msg，当为其他时，即在平方根时，将字符串Msg加”是”，再加上这个数的平方根赋给Msg，并用MsgBox函数输出。
第10题：
在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序：
窗体打开运行后，单击命令按钮，则消息框的输出结果为__________。
2500【解析】本题考查循环的知识。这个问题比较简单，实际上就是求l到100之间的奇数和，最终结果为2500。