下列代码执行的结果是 .
Dima(5)
For i=1 to 5 :a(i)=i+2::next i
Print a(4)
Dima(5)
For i=1 to 5 :a(i)=i+2::next i
Print a(4)
举一反三
- 下列代码执行的结果是（ ）。 Private Sub Form_Click() Dim a(5) Dim i as Integer For i = 1 To 5 <br/>a(i) = i + 2 Next i Print a(4) End Sub A: 6 B: 8 C: 24 D: 2
- 下列程序段的执行结果为______。 DimA(10,10) Fori=2 To 4 Forj=4 To 5 A(i,j)-i*j Next j Next i PrintA(2,5)+A(3,4)+A(4,5)
- 下列这段代码执行后，消息框弹出的结果是______。 Dim i As Integer For i = 1 To 5 i += 2 Next i MsgBox(i)? 11|5|10|7
- 下列程序段的执行结果为 _______。 Dim a(3, 5) As Integer Dim i As Integer, j As Integer For i = 1 To 3 For j = 1 To 5 a(i, j) = a(i - 1, j - 1) + (i - 1) * 5 + j Next j Next i Print a(3, 4)
- 以下程序的运行结果是 Sub s1(b() As Integer) For i = 1 To 4 b(i) = 2 * i Next i End Sub Private Sub Command1_Click() Dim a(1 To 4) As Integer For i = 1 To 4 a(i) = i + 5 Next i s1 a() For i = 1 To 4 Print a(i) Next i End Sub