( )6. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) BC (B) CD (C) ED (D) DC Dim X As String Dim Y(6) As Char X = "ABCDEF" For I = 0 To Len(X) - 1 Y(I) = Mid(X, I + 1, 1) Next I Console.WriteLine(Y(2) & Y(3))

( )11. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 12 (B) 13 (C) 7 (D) 8 ```vba Dim i, j As Integer Dim S(., ) As Integer = {{1, 2, 3, 4}, {5, 6, 7, 8}, {9, 10, 11, 12}, {13, 14, 15, 16}, {17, 18, 19, 20}} For i = 0 To 3 For j = 0 To 3 If i = j Then S(i, j) = S(i, j) + 1 Else S(i, j) = S(i, j) + 2 End If Next j Next i Console.WriteLine(S(2, 2)) ```

( )6. 執行下列 Visual Basic 程式片段，輸出結果為何?
(A) BC
(B) CD
(C) ED
(D) DC
Dim X As String
Dim Y(6) As Char
X = "ABCDEF"
For I = 0 To Len(X) - 1
Y(I) = Mid(X, I + 1, 1)
Next I
Console.WriteLine(Y(2) & Y(3))

相關試題

相關試卷