一、选择题 16. 下列程序的功能是计算surn=1+(1+3)+(1+3+5)+…+(1+3+5+…+39)
Private Sub Command34 Click()
t=0
m=1
sum=0
Do
t=t+m
sum=stum+t
m=______
Loop While m<=39
MsgBox"Sum="&sum
End Sub
为保证程序正确完成上述功能,横线处应填入的语句是______。
A B C D
B
[解析] 观察要计算的式子,可以得出每次循环的步长是2,t是每次生成下一个子式的变量,增加量由m变量来完成。
22. 已知过程对应的代码如下:
Sub Proc()
n=1
f1=0
f2=1
Do While n<=8
f=f1+f2
Debug.Print f
f1=f2
f2=f
n=n+1
Loop
End Sub
过程Proc在立即窗口中显示的结果是______。
A.斐波那契序列中2到9对应的序列值 B.斐波那契序列中2到8对应的序列值 C.整数1到n(n<9)对应的累加和 D.整数1到n(n<8)对应的累加和
A B C D
A
[解析] 首先,可以看出While循环执行8次(n<=8);然后按照程序的语句,写出部分执行结果:第一次循环n=1时,输出f=1;第二次循环n=2,输出f=2;第三次循环n=3,输出f=3……我们发现输出的是一个斐波那契数列(0、1、1、2、3、…即Fn =Fn-1 +Fn-2 (n>=2,n∈N*)),由斐波那契数列的定义可知,该程序缺少了第0、1两项,从第2项开始输出。因此,本题应选择A选项。
34. MsgBox函数使用的正确语法是______。
A.MsgBox(提示信息[,标题][,按钮类型]) B.MsgBox(标题[,按钮类型][,提示信息]) C.Usgnox(标题[,提示信息][,按钮类型]) D.MsgBox(提示信息[,按钮类型][,标题])
A B C D
D
[解析] MsgBox函数的语法格式为: MsgBox(Prompt[, Buttons][, Title][, Helpfile][, Context]) 其中Prompt是必需的,其他为可选参数。