单项选择题

在窗体上画一个命令按钮，然后写出如下事件过程：　　Private Sub Command1 _ Click( )　　　　S=1　　　　Do　　　　　　S=(S + 1) ^(S + 2)　　　　　　Number=Number+1　　　　Loop Until S＞=6　　　　Print Number，S　　End Sub　　程序运行后，输出的结果是

A．2 3
B．3 18
C．1 8
D．10 20
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个命令按钮，然后编写如下事件过程： Sub BTC(old Copy( ) As Integer，new Copy( ) As Integer) Dim i AS Integer For i=LBound(oldCopy( ))To UBound(oldCopy( )) newCopy(i)=oldCopy(i) Next i End Sub Private Sub Command1 _ Click( ) Dimm(10) As Integer，n(10)As Integer For i=1 To 10 m(i) =i*i Next i Call BTC(m，n) Print n(5) End Sub 程序运行后，单击命令按钮输出结果为
A．0
B．2
C．10
D．25
单项选择题
如下事件过程： Function Feed(x) If x ＜10 Then Feed=X Else Feed=10+x End If End Function Private Sub Command1_Click( ) x=Val(Input Box( ，0)) pay=Feed(x) Print pay End Sub 运行时在输入框内输入变量x的值为15，输出结果为
A．0
B．15
C．25
D．30
相关试题