二级二级VB2008年 9月全国计算机等级考试二级笔试试卷&(公共基础知识和Visual Basic语言程序设计

试卷预览

• 31为计算 a 的值，某人编写了函数 power如下：Private Function power (a As Integer, n As Integer) As Long  Dim p As Long  p=a  For k=1 To n    p=p*a  Next k  power=pEnd Function在调试时发现是错误的，例如 Print power(5,4)的输出应该是 625，但实际输出是 3125。程序需要修改。下面的修改方案中有 3 个是正确的，错误的一个是（    ）。

  A.把 For k=1 To n 改为 For k=2 To n

  B.把 p=p*a改为 p=p^n

  C.把 For k=1 To n 改为 For k=1 To n-1

  D.把 p=a 改为 p=1

  开始考试练习点击查看答案
• 32某人编写了下面的程序Private Sub Command1_Click( )  Dim a As Integer, b As Integer  a=InputBox("请输入整数")  b=InputBox("请输入整数")  pro a  pro b  Call pro(a+b)End SubPrivate Sub pro(n As Integer)  While (n>0)    Print n Mod 10;    n=n10  Wend  PrintEnd Sub此程序功能是：输入 2个正整数，反序输出这 2 个数的每一位数字，再反序输出这 2个数之和的每一位数字。例如：若输入 123 和234，则应该输出：3 2 14 3 27 5 3但调试时发现只输出了前 2 行（即2 个数的反序），而未输出第 3 行（即2 个数之和的反序），程序需要修改。下面的修改方案中正确的是（    ）。

  A.把过程 pro 的形式参数 n As Integer改为 ByVal n As Integer

  B.把 Call pro(a+b)改为pro a+b

  C.把 n=n10 改为n=n/10

  D.在 pro b语句之后增加语句 c%=a+b，再把 Call pro(a+b)改为 pro c

  开始考试练习点击查看答案