|
( ) | 1.在Excel VBA參數與參數中間是用什麼符號區隔
(第一天測驗-30) |
|
| (1) | I don't know |
|
| (2) | 逗點 |
|
| (3) | 等號 |
|
| (4) | 冒號 |
|
| (5) | 減號 |
|
( ) | 2.在Excel中活頁簿的英文名稱為
(第一天測驗-01) |
|
| (1) | workbook |
|
| (2) | worksheet |
|
| (3) | excel |
|
| (4) | Application |
|
| (5) | I don't know |
|
( ) | 3.MsgBox的回傳值型別是
(第一天測驗-20) |
|
| (1) | single |
|
| (2) | date |
|
| (3) | I don't know |
|
| (4) | integer |
|
| (5) | string |
|
( ) | 4.在Excel VBA的即時視窗輸入? Mid("daylong", 2, 3)請問會顯示
(第二天測驗-14) |
|
| (1) | ayl |
|
| (2) | yl |
|
| (3) | ylo |
|
| (4) | I don't know |
|
| (5) | ay |
|
( ) | 5.請問 此圖那一個的真值表
(第二天測驗-01) |
|
| (1) | and |
|
| (2) | not |
|
| (3) | xor |
|
| (4) | I don't know |
|
| (5) | or |
|
( ) | 6.在Excel VBA中物件方法的圖示為
(第一天測驗-21) |
|
| (1) | I don't know |
|
| (2) |  |
|
| (3) |  |
|
| (4) |  |
|
| (5) |  |
|
( ) | 7.在Excel VBA的即時視窗輸入 print ucase("How are you")請問會顯示
(第二天測驗-23) |
|
| (1) | HOW ARE YOU |
|
| (2) | How are you |
|
| (3) | how are you |
|
| (4) | How Are You |
|
| (5) | I don't know |
|
( ) | 8.請問 此圖i若變成95，執行時會在即時視窗顯示
(第二天測驗-21) |
|
| (1) | 甲 |
|
| (2) | 乙 |
|
| (3) | 丙 |
|
| (4) | 丁 |
|
| (5) | I don't know |
|
( ) | 9.工作表如圖 ，若執行底下程式會顯示什麼?
Sub test3()
Dim i As Integer
i = 1
Do While Cells(i, 2).Value <> ""
i = i + 1
Loop
MsgBox i
End Sub
(第三天測驗-18) |
|
| (1) | 7 |
|
| (2) | 8 |
|
| (3) | I don't know |
|
| (4) | 5 |
|
| (5) | 6 |
|
( ) | 10.底下程式執行時會在即時視窗顯示什麼
Sub test1()
Dim no As Variant
no = Array(1, 2, 3, 4, 5)
Debug.Print no(1) '顯示陣列索引為1的資料
End Sub
(第四天測驗-02) |
|
| (1) | 3 |
|
| (2) | 4 |
|
| (3) | I don't know |
|
| (4) | 1 |
|
| (5) | 2 |
|
( ) | 11.在Excel VBA中下列那一個敍述是錯的
(第一天測驗-03) |
|
| (1) | let i=i+1 |
|
| (2) | i=i |
|
| (3) | i=-i |
|
| (4) | I don't know |
|
| (5) | i+1=i |
|
( ) | 12.在 圖中的數字6代表
(第一天測驗-28) |
|
| (1) | I don't know |
|
| (2) | workbook |
|
| (3) | worksheet |
|
| (4) | range |
|
| (5) | cell |
|
( ) | 13.底下程式碼執行結果會在即時視窗出現
Sub test5()
Dim i, n As Integer
n = 0
For i = 1 To 10
If i Mod 3 = 1 Then
n = n + 1
End If
Next i
Debug.Print n & "," & i
End Sub
(第三天測驗-14) |
|
| (1) | I don't know |
|
| (2) | 4,11 |
|
| (3) | 3,10 |
|
| (4) | 4,10 |
|
| (5) | 5,10 |
|
( ) | 14.在Excel VBA中列的英文為
(第一天測驗-13) |
|
| (1) | I don't know |
|
| (2) | row |
|
| (3) | column |
|
| (4) | cell |
|
| (5) | x |
|
( ) | 15.在Excel VBA中小於等於的符號是
(第二天測驗-11) |
|
| (1) | >= |
|
| (2) | => |
|
| (3) | <= |
|
| (4) | =< |
|
| (5) | I don't know |
|
( ) | 16.工作表如圖，若執行底下程式會顯示什麼?
Sub test2()
Dim i As Integer
i = 1
Do While Cells(i + 1, 1).Value <> ""
i = i + 1
Loop
MsgBox i
End Sub
(第三天測驗-17) |
|
| (1) | 15 |
|
| (2) | 16 |
|
| (3) | 17 |
|
| (4) | 18 |
|
| (5) | I don't know |
|
( ) | 17.程式碼如下
sub test()
Dim i As Integer
For i = 1 To 10
Cells(i + 1, 1).Value = 11 - i
Next i
end sub
(第三天測驗-08) |
|
| (1) | 在儲存格B2:B11顯示10到1的數字 |
|
| (2) | 在儲存格C2:C11顯示10到1的數字 |
|
| (3) | 在儲存格D2:D11顯示10到1的數字 |
|
| (4) | I don't know |
|
| (5) | 在儲存格A2:A11顯示10到1的數字 |
|
( ) | 18.工作表如圖，若執行底下程式會顯示什麼?
Sub test9()
Dim i As Integer
i = 1
Do While Cells(1, i).Value <> ""
i = i + 1
Loop
MsgBox i
End Sub
(第三天測驗-24) |
|
| (1) | I don't know |
|
| (2) | 4 |
|
| (3) | 3 |
|
| (4) | 5 |
|
| (5) | 6 |
|
( ) | 19.在Excel VBA的即時視窗輸入 print right("N1234",1) 請問會顯示
(第二天測驗-27) |
|
| (1) | I don't know |
|
| (2) | N |
|
| (3) | 4 |
|
| (4) | 1 |
|
| (5) | 2 |
|
( ) | 20.在Excel VBA要強制宣告變數才可以使用，要在程式的最上方加上
(第二天測驗-15) |
|
| (1) | I don't know |
|
| (2) | Option Explicit |
|
| (3) | Option |
|
| (4) | Explicit |
|
| (5) | dim |
|
( ) | 21.底下程式執行時會在即時視窗顯示什麼
Sub test8()
Dim i As Integer
Dim std_no(5) As Integer
For i = 1 To 5
std_no(i - 1) = i * 2 - 1
Next
Debug.Print std_no(3) '顯示陣列索引為3的資料
End Sub
(第四天測驗-10) |
|
| (1) | I don't know |
|
| (2) | 3 |
|
| (3) | 5 |
|
| (4) | 7 |
|
| (5) | 9 |
|
( ) | 22.底下程式執行時會在即時視窗顯示什麼
Sub test4()
Dim std_no As Variant
no = Split("國文,英文,數學,理化", ",")
Debug.Print no(3) '顯示陣列索引為3的資料
End Sub
(第四天測驗-06) |
|
| (1) | 英文 |
|
| (2) | 數學 |
|
| (3) | 理化 |
|
| (4) | I don't know |
|
| (5) | 國文 |
|
( ) | 23.在Excel VBA中不等於的符號是
(第二天測驗-12) |
|
| (1) | I don't know |
|
| (2) | != |
|
| (3) | <> |
|
| (4) | >=< |
|
| (5) | == |
|
( ) | 24.底下程式執行時會在即時視窗顯示什麼
Sub test5()
Dim std_no As Variant
no = Split(",國文,英文,數學,理化", ",")
Debug.Print no(3) '顯示陣列索引為3的資料
End Sub
(第四天測驗-07) |
|
| (1) | I don't know |
|
| (2) | 國文 |
|
| (3) | 英文 |
|
| (4) | 數學 |
|
| (5) | 理化 |
|
( ) | 25.在Excel 中要如何在變數d設定為日期1972/3/31
(第一天測驗-29) |
|
| (1) | d='1972/3/31' |
|
| (2) | I don't know |
|
| (3) | d=1972/3/31 |
|
| (4) | d=#1972/3/31# |
|
| (5) | d="1972/3/31" |