<   Excel VBA實務班(第二班)測驗(全部95題任選25題)   >

免費免註冊,彰化一整天線上測驗:http://exam.bestdaylong.com/test2226.htm

( )1. 在Excel VBA中小於等於的符號是(1)>= (2)=> (3)<= (4)=<
( )2. 底下程式執行時會在即時視窗顯示什麼
Sub test3()
    Dim no As Variant
    no = Array(1, 2, 3, 4, 5)
    Debug.Print UBound(no)   '顯示陣列最大索引值
End Sub(1)3 (2)4 (3)5 (4)0
( )3. 底下程式碼執行結果會在即時視窗出現
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(1)3,-1 (2)5,0 (3)5,-2 (4)3,0
( )4. 在Excel 2007要儲存含有巨集的格式,檔案副檔名為(1)csv (2)txt (3)xlsm (4)xlsx
( )5. 在Excel VBA的即時視窗輸入 print 1 & 2 + 3 請問會顯示(1)15 (2)123 (3)6 (4)0
( )6. 程式碼如下

sub test()
    Dim i As Integer
    
    For i = 1 To 10
        Cells(i + 1, 1).Value = 11 - i
    Next i

end sub(1)在儲存格D2:D11顯示10到1的數字 (2)在儲存格A2:A11顯示10到1的數字 (3)在儲存格B2:B11顯示10到1的數字 (4)在儲存格C2:C11顯示10到1的數字
( )7. 底下程式執行時會在即時視窗顯示什麼
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(1)5 (2)7 (3)9 (4)3
( )8. 在Excel VBA中要宣告變數I為日期語法為(1)dim I as string (2)dim I as date (3)dim I as integer (4)dim I as single
( )9. Dim StdNo(10) as String這樣的宣告跟底下那一個相同(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
( )10. 下列那一個Excel VBA語法是正確的(1)range(a1).value=123 (2)cells("a1").value=123 (3)cells(1,1)=123 (4)excel.range("a1").text=123
( )11. 底下程式碼執行結果會在執行視窗出現
Sub test1()
    Dim i, n As Integer
    n = 0
    
    For i = 1 To 9 Step 4
       n = n + 1
    Next i
    Debug.Print n & "," & i
    
End Sub(1)3,10 (2)10,10 (3)3,13 (4)4,10
( )12. 請問此圖那一個的真值表(1)and (2)not (3)xor (4)or
( )13. 在Excel VBA中物件屬性的圖示為(1) (2) (3) (4)
( )14. 底下程式執行時會在即時視窗顯示什麼
Sub test4()
    Dim std_no As Variant
    no = Split("國文,英文,數學,理化", ",")
    Debug.Print no(3)   '顯示陣列索引為3的資料
End Sub(1)理化 (2)國文 (3)英文 (4)數學
( )15. 在Excel VBA的即時視窗輸入? Mid("daylong", 2, 3)請問會顯示(1)ay (2)ayl (3)yl (4)ylo
( )16. 程式碼如下
LRandomNumber = Int ((300 - 200 + 1) * Rnd + 200),請問LRandomNumber的範圍為(1)201
( )17. 插入按鈕是那個圖示(1) (2) (3) (4)
( )18. 圖中的數字1代表(1)cell (2)row(列) (3)column(行) (4)worksheet
( )19. 在ExcelVBA中要將3顯示在即時視窗要如何使用(1)print 3 (2)debug.print 3 (3)echo 3 (4)debug.echo 3
( )20. 在Excel VBA的即時視窗輸入 print mid("N1234",2,1) 請問會顯示(1)1 (2)2 (3)3 (4)N
( )21. 在Excel VBA中要宣告變數I為有小數語法為(1)dim I as string (2)dim I as date (3)dim I as integer (4)dim I as single
( )22. 工作表如圖,若執行底下程式會顯示什麼?
Sub test10()
    Dim i As Integer
    
    i = 1
    
    Do While Cells(6, i).Value <> ""
       i = i + 1
    Loop
    
    MsgBox i

End Sub(1)3 (2)4 (3)1 (4)2
( )23. 工作表如圖,若執行底下程式會顯示什麼?
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)41 (2)86 (3)62 (4)38
( )24. 在Excel VBA的即時視窗輸入 print 2^3請問會顯示(1)6 (2)23 (3)1 (4)8
( )25. 在ExcelVBA中要使用餘數要用那一個?(1)/ (2)* (3)mod (4)\

解答:
001.【3】002.【2】003.【1】004.【3】005.【1】006.【2】007.【2】008.【2】009.【2】010.【3】
011.【3】012.【1】013.【2】014.【1】015.【2】016.【4】017.【4】018.【1】019.【2】020.【1】
021.【4】022.【4】023.【2】024.【4】025.【3】

詳解: