编写如下程序: Private Sub Command l_Click() Dim a As Integer,b As Integer a=3:b=2 If a*b<1 0 Then

admin2013-10-16  30

问题 编写如下程序:
    Private Sub Command l_Click()
         Dim a As Integer,b As Integer
         a=3:b=2
         If a*b<1 0 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/eLQp777K
0

最新回复(0)