编写如下程序： Private Sub Comoaand1_Click( ) Dim score As Integer score=86 If score＞85 Then r

admin2020-05-11 57

问题编写如下程序：
Private Sub Comoaand1_Click(  )
      Dim score As Integer
      score=86
      If score＞85  Then
         r=1
      ElseIf score＞60 Then
         r=2
      Else
         r=0
      End If
      Print r
End Sub
程序运行后，单击命令按钮Command1，输出结果为(       )。

选项 A、0
B、1
C、2
D、86

答案B

解析本题考查If…Else If…Else…End If语句。条件判断成立则执行对应分支的语句。 86＞85，所以r=1。选B。

转载请注明原文地址:https://kaotiyun.com/show/gEHp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类