单项选择题

窗体上有1个名称为Command1的命令按钮，事件过程如下：Private Sub Command1_Click()　　m＝－3.6　　If Sgn(m)Then　　　　n＝Int(m)　　Else　　　　n＝Abs(m)　　End If　　Print nEnd Sub运行程序，并单击命令按钮，窗体上显示的内容为(　　)。

A．－4
B．－3
C．3
D．3.6
<上一题 目录 下一题>
热门 试题

单项选择题
设有如下事件过程：Private Sub Command1_Click() Dim a a＝Array(3， 5， 6， 3， 2， 6， 5， 3， 5， 4， 3， 9， 4， 5， 6， 3， 5) x＝0 n＝UBound(a) For i＝0 To n m＝0 For j＝0 To n If a(i)＝a(j)Then m＝m＋1 End If Next j If m>x Then x＝m： b＝a(i) Next i Print bEnd Sub运行程序，输出是( )。
A．2
B．3
C．5
D．9
单项选择题
设有如下事件过程：Private Sub Command1_Click() For i＝1 To 5 j＝i Do Print * j＝j－1 Loop Until j＝0 Next iEnd Sub运行程序，输出 * 的个数是( )。
A．5
B．15
C．20
D．25
相关试题