单项选择题

有如下程序：
x = InputBox("Input value of x")
Select Case x
Case Is ＞ 0
y=y+1
Case Is = 0
y=x + 2
Case Else
y=x + 3
End Select
Print x, y
运行时，从键盘输入-5，输出的结果是( )。

A．-5-2
B．-5-4
C．-5-3
D．-5-5

<上一题目录下一题>

热门试题

单项选择题

在窗体上画一个名称为Text1的文本框和一个名称为Commsnd1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Dim arrayl(10, 10) As Integer Dim i, j as Integer For i = 1 To 3 For j = 2 To 4 arrayl(i, j) = i+j Next j Next i Text1. Text=array1(2, 3) + array1(3, 4) End Sub程序运行后，单击命令按钮，在文本框中显示的值是( )。

A．12
B．13
C．14
D．15

单项选择题

在窗体上画一个名称为Command1的命令按钮和3个名称为Label1、Label2、Label3的标签，然后编写如下程序段： Private x As Integer Private Sub Command1_Click( ) Static y As Integer Dim z As Integer n =10 z = n+z y=y+z x=x+z Label1. Caption = x Label2. Caption = y Label3. Caption = z End Sub 运行程序，连续3次单击命令按钮后，则3个标签中显示的内容是( )。

A．10 10 10
B．30 30 30
C．30 30 10
D．10 30 30

相关试题