考卷名稱:Excel VBA實務班(第二班)測驗(全部95題任選25題)
字體大小:A  A  A 
  考試題目
(1)1.在Excel VBA中程式碼註解是用什麼字元      (第一天測驗-04)
*(1)單引號
(2)雙斜線
(3)冒號
(4)分號
(2)2.在Excel VBA中要宣告變數I為有小數語法為      (第一天測驗-06)
(1)dim I as integer
*(2)dim I as single
(3)dim I as string
(4)dim I as date
(4)3.在Excel VBA中要宣告變數I為日期語法為      (第一天測驗-08)
(1)dim I as integer
(2)dim I as single
(3)dim I as string
*(4)dim I as date
(1)4.在Excel 2007要儲存含有巨集的格式,檔案副檔名為      (第一天測驗-09)
*(1)xlsm
(2)xlsx
(3)csv
(4)txt
(2)5.在Excel VBA中要顯示一段文字hello那一段語法是對的      (第一天測驗-11)
(1)msgbox hello
*(2)msgbox "hello"
(3)say "hello"
(4)say hello
(1)6.在Excel VBA中物件屬性的圖示為      (第一天測驗-12)
*(1)
(2)
(3)
(4)
(1)7.修改Excel按鈕顯示文字是使用那一個屬性      (第一天測驗-16)
*(1)caption
(2)name
(3)text
(4)value
(4)8.在圖中的數字1代表      (第一天測驗-23)
(1)row(列)
(2)column(行)
(3)worksheet
*(4)cell
(2)9.在圖中的數字6代表      (第一天測驗-28)
(1)workbook
*(2)worksheet
(3)range
(4)cell
(1)10.在Excel VBA的即時視窗輸入 print 2^3請問會顯示      (第二天測驗-09)
*(1)8
(2)6
(3)23
(4)1
(2)11.請問此圖程式執行結果      (第二天測驗-17)
(1)在變數i不等於5時會中斷程式
*(2)在變數i=5時會中斷程式
(3)在變數i<5時會中斷程式
(4)在變數i>5時會中斷程式
(2)12.在Excel VBA的即時視窗輸入 print mid("N1234",2,1) 請問會顯示      (第二天測驗-18)
(1)N
*(2)1
(3)2
(4)3
(4)13.在Excel VBA的即時視窗輸入 print instr("1+2=3","=") 請問會顯示      (第二天測驗-19)
(1)1
(2)2
(3)3
*(4)4
(1)14.請問此圖i若變成95,執行時會在即時視窗顯示      (第二天測驗-21)
*(1)
(2)
(3)
(4)
(2)15.在Excel VBA的即時視窗輸入 print right("N1234",1) 請問會顯示      (第二天測驗-27)
(1)N
*(2)4
(3)1
(4)2
(4)16.在Excel VBA的即時視窗輸入 print 1 & 2 + 3 請問會顯示      (第二天測驗-30)
(1)123
(2)6
(3)0
*(4)15
(4)17.程式碼如下
For i= 1 to 10 
      cells(1,i).value=1
Next i
此程式的執行結果?      (第三天測驗-07)
(1)在儲存格A1:A10填入1到10
(2)在儲存格A1:A10都顯示1
(3)在儲存格A1:J1填入1到10
*(4)在儲存格A1:J1填入1到1
(1)18.底下程式碼執行結果會在即時視窗出現
Sub test3()
    Dim i, n As Integer
    
    n = 0
    
    For i = 5 To 1 Step -1
       n = n + 1
    Next i
    Debug.Print n & "," & i
    
End Sub      (第三天測驗-12)
*(1)5,0
(2)5,1
(3)5,-1
(4)0,5
(1)19.底下程式碼執行結果會在即時視窗出現
Sub test4()
    Dim i, n As Integer
    
    n = 0
    
    For i = 5 To 1 Step -1
       n = n + 1
       i = i - 1
    Next i
    Debug.Print n & "," & i
    
End Sub      (第三天測驗-13)
*(1)3,-1
(2)5,0
(3)5,-2
(4)3,0
(3)20.工作表如圖,若執行底下程式會顯示什麼?
Sub test1()
    Dim i As Integer
    
    i = 1
    
    Do While Cells(i, 1).Value <> ""
       i = i + 1
    Loop
    
    MsgBox i

End Sub      (第三天測驗-16)
(1)15
(2)16
*(3)17
(4)18
(2)21.工作表如圖,若執行底下程式會顯示什麼?
Sub test5()
    Dim i As Integer
    
    i = 1
    
    Do While Cells(i + 2, 3).Value <> ""
       i = i + 1
    Loop
    
    MsgBox Cells(i + 1, 3).Value

End Sub      (第三天測驗-20)
(1)86
*(2)62
(3)38
(4)41
(1)22.底下程式執行時會在即時視窗顯示什麼
Sub test2()
    Dim no As Variant
    no = Array(1, 2, 3, 4, 5)
    Debug.Print no(5)   '顯示陣列索引為5的資料
End Sub      (第四天測驗-03)
*(1)出現陣列索引超出範圍
(2)3
(3)4
(4)1
(2)23.底下程式執行時會在即時視窗顯示什麼
Sub test3()
    Dim no As Variant
    no = Array(1, 2, 3, 4, 5)
    Debug.Print UBound(no)   '顯示陣列最大索引值
End Sub      (第四天測驗-04)
(1)3
*(2)4
(3)5
(4)0
(3)24.底下程式執行時會在即時視窗顯示什麼
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
(3)25.底下程式執行時會在即時視窗顯示什麼
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)3
(2)5
*(3)7
(4)9
 
考卷名稱:Excel VBA實務班(第二班)測驗(全部95題任選25題)
字體大小:A  A  A 
勵志智慧小語:【27.因為害怕躲到自己的殼裡,縮在自己的習氣裡,就會苟且偷安無法突破。】
1小時內上線人數:581 人

您有在蝦皮購物嗎?可以透過https://s.shopee.tw/5peImifZAH 連結去購物會有分潤1%支持網站營運