【已刪除】26. ( C )(程式七) 執行後，S的值為何？
(A)63
(B)22
(C)33
(D)27

22. 如用For…Next計算1至100的奇數和，則(程式三)________內，應依序填入哪些數字？(A)2, 1 (B)1, 2 (C)2, 2 (D)1, 1 

23. (程式四)執行之結果，不可能出現的數值是：(A)6 (B)50 (C)32 (D)51

24. (程式五)執行後，表單中的標籤控制項共顯示幾個星號？(A)84個 (B)66個 (C)91個 (D)96個

25. (程式六) 執行後，SUM的值為何？(A)9 (B)7 (C)2 (D)0

【已刪除】27. 承上題，K+J的值為何？(A)17 (B)16 (C)12 (D)14 N = 0 For I = 1 To 50 　　If I Mod 17 = 0 Then 　　　　N = N + 1 　　End If Next I I = a Do While I < b 　　Debug.Print("*") 　　I = I + c Loop a = 27 : b = 15 : x = a : y = b Do Until a = b 　　If a > b Then a = a - b 　　If a < b Then b = b - a Loop MsgBox((x / a) & "/" & (y / a)) For I = 1 To 3 　　For J = 2 To 5 Step 3 　　　　For K = 1 To 4 　　　　　　S += 1 　　　　Next K 　　Next J Next I (程式八) (程式九) (程式十) (程式十一)

28. (程式八)執行後，N的值為何？(A)3 (B)4 (C)2 (D)5

29. 下列哪一組(a, b, c)的組合可以讓(程式九)執行後，列印5個 "*"？(A)(3, 7, 1) (B) (10, 20, 2) (C) (1, 5, -1) (D)(8, 3, -1)

30.(程式十)執行後，訊息交談窗顯示的結果為何？(A)5/9 (B)0.5555 (C)9/5 (D)1

【已刪除】31. (程式十一)時，"S += 1" 敘述會被執行多少次？(A)24 (B)9 (C)60 (D)30 Dim k(2, 3) For i = 1 To 2 　　For j = 1 To 3 　　　　If (i Mod 2 0 And j Mod 2 = 0) Then 　　　　　　k(i, j) = 5 　　　　Else 　　　　　　k(i, j) = k(i - 1, j - 1) + 1 　　　　End If 　　Next j Next i (圖一) (圖二) (程式十二)

【已刪除】32. 若陣列A之內容如(圖一)，執行MsgBox(A(A(1)-1)+1)指令後答案為何？(A)2 (B)1 (C)3 (D)4