(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