下列程序执行后，n的值为n=0ForI=1To200IfIMod4=0Thenn=n+1NextI A: 5050 B: 50 C: 51 D: 33

以下程序段执行后整型变量n的值为()。n=0Fori=1to20Step5n=n+1Nexti A: 50 B: 4 C: 15 D: 210

下面程序段的运行结果为________。Fori=1To5n=1Forj=1Toin=n*jNextjPrintn;Nexti（5.0分）

执行了下面的程序后，组合框中数据项的值是( )。 PrivateSubForm_Click() Fori=1 To 6 Comb01.Addltem i Nexti Fori=1 To 3 Combol．Removeltem i Nexti End Sub A: 1 5 6 B: 1 3 5 C: 4 5 6 D: 2 4 6

下面程序段用来计算一个表达式的值,这个表达式是( )。DimsumAsDouble,xAsDoublen=0Fori=1to5x=n/isum=sum+xn=n+1Nexti A: 1+1/2+2/3+3/4+4/5 B: 1+1/2+1/3+1/4+1/5 C: 1/2+2/3+3/4+4/5 D: 1/2+1/3+1/4+1/5

执行下面的程序，消息框的输出结果是______。 option Base 1 PrivateSubCommandl_Click() Dima(10),P(3)As Integer K=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) NextI Fori=1 To 3 k=k+p(i)*2 Ncxti MsgBoxk End sub

在窗体上添加一个命令按钮，然后编写如下事件过程： Phvate Sub Commanl_Click() Dima(10)As Integer Dimp(3)As InteSer k=5 Fori=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(i*i) Nexti Fori=1 To 3 k=k+p(i)*2 Nexti Printk End Sub 该程序的运行结果为( )。 A: 35 B: 33 C: 31 D: 29

下面程序段的运行结果是（）。 FORI=1To9Step3 PrintI NextI A: 1、4 B: 1、4、7 C: 1、4、7、10 D: 1、1、1

下列程序求任意自然数（非负整数）的阶乘和（即1!+2!+...+n!），当输入非自然数后，用对话框提示“请输入自然数”，最后在窗体输出结果。Dimn%,i%,t!,s!n=Val(InputBox("n="))（______）Ifn<0OrInt(n)<>nThen（______）Else（______）（______）（______）Nexti（______）EndIf（8.33分）

下面程序段的运行结果是（）。 FORI=5To1Step-2 PrintI NextI A: 5 B: 5、3 C: 5、3、1 D: 5、3、1、-1