举一反三
- 运行如下程序后，输出结果为______。 a = 0 For j = 1 To 30 Step 2 a = a + j mod 5 Next j Print a
- 有如下程序： a=0 For j=1 To 20 Step 2 a=a+j\5 Next j Print a 运行后，输出的结果是______。 A: 12 B: 16 C: 40 D: 100
- 请阅读程序： Private Sub Form_Click() m=1 For i=4 To 1 Step-1 Print str(m); m=m+1 For j=1 To i Print "*"; Next j Print Next i End Sub 程序运行后，单击窗体，则输出结果是______。 A: 1**** 2*** 3** 4* B: 4**** 3*** 2* 1* C: **** *** **** * D: * ** *** ****
- 下列程序段的执行结果是______。 i=0 For j = 10 To 19 Step 3 i=i+1 Next j Print I A: 4 B: 5 C: 3 D: 6
- 在窗体上画一个名为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 7 B: 7 8 10 11 C: 1 2 4 5 D: 8 9 12 13
内容
- 0
在窗体上画一个名称为Command1的命令按钮 ，并编写如下程序：Option Base 1Private 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 iEnd Sub运行程序，单击命令按钮，则输出结果为______。 A: 6 9 7 10 B: 7 10 8 11 C: 8 11 9 12 D: 9 12 10 13
- 1
下面的程序段执行后共循环了 次 For i = 1 To 2 For j = 5 To 1 Step -1 Print i*j Next j Next i
- 2
在窗体上面一个名称为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 j For i=3 To 4 For j=3 To 4 Print a(j,i); Next j Print Ncxt i End Sub 运行程序，单击命令按钮，则输出结果为______。 A: 6 97 10 B: 7 108 11 C: 8 119 12 D: 9 1210 13
- 3
要求下面的程序运行后，显示如下结果：2 10 4 61 5 ...i][j]); printf( ); }
- 4
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2＜＞0 Then a=a-1 End If a=a+1 Next j Next i Print a End Sub 程序运行后，单击命令按钮，输出结果是 A: 0 B: 2 C: 3 D: 4