单项选择题

有如下程序
Private Sub Command1_Chck( )
s=0
DO
s=(s+1) *(s+2)
N=N+1
Loop Until s＞=10
Prim N；s
End Sub
运行后的输出结果是

A．0 1
B．30 30
C．4 30
D．2 12

<上一题目录下一题>

热门试题

单项选择题

在窗体中添加—个名称为Command1的命令按钮，然后编写如下代码： Function F(a As Integer) b=0 Static c b=b+1 C=c+1 F=a+b+c End Function Private Sub Command1_Click( ) Dim a As Integer Dim b As Integer a=2 For i=l To 3 b=F(a) Print b Next i End Sub 程序运行后，如果单击按钮，则在窗体上显示的内容是

A．4
4
4
B．4
5
6
C．5
6
7
D．5
5
5

单项选择题

在窗体中添加一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下代码： Private Sub Command1_Click( ) Dimaarray1(10，10)As Integer Dim i，j As Integer For i=1 To 3 For j=2 T0 4 Array1(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

相关试题