编写如下程序: Private Sub Commandl Click() Dim scoreAs Integer score=86 If score>85 Then r=1 ElseIfscore>60 Then r=2 Else r=0 End If P

admin2015-12-09  19

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

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

答案B

解析 块结构条件语句的格式为:
If<条件1>Then
<语句块1>
[ElseIf<条件2>Then
<语句块2>]

[EIse
<语句块n>]
EndIf
如果“条件1”为True,则执行“语句块1”并跳出结构;否则如果“条件2”为True,则执行“语句块2”并跳出结构…否则执行“语句块n”并结束整个结构。
转载请注明原文地址:https://jikaoti.com/ti/hAJ0FFFM
0

最新回复(0)