下列程序 Private Sub form_Click() score=Int(

问题单项选择题

下列程序 Private Sub form_Click() score=Int(Rnd * 10)+80 Select Case scoreCase 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。