运行下列程序:
Private Sub Command1_Click( )
x = 1
z = InputBox("请输入一个整数2")
Select Case z
Case Is > 0
y = x + 1
Case Is = 0
y = x - 2
Case Else
y = x + 5
End Select
Print x; y
End Sub
从键盘输入2,输出的结果是( )。
A.0 1
B.1 2
C.1 3
D.5 5
运行下列程序:
Private Sub Command1_Click( )
x = 1
z = InputBox("请输入一个整数2")
Select Case z
Case Is > 0
y = x + 1
Case Is = 0
y = x - 2
Case Else
y = x + 5
End Select
Print x; y
End Sub
从键盘输入2,输出的结果是( )。
A.0 1
B.1 2
C.1 3
D.5 5
B
VIP截止日期:2025-01-02 10:43:19
←请使用支付宝扫码支付VIP截止日期:2025-01-02 10:43:19
←请使用微信扫码支付