编写如下程序： 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 43

问题编写如下程序：
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://www.kaotiyun.com/show/eLQp777K

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