网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

有如下程序,该程序的执行结果是【 】。

Private Sub Command1 Click()

For i=1 To 4

x=4

For j=1 To i

x =3

For k=1 To 2

x= x + 5

Next k

Next j

Next i

Print x

End Sub


参考答案

更多 “ 有如下程序,该程序的执行结果是【 】。Private Sub Command1 Click()For i=1 To 4x=4For j=1 To ix =3For k=1 To 2x= x + 5Next kNext jNext iPrint xEnd Sub ” 相关考题
考题 设有命令按钮Command1的单击事件过程,代码如下:Private Sub Command1_Click()Dim a(3,3)As IntegerFor i=1 To 3For j=1 To 3a(i,j)=i*j+iNext jNext iSum=0For i=1 To 3Sum=Sum+a(i,4-i)Next iPrint SumEnd Sub运行程序,单击命令按钮,输出结果是( )。A.20B.7C.16D.17

考题 有以下程序 main(){intx[]={1,3,5,7,2,4,6,0},i,j,k; for(i=0;i=i;j--) if(x[ 有以下程序 main() { int x[]={1,3,5,7,2,4,6,0},i,j,k; for(i=0;i<3;i++) for(j=2;j>=i;j--) if(x[j+1]>x[j]){ k=x[j];x[j]=x[j+1];x[j+1]=k;} for(i=0;i<3;i++) for(j=4;j<7-i;j++) if(x[j]>x[j+1]){ k=x[j];x[j];x[j+1];x[j+1]=k;} for(i=0;i<8;i++)printf("%d",x[i]); printf("\n"); } 程序运行后的输出结果是A.75310246B.1234567C.76310462D.13570246

考题 设有命令按钮Command1的单击事件过程,代码如下: Private Sub Command1 Click() Dim a(3,3)As Integer For i=1 To 3 For j=1 To 3 a(i,j)=i*j+i Next j Next i Sum=0 For i=1 To 3 Sum=Sum+a(i,4-i) Next i Print Sum End Sub 运行程序,单击命令按钮,输出结果是______。A.20B.7C.16D.17

考题 有以下程序:main(){int x[]={1,3,5,7,2,4,6,0},i,j,k; for(i=0;i=i;j--)if ( 有以下程序: main() { int x[]={1,3,5,7,2,4,6,0},i,j,k; for(i=0;i<3;i++) for (j=2;j>=i;j--) if (x[j+1)>x[j]){k=x[j];x[j];x[j+1);x[j+1]=k;} for (i=0;i<3;i++) for (j=4;j<7-i;j++) if (x[j]>x[j+1]){k=x [j];x[j]=x[j+1];x[j+1)=k;} for(i=0;i<8;i++)printf("%d",x[i]); printf("\n"); } 程序运行后的输出结果是 ______。A.75310246B.1234567C.76310462D.13570246

考题 有如下程序,单击command1后窗体显示结果是( )OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4,5)Fori=LBound( )ToUBound( )a(i)=i*a(i)NextiPrinti;UBound( )EndSubA.65B.625C.不确定D.程序出错

考题 在窗体上画一个命令按钮,然后编写如下程序:Dim x As IntegerSub inc(a As Integer)x=x+aEnd SubPrivate Sub Command1_Click()inc 2inc 3inc 4Msgbox x;End Sub程序执行后,单击Command1命令按钮,消息框显示结果是【 】。

考题 现有如下一段程序:Option base 1Private Sub Command1_Click()Dim aa=Array(3,5,7,9)X=1For i=4 to 1 step -1s=s+a(i)*xX=x*10NextPrint sEnd Sub执行程序,单击Command1命令按钮,执行上述事件过程中,输出结果是A)9753B)3579C)35D)79

考题 现有如下一段程序: Option Base 1 Privalc Sub Command1 Click( ) Dim a a=Array(3,5,7,9‘) x=1 For i=4,10 j Step-1 s=s+a(i)*X x=x*10 Next i Print s End Sub 执行程序,单击Command1命令按钮键,执行上述事件过程,输出结果是( )。A.9753B.3579C.35D.79

考题 执行下列程序后输出如下所示矩阵,填空将程序补充完整。1 0 0 20 3 4 00 5 6 07 0 0 8Private SubCommand1_Click()Dim a(4,4)For i=1 To 4For i=1 To 4If【 】Then【 】a(i,j)=kElsea(i,j)=0End IfPrint a(i,j);Next iPrintNext iEnd Sub