A-A+
运行下列程序:Private Sub form_Click()x = InputBox("请输入一个数:")Select Cas
问题详情
运行下列程序:
Private Sub form_Click()
x = InputBox("请输入一个数:")
Select Case x
Case Is > 0: y = x + 1: x = y + 1
Case Is = 0: y = x + 2: x = y + 2
Case Else: y = x + 3: x = y + 3
End Select
Print x; y
End Sub
从键盘输入1,输出的结果是()。
A.3 2
B.2 3
C.2 2
D.1 4