|
( ) | 1.請問此圖 那一個的真值表
(第二天測驗-03) |
|
| (1) | not |
|
| (2) | xor |
|
| (3) | I don't know |
|
| (4) | or |
|
| (5) | and |
|
( ) | 2.在Excel VBA中要宣告變數I為字串語法為
(第一天測驗-07) |
|
| (1) | dim I as integer |
|
| (2) | dim I as single |
|
| (3) | dim I as string |
|
| (4) | dim I as date |
|
| (5) | I don't know |
|
( ) | 3.工作表如圖 ，若執行底下程式會顯示什麼?
Sub test9()
Dim i As Integer
i = 1
Do While Cells(1, i).Value <> ""
i = i + 1
Loop
MsgBox i
End Sub
(第三天測驗-24) |
|
| (1) | 5 |
|
| (2) | 6 |
|
| (3) | I don't know |
|
| (4) | 4 |
|
| (5) | 3 |
|
( ) | 4.在Excel VBA的中斷模式時，按那一個按鈕可以逐一行執行
(第二天測驗-25) |
|
| (1) | shift+F8 |
|
| (2) | Ctrl+Shift+F9 |
|
| (3) | I don't know |
|
| (4) | F8 |
|
| (5) | F5 |
|
( ) | 5.工作表如圖，若執行底下程式會顯示什麼?
Sub test8()
Dim i As Integer
i = 1
Do While Cells(1, i + 1).Value <> ""
i = i + 1
Loop
MsgBox i
End Sub
(第三天測驗-23) |
|
| (1) | 3 |
|
| (2) | 5 |
|
| (3) | 6 |
|
| (4) | I don't know |
|
| (5) | 4 |
|
( ) | 6.在Excel VBA中要顯示一段文字hello那一段語法是對的
(第一天測驗-11) |
|
| (1) | say hello |
|
| (2) | I don't know |
|
| (3) | msgbox hello |
|
| (4) | msgbox "hello" |
|
| (5) | say "hello" |
|
( ) | 7.底下程式執行時會在即時視窗顯示什麼
Sub test4()
Dim std_no As Variant
no = Split("國文,英文,數學,理化", ",")
Debug.Print no(3) '顯示陣列索引為3的資料
End Sub
(第四天測驗-06) |
|
| (1) | I don't know |
|
| (2) | 國文 |
|
| (3) | 英文 |
|
| (4) | 數學 |
|
| (5) | 理化 |
|
( ) | 8.底下程式執行時會在即時視窗顯示什麼
Sub test2()
Dim no As Variant
no = Array(1, 2, 3, 4, 5)
Debug.Print no(5) '顯示陣列索引為5的資料
End Sub
(第四天測驗-03) |
|
| (1) | 4 |
|
| (2) | 1 |
|
| (3) | I don't know |
|
| (4) | 出現陣列索引超出範圍 |
|
| (5) | 3 |
|
( ) | 9.Dim StdNo(10) as String這樣的宣告跟底下那一個相同
(第四天測驗-05) |
|
| (1) | Dim StdNo(1 to 10) as String |
|
| (2) | Dim StdNo(0 to 10) as String |
|
| (3) | Dim StdNo(0 to 10) as date |
|
| (4) | Dim StdNo(10) as Integer |
|
| (5) | I don't know |
|
( ) | 10.在Excel物件的使用方式中是用什麼來表示階層
(第一天測驗-10) |
|
| (1) | 句號 |
|
| (2) | 等號 |
|
| (3) | 冒號 |
|
| (4) | 減號 |
|
| (5) | I don't know |
|
( ) | 11.在Excel VBA的即時視窗輸入 print 1+2+3 請問會顯示
(第二天測驗-28) |
|
| (1) | 1+2+3 |
|
| (2) | 6 |
|
| (3) | 0 |
|
| (4) | I don't know |
|
| (5) | 123 |
|
( ) | 12.MsgBox的回傳值型別是
(第一天測驗-20) |
|
| (1) | date |
|
| (2) | I don't know |
|
| (3) | integer |
|
| (4) | string |
|
| (5) | single |
|
( ) | 13.請問 此圖那一個的真值表
(第二天測驗-01) |
|
| (1) | and |
|
| (2) | not |
|
| (3) | xor |
|
| (4) | I don't know |
|
| (5) | or |
|
( ) | 14.在Excel VBA的即時視窗輸入 print lcase("How are you")請問會顯示
(第二天測驗-24) |
|
| (1) | HOW ARE YOU |
|
| (2) | How are you |
|
| (3) | how are you |
|
| (4) | How Are You |
|
| (5) | I don't know |
|
( ) | 15.在Excel VBA中變數的宣告要使用那一個指令
(第一天測驗-15) |
|
| (1) | I don't know |
|
| (2) | dim |
|
| (3) | let |
|
| (4) | print |
|
| (5) | set |
|
( ) | 16.程式碼如下
LRandomNumber = Int ((300 - 200 + 1) * Rnd + 200)，請問LRandomNumber的範圍為
(第三天測驗-03) |
|
| (1) | 200 |
|
| (2) | 200<=LRandomNumber<=300 |
|
| (3) | 201 |
|
| (4) | 201<=LRandomNumber<=301 |
|
| (5) | I don't know |
|
( ) | 17.程式碼如下
For i= 1 to 10
cells(i,1).value=i
Next i
此程式的執行結果?
(第三天測驗-04) |
|
| (1) | 在儲存格A1:J1填入1到10 |
|
| (2) | 在儲存格A1:J1填入1到1 |
|
| (3) | I don't know |
|
| (4) | 在儲存格A1:A10填入1到10 |
|
| (5) | 在儲存格A1:A10都顯示1 |
|
( ) | 18.工作表如圖，若執行底下程式會顯示什麼?
Sub test1()
Dim i As Integer
i = 1
Do While Cells(i, 1).Value <> ""
i = i + 1
Loop
MsgBox i
End Sub
(第三天測驗-16) |
|
| (1) | 18 |
|
| (2) | I don't know |
|
| (3) | 15 |
|
| (4) | 16 |
|
| (5) | 17 |
|
( ) | 19.底下程式碼執行結果會在即時視窗出現
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) | 4,11 |
|
| (2) | 3,10 |
|
| (3) | 4,10 |
|
| (4) | 5,10 |
|
| (5) | I don't know |
|
( ) | 20.程式碼如下
For i= 1 to 10
cells(i,1).value=1
Next i
此程式的執行結果?
(第三天測驗-05) |
|
| (1) | 在儲存格A1:J1填入1到10 |
|
| (2) | 在儲存格A1:J1填入1到1 |
|
| (3) | I don't know |
|
| (4) | 在儲存格A1:A10填入1到10 |
|
| (5) | 在儲存格A1:A10都顯示1 |
|
( ) | 21.在ExcelVBA中要使用除(只取整數的商)要用那一個?
(第二天測驗-04) |
|
| (1) | * |
|
| (2) | mod |
|
| (3) | I don't know |
|
| (4) | \ |
|
| (5) | / |
|
( ) | 22.底下程式執行時會在即時視窗顯示什麼
Sub test7()
Dim i As Integer
Dim std_no(5) As Integer
For i = 1 To 5
std_no(i - 1) = i - 1
Next
Debug.Print std_no(3) '顯示陣列索引為3的資料
End Sub
(第四天測驗-09) |
|
| (1) | 1 |
|
| (2) | 2 |
|
| (3) | 3 |
|
| (4) | 4 |
|
| (5) | I don't know |
|
( ) | 23.在Excel中活頁簿的英文名稱為
(第一天測驗-01) |
|
| (1) | Application |
|
| (2) | I don't know |
|
| (3) | workbook |
|
| (4) | worksheet |
|
| (5) | excel |
|
( ) | 24.工作表如圖，若執行底下程式會顯示什麼?
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 |
|
( ) | 25.在Excel VBA中不等於的符號是
(第二天測驗-12) |
|
| (1) | >=< |
|
| (2) | == |
|
| (3) | I don't know |
|
| (4) | != |
|
| (5) | <> |
