问题
单项选择题
下列程序
Private Sub form_Click()
score=Int(Rnd * 10)+80
Select Case score
Case Is＜60:a$＝"F"
Case 60 To 69:a$＝"D"
Case 70 To 79:a$＝"C"
Case 80 To 89:a$="B"
Case Else:a$＝"A"
End Select
Print a$
End Sub
运行时输出的结果是
A．F
B．D
C．C
D．B
答案
参考答案：D
解析： 本题计算score用的表达式是Int(Rnd*10)+80，由于Rnd产生0到1之间的随机数，该随机数含。但不含1，乘10取整后其值是。到9之间的整数，加80后值是80到89之间的整数，多分支入口select Case score，测试表达式是score，从上到下检查Case中的表达式列表是否满足条件，本题中Case 80 To 89表达式满足条件，因此执行a $＝"B"，a$的值执行后为字符B，退出多分支后，输出字符B。