编写如下程序: Private Sub Commandl_Click() Dim a As Integer,b As Integer a=3:b=2 Ifa*b<10 Then b=b+1 Else b=b-1 End If P

admin2017-06-21  36

问题 编写如下程序:
Private Sub Commandl_Click()
Dim a As Integer,b As Integer
a=3:b=2
Ifa*b<10 Then
   b=b+1
Else
    b=b-1
End If
Print b.a>0
End Sub
程序运行后,单击命令按钮Commandl,输出结果为

选项 A、True
B、False
C、1
D、-1

答案B

解析 本题的程序中由于a*b<10条件成立,因此执行Then分支,b自加1变成3,最后输出b.a>0的值即False。
转载请注明原文地址:https://kaotiyun.com/show/1XGp777K
0

最新回复(0)