( )7. 執行下列 Visual Basic 程式片段，輸出結果為何? (A)20 (B)21 (C)22 (D)29```vbaDim array As Integer() = New Integer(10) {}Dim i As Integerarray(0) = 1For i = 1 To 10array(i) = array(i - 1) + iNextConsole.WriteLine(array(6))```

( ) 17. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 1 (B) 7 (C) 8 (D) 9 ```vba Dim Number As String Number = "456789" Dim Int(5) As Integer Dim x, num, sun As Integer For x = 0 To 5 num = Number.Substring(x, 1) If (x + 1) Mod 2 <> 0 Then '偶數乘1奇數乘2 Int(x) = num * 2 Else Int(x) = num End If Next For x = 0 To 5 If (Int(x) > 9) Then Int(x) = Int(x) - 9 End If sun += Int(x) Next Console.WriteLine(sun Mod 10) ``` 第 6 頁，共 9 頁

( )7. 執行下列 Visual Basic 程式片段，輸出結果為何?
(A)20
(B)21
(C)22
(D)29

```vba
Dim array As Integer() = New Integer(10) {}
Dim i As Integer
array(0) = 1
For i = 1 To 10
array(i) = array(i - 1) + i
Next
Console.WriteLine(array(6))
```

相關試題

相關試卷