下列程序 Private Sub form_Click() score=Int(Rnd * 10)+80 Select Case score Case Is<60:a$="F" Case 60 To 69:a$="

admin2010-03-30  24

问题 下列程序    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

答案8

解析 本题计算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。
转载请注明原文地址:https://jikaoti.com/ti/pTg0FFFM
0

最新回复(0)