Option Base 1Private Sub Command1_Click()Dim a(1 To 10)For j = 6 To 10a(j) = j * 2Next jPrint a(1) + a(j)End Sub程序运行后,单击命令按钮,输出结果是()。
A: 5
B: 20
C: 22
D: 显示出错信息
A: 5
B: 20
C: 22
D: 显示出错信息
举一反三
- 在窗体上画一个名为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
- 在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 Fori=4 To 1 Step-1 s=s+a(i)*j j*10 Next i Print s End Sub 程序运行后,单击命令按钮,其输出结果是______。 A: A) 12 B: B) 34 C: C) 1234 D: D) 4321
- 在窗体上画一个名为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4) j=1 For i=4 To 1 Step_1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序,其输出结果是______。 A: 1234 B: 12 C: 34 D: 4321
- 在窗体上面一个名为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For i=4 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print S End Sub 运行上面的程序,其输出结果是( ) A: 1234 B: 12 C: 34 D: 4321
- 在窗体上画一个名为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For i=3 To 1 Step-1 s=s+a(i)*j j=j*10 Next i Print s End Sub 运行上面的程序,其输出结果是 A: 1234 B: 12 C: 34 D: 4321