| ( | ) | 1. | 工作表如圖 ，若執行底下程式會顯示什麼?Sub test9() Dim i As Integer i = 1 Do While Cells(1, i).Value <> "" i = i + 1 Loop MsgBox i End Sub(1)6 (2)4 (3)3 (4)5 | ||
| ( | ) | 2. | inputbox的回傳值型別是(1)date (2)integer (3)string (4)single | ||
| ( | ) | 3. | 在 圖中的數字3代表(1)row
(2)column
(3)range
(4)cell
| ||
| ( | ) | 4. | 在Excel VBA的即時視窗輸入 print len("中文字abc")請問會顯示(1)3 (2)0 (3)6 (4)9 | ||
| ( | ) | 5. | 程式碼如下 For i= 1 to 10 cells(i,1).value=i Next i 此程式的執行結果?(1)在儲存格A1:J1填入1到10 (2)在儲存格A1:J1填入1到1 (3)在儲存格A1:A10填入1到10 (4)在儲存格A1:A10都顯示1 | ||
| ( | ) | 6. | 程式碼如下 For i= 1 to 10 cells(i,1).value=1 Next i 此程式的執行結果?(1)在儲存格A1:A10填入1到10 (2)在儲存格A1:A10都顯示1 (3)在儲存格A1:J1填入1到10 (4)在儲存格A1:J1填入1到1 | ||
| ( | ) | 7. | 在Excel VBA中下列那一個敍述是錯的(1)let i=i+1 (2)i=i (3)i=-i (4)i+1=i | ||
| ( | ) | 8. | 在Excel VBA的即時視窗輸入 print 5\2 請問會顯示(1)1 (2)0 (3)2.5 (4)2 | ||
| ( | ) | 9. | 工作表如圖，若執行底下程式會顯示什麼? Sub test1() Dim i As Integer i = 1 Do While Cells(i, 1).Value <> "" i = i + 1 Loop MsgBox i End Sub(1)16 (2)17 (3)18 (4)15 | ||
| ( | ) | 10. | 在Excel 2007要儲存含有巨集的格式,檔案副檔名為(1)txt (2)xlsm (3)xlsx (4)csv | ||
| ( | ) | 11. | 使用debug.print rnd(1)不可能產生那一個數字(1)1 (2)0 (3)0.99 (4)0.5 | ||
| ( | ) | 12. | 在Excel VBA中列的英文為(1)cell (2)x (3)row (4)column | ||
| ( | ) | 13. | 工作表如圖，若執行底下程式會顯示什麼? Sub test4() Dim i As Integer i = 1 Do While Cells(i + 1, 2).Value <> "" i = i + 1 Loop MsgBox Cells(i, 2).Value End Sub (1)63 (2)68 (3)0 (4)37 | ||
| ( | ) | 14. | 在Excel VBA的即時視窗輸入 print lcase("How are you")請問會顯示(1)HOW ARE YOU (2)How are you (3)how are you (4)How Are You | ||
| ( | ) | 15. | 工作表如圖，若執行底下程式會顯示什麼? Sub test8() Dim i As Integer i = 1 Do While Cells(1, i + 1).Value <> "" i = i + 1 Loop MsgBox i End Sub(1)3 (2)5 (3)6 (4)4 | ||
| ( | ) | 16. | 在Excel VBA中大於等於的符號是(1)<= (2)<> (3)>= (4)=> | ||
| ( | ) | 17. | 在Excel VBA的即時視窗輸入 print 2^3請問會顯示(1)1 (2)8 (3)6 (4)23 | ||
| ( | ) | 18. | 在Excel VBA中要宣告變數I為日期語法為(1)dim I as integer (2)dim I as single (3)dim I as string (4)dim I as date | ||
| ( | ) | 19. | 工作表如圖，若執行底下程式會顯示什麼? Sub test7() Dim i As Integer i = 1 Do While Cells(i + 1, 3).Value <> "" And Cells(i + 2, 3).Value <> "" i = i + 1 Loop MsgBox Cells(i, 3).Value End Sub (1)62 (2)38 (3)41 (4)86 | ||
| ( | ) | 20. | 在Excel VBA的即時視窗輸入 print 1+2+3 請問會顯示(1)0 (2)123 (3)1+2+3 (4)6 | ||
| ( | ) | 21. | 在Excel VBA的即時視窗輸入 print len(trim(" 1+2=3 ")) 請問會顯示(1)4 (2)5 (3)6 (4)0 | ||
| ( | ) | 22. | 在圖中的數字2代表(1)cell
(2)workbook
(3)worksheet
(4)range
| ||
| ( | ) | 23. | 在Excel VBA中物件屬性的圖示為(1)
(2)
(3)
(4)
| ||
| ( | ) | 24. | Dim StdNo(10) as String這樣的宣告跟底下那一個相同(1)Dim StdNo(0 to 10) as date (2)Dim StdNo(10) as Integer (3)Dim StdNo(1 to 10) as String (4)Dim StdNo(0 to 10) as String | ||
| ( | ) | 25. | 在Excel VBA要強制宣告變數才可以使用，要在程式的最上方加上(1)Option Explicit (2)Option (3)Explicit (4)dim |