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

admin2020-04-18  32

问题 编写如下程序:
    Private Sub Command1_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
    程序运行后,单击命令按钮Command1,输出结果为

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

答案B

解析 块结构条件语句的格式为:
    lf<条件l>Then  :  <语句块l>
    [ElseIf<条件2>Then  :<语句块2>]
    …
    [Else  :  <语句块n>]
    End If
    如果“条件1”为True,则执行“语句块1”并跳出结构:否则如果“条件2”为True,则执行“语句块2”并跳出结构…否则执行“语句块n”并结束整个结构。
转载请注明原文地址:https://jikaoti.com/ti/L4x0FFFM
0

最新回复(0)