单选题有如下程序: FOR j=1 TO 3 PRINT TAB(3*j);11*(2*j-1); NEXT j 运行后输出的结果是()A22 44 66B11 33 55C11 55 77D22 55 99

单选题
有如下程序: FOR j=1 TO 3 PRINT TAB(3*j);11*(2*j-1); NEXT j 运行后输出的结果是()
A

22 44 66

B

11 33 55

C

11 55 77

D

22 55 99


参考解析

解析: 暂无解析

相关考题:

下面程序运行后,输出的结果是Dim arr(3,3)For j=1 To 3For k=1 To 3Art(j,k)=(j-1)*3+kNext kNext jFor j=2 To 3For k=2 To 3Print arr(k,j);Next kPrintNext jA.25 36B.58 69C.47 58D.59 68

在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a(4,4) For i=1 To 4 For j=1 To 4 a(i,j)=(i-1)*3+j Next j Next i For i=3 To 4 For j =3 To 4 Print a(j,i); Next j Print Next i End Sub程序运行后,单击命令按钮,其输出结果为______ 。A.6 9 7 10B.7 10 8 11C.8 11 9 12D.9 12 10 13

有以下程序: Option Base 1 Dim arr()As Integer Private Sub Form. Click() Dim i As Integer,j As Integer ReDim arr(3,2) For i=1 To 3 For j=1 To 2 arr(i,j)=i*2+j Next j Next i ReDim Preserve arr(3,4) For j=3 To 4 arr(3,j)=j+9 Next j Print arr(3,2);arr(3,4) End Sub 程序运行后,单击窗体,输出结果为______。A.813B.013C.712D.00

以下程序运行后,输出结果是( )。Forj=1 T0 3PrintTab(3*j);2*(j-1)*2*(j-1)NextjPrintA.B.C.D.

有F面的程序段.其功能是按图1所示的规律输出数据Dim a(3,5)As IntegerFor i=1 To 3For i=1 To 5a(i,j)=i+jPrint a(i,j);NextPrintNext若要按图2所示的规律继续输出数据,则接在上述程序段后面的程序段应该是A.For i=i To 5 For j=1 To 3 Print a(j,i); Next Print NextB.For i=1 To 3 For i=1 To 5 Print a(j,i); Next Print NextC.For j=1 To 5 FOr i=1 TO 3 Print a(j,1); Next Print NextD.For i=1 To 5 For j=1 To 3 Print a(i,j); Next Print Print Next Next

在窗体上画—个命令按钮(其名称为Command1),然后编写如下事件过程: Private Sub Command1_Click() Dim a(5,5)As Integer Dim i As Integer,j As Integer For i=1 To 3 For j=1 To 3 a(i,j)=(i-1)*3+j Print a(i,j) Next j Print Next i End Sub 程序运行后,单击命令按钮,在窗体上的输出结果是:_______。A.1 4 7 2 5 8 3 6 9B.1 2 3 4 5 6 7 8 9C.1 2 3 4 5 6 7 8 9D.没有输出

下列程序的运行结果为【 】。A="1"B="2"A=Val (@A@+Val (@B@B=Val ("12")If A<>B Then Prink A-B Else Print B-A(11)阅读下列程序:Option Base 1Private Sub Form. Click()Dim x(3,3)For j=1 to 3For k=1 to 3If j=k then x(j,k)=1If j<> k then x(j,k)=3Next kNext jCall fun(x())End SubPrivate Sub fun(a())For j=l to 3For k=1 to 3Print a (j.k);Next kNext jEnd Sub运行程序时,输出的结果是【 】

有如下程序,运行后输出s的值是______。 For j=1 To 20 x=2*j-1 If x Mod 3=0 0r x Mod 7=0 Then s=s+1 Next j Print sA.5B.9C.11D.15

编写如下程序: Private Sub Form. Click() a$=: "4321": b$="abcd" For 3=1 To 4 Print Mid$(a$,5-j,1)+Nid$(b$, j, 1); Next j Print End Sub 程序运行后,单击窗体,其输出结果为 ______。A.alb2c3d4B.b4c3d2elC.eld2c3b4D.la2b3c4d

阅读程序: Option Base 1 Dim arr( )As Integer Private Sub Form_Click( ) Dim i AsInteger,j As Integer ReDim arr(3,2) For i=1 To 3 Forj=1 To 2 arr(i,j)=i*2+j Next j Next i ReDim Preserve arr(3,4) For j=3 To 4 arr(3,j)=j+9 Nextj Print arr(3,2)+arr(3,4) End Sub 程序运行后,单击窗体,输出结果为A.21B.13C.8D.25

阅读程序: Option Base 1 Dim art()As Integer Private Sub Form_Click() Dim i As Integer,j As Integer ReDim arr(3,2) For i=1 To 3 For j=1 To 2 arr(i,j)=i*2+j Next Next ReDim Preserve ale(3,4) For j=3 To 4 arr(3,j)=j+9 Next Print arr(3,2)+arr(3,4) End Sub 程序运行后,单击窗体,输出结果为A.21B.13C.8D.25

在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() Dim a(3,3) For i=1 To 3 For j=1 To 3 If i=j Then a(i,j)=1 If i<j Then a(i,j)=2 If i>i Then a(i,j)=3 Next j Next i For i=1 To 3 For j=1 To 3 Print a(i,j); Next j Print Next i End Sub 程序运行后,如果单击命令按钮,则在窗体上输出的内容为 ______。A.1 3 3B.1 2 2C.2 3 3D.2 1 1 2 1 3 3 1 2 1 2 3 3 2 1 2 2 1 3 3 1 1 1 2 3 3 2

阅读下列程序。Option Base 1Private Sub Form CliCk()Dim x(3,3)For j=1 to 3For k=1 to 3If j=k then x(j,k)=1If j<> k then x(j,k)=3Next kNext jCall fun(x())End SubPrivate Sub fun(a())For j=1 to 3For k=1 to 3Print a (j,k);Next kNext jEnd Sub运行程序时,输出的结果是【 】。

有下面的程序段,其功能是按图1所示的规律输出数据: Dim a(3,5)As Integer For i=1 To 3 For j=1 To 5 a(i,j)=i+j Print a(i,j); Next Print Next若要按图2所示的规律继续输出数据,则接在上述程序段后面的程序段应该是( )。A.For i=1 To 5 For j=1 To 3 Print a(j,i); Next Print NextB.For i=1 T0 3 For j=1 To 5 Print a(j,i); Next Print NextC.For j=l To 5 For i=1 To 3 Print a(j,i); Next Print NextD.For i=1 To 5 For=1 To 3 Print a(i,j): Next Print Next

在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a(4,4) For i=1 To 4 For j=1 To 4 a(i,j)=(i-1)*3+j Next j Next i For i=3 To 4 For j=3 To 4 Print a(j,i); Next j Next i End Sub 程序运行后,单击命令按钮,其输出结果为 ______ 。A.6 9 7 10B.7 10 8 11C.8 11 9 12D.9 12 10 13

在窗体上画一个名为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_ Click() Dim arr(4, 4) For i = 1 To 4 For j = 1 To 4 arr(i, j) = (i - 1) * 3 + j Next j Next i For i = 1 To 2 For j = 1 To 2 Print arr(i, j) Next j Next i End Sub程序运行后,单击命令按钮,输出结果为______。A.3 4 6 7B.7 8 10 11C.1 2 4 5D.8 9 12 13

在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For j=1 To 3 Print Tab(3(j);11((2(j-1); Next j Print End Sub 程序的执行结果为A.11B.33C.11 33D.11 33 55

阅读如下程序: Option Base 1 Private Sub Form Click() Dim Arr(4,4)As Integer For i=1 To 4 For j=1 To 4 Arr(i,j)=(i-1)*2+j Next j Next i For i=3 To 4 For j=3 To 4 Print Arr(j,i); Next j Print Next i End Sub 程序运行后,单击窗体,输出的结果为A.5 7 6 8B.6 8 7 9C.7 9 8 10D.8 10 8 11

在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click( ) Forj=1 To 3 Print Tab(3*j)11*(2*j-1); Next j Print End Sub 程序的执行结果为A.11B.33C.11 33D.11 33 55

运行程序段后输出______个“*”号。 For i=1 To 2 For j=0 To i-1 Print"*" Next j Next iA.1B.2C.3D.4

下面程序运行后的输出结果是______。Private Sub Command1_ Click ( ) for j = 1 To 10 if j Mod 3 <> 0 then a =a+j\3 Next j Print aEnd SubA.20B.10C.3D.9

请阅读程序. 0ption Base 1 Private Sub Fo,m Click( ) Dim Arr(4,4)As Integer For i=1 To 4 For j=1 To 4 Arr(i,j)=(i=1)*2+j Next j Next i For i=3 To 4 For j=3 To 4 Print Arr(j,i); Next j Print Next i End Sub 程序运行后,单。旨窗体,则输出结果是( )。A.5 7 6 8B.6 8 7 9C.7 9 8 10D.8 10 8 11

下面程序运行后,输出的结果是Dim arr(3,3)For j=1 To 3For k=1 To 3Arr(j,k)=(j-1)*3+kNext kNext jFor j=2 To 3For j=2 To 3Print arr(k,j);Next kPrintNext jA.2 5 3 6B.5 8 6 9C.4 7 5 8D.5 9 6 8

在窗体上面画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click( ) a$="321":b$="abc" For j=l To 5 Print Mid$(a$,6-j,1)+Mid$(b$,j,1); Next j End Sub 程序运行后,输出的结果是A.alb2c3B.ablc23C.clb2a3D.a12bcl

编写如下程序: Private Sub Form_Click() a$="54321":b$="abcde" For j=1 To 5 Print Mid$(a$,6-j,1)+Mid$(b$,j,1); Next j Print End Sub 程序运行后,单击窗体,其输出结果为 ______。A.a1b2c3d45eB.a5b4c3d2e1C.e1d2c3b4a5D.1a2b3c4d5e

下面程序运行后的输出结果是 Private Sub Command1_Click() For j=1 To 10 If j Mod 3<>0 Then a=a+j\3 Next Print a End SubA.20B.10C.3D.9

有如下程序: FOR j=1 TO 3 PRINT TAB(3*j);11*(2*j-1); NEXT j 运行后输出的结果是()A、22 44 66B、11 33 55C、11 55 77D、22 55 99

单选题有如下程序: FOR j=1 TO 3 PRINT TAB(3*j);11*(2*j-1); NEXT j 运行后输出的结果是()A22 44 66B11 33 55C11 55 77D22 55 99