( )21. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) 12 (B) 10 (C) 9 (D) 6 Dim A, B As Integer A = 24 B = A - 1 While A Mod B > 0 B = B - 1 End While Console.WriteLine(B)

( ) 23. 執行下列 Visual Basic 程式片段，輸出結果為何? (A) B123456789 (B) 10123456789 (C) 123456789 (D) 11123456789 Dim A(), B(), S As String A = Split("A B C D E F G H I J K L M N O P Q R S T U V W X Y Z", " ") B = Split("10 11 12 13 14 15 16 17 34 18 19 20 21 22 35 23 24 25 26 27 28 29 32 30 31 33", " ") S = "B123456789" For k = 0 To UBound(A) If Left(S, 1) = A(k) Then S = Replace(S, A(k), B(k)) Next k Console.WriteLine(S)

( )21. 執行下列 Visual Basic 程式片段，輸出結果為何?
(A) 12
(B) 10
(C) 9
(D) 6

Dim A, B As Integer
A = 24
B = A - 1
While A Mod B > 0
B = B - 1
End While
Console.WriteLine
(B)

相關試題

相關試卷