单项选择题

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click()
x=-3
If Sgn(x)Then
y=Sgn(x^2)
Else
y=Sgn(x)
End If
Print y
End Sub
程序运行后，单击命令按钮，其输出结果为 ______。

A．-3
B．9
C．-1
D．1

<上一题目录下一题>

热门试题

单项选择题

假定有如下的Sub过程： Sub Func(x As Single， y As Single) t=x x=t y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=6 b=5 Func(a, b) Print a, b End Sub 程序运行后，单击命令按钮，输出结果为 ______。

A．6 5
B．1 1
C．1.2 5
D．1.2 1

单项选择题

在窗体上画一个名称为command1的命令按钮，然后编写如下程序； Option Base 1 Private Sub Command1_Click() Dim arr(4)As String For i=1 To 4 arr(i) = Chr(Asc( A )+(i-1)) Next i For Each b1 In arr Print b1； Next End Sub 程序运行后，如果单击命令按钮，则在窗体上输出的内容为 ______。

A．ABCD
B．abcd
C．出错信息
D．1 2 3 4

相关试题