单项选择题
运行下列程序:
Private Sub form_Click()
t = Val(InputBox('请输入一个数:'))
x = t - 1
Select Case t
Case 1 To 10
y = 4 * t
Case Is > 10
y = 3 * t
Case Else
y = 2 * t
End Select
Print x; y
End Sub
运行时,从键盘输入4,输出的结果是()。
A.3 16
B.4 4
C.3 4
D.4 10
- A.3
B.4
C.3
D.4
点击查看答案&解析
相关考题
-
单项选择题
运行下列程序:Option Base 1Private Sub Form_Click()y = 43x = Array(21, 4, 50, 18, 23, 44, 87, 32, 67, 70)For i = 1 To 10If x(i) z = x(i) + 1y = x(i)Elsez = z + yEnd IfNext iPrint zEnd Sub单击窗体后,则在窗体上显示的结果是()。
A.43
B.21
C.37
D.44 -
单项选择题
运行下列程序:Private Sub Form_Click()a = 32: b = 5Doa = a / 2b = b + 1Loop While b Print aEnd Sub单击窗体后,则在窗体上显示的结果是()。
A.1
B.2
C.5
D.11 -
单项选择题
如果在立即窗口中执行以下操作:x=1 '表示回车,下同y=2Print x > y则输出结果是()。A. -1B.1C.FalseD.True
A.1
C.False
D.True
