2007年9月全国计算机等级考试二级VB模拟试题(12)及答案

(21) 通过设置何属性可以改变所画图形的形状？
A) Shape       
B) Index
C) Enabled      
D) Height
正确答案:  A

(22) 在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
   s=1
   Do
      s=(s + 1) * (s + 2)
      Number=Number + 1
   Loop Until s >=30
   Print Number, s
End Sub
程序运行后，输出的结果是
A) 2 3       
B) 2 56
C) 5 12       
D) 10 20
正确答案:  B

(23) 下列程和序段的执行结果为
x=Int(Rnd() + 9)
Select Case x
   Case 10
      Print "excellent"
   Case 9
      Print "good"
   Case 8
      Print "pass"
   Case Else
      Print "fail"
End Select
A) excellent      
B) good
C) pass       
D) fail
正确答案:  B

(24) 下列程序段的执行结果为
a=75
If a > 60 Then Score=1
If a > 70 Then Score=2
If a > 80 Then Score=3
If a > 90 Then Score=4
Print " Score="; Score
A) Score＝1      
B) Score＝2
C) Score＝3      
D) Score＝4
正确答案:  B

(25) 下列程序段的执行结果为
I=1
x=5
Do
   I=I + 1
   x=x + 2
Loop Until I >=7
Print "I="; I
Print "x="; x
A) I＝4       
  x＝5 
B) I＝7
 x＝15
C) I＝6       
   x＝8  
D) I＝7      
   x＝17
正确答案:  D