单选题编写如下程序：Private Sub Commandl—Click()Dim a As Integer，b As Integera=3b=2If a*b＜10 Then b=b+1 Else b=b—lPrint b—a＞0End Sub程序运行后，单击命令按钮Command1，输出结果为( )。

A、 True
B、 False
C、 1
D、一1

【正确答案】 B

【答案解析】解析：If…Else语句对b进行操作。a*b=6，＜10，所以执行b=b+1=3。Print语句中，b—a=0，条件为假。选B)。