编写如下程序： Private Sub Commandl_Click() Dim score As Integer score=86 If score>85 Then r=1 Else Ifscore>60

admin2018-10-15 31

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

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

答案B

解析块结构条件语句的格式为：
If<条件1>  Then  ：  <语句块1>
[ElseIf  <条件2>  Then  ：<语句块2>]
[Else  ：  <语句块n>]
End If
如果“条件1”为True，则执行“语句块1”并跳出结构；否则如果“条件2”为True，则执行“语句块2”并跳出结构…否则执行“语句块n”并结束整个结构。

转载请注明原文地址:https://jikaoti.com/ti/9mm0FFFM

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