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

開始測驗時間:2025-12-17 15:19:49
其他相關測驗:
最新考題: 2025創價學會-聖人蒙難事B  2025創價學會-聖人蒙難事A  2025創價學會-聖人蒙難事-模擬試題 
考卷名稱.: Excel VBA實務班(第二班)測驗(全部95題任選25題)
android版安裝(.APK)
使用者名稱:
記住1週時間
查看考試結果密碼:
  紙本測驗
※可以直接用滑鼠點選答案選項作答
字體大小:A  A  A  將未填答自動填: 1到4亂數   1   2   3   4  
  
  考試題目
( )1.請問此圖那一個的真值表       (第二天測驗-02)
(1)or
(2)and
(3)not
(4)xor
(5)I don't know
( )2.在Excel VBA的中斷模式時,按那一個按鈕可以逐一行執行       (第二天測驗-25)
(1)shift+F8
(2)Ctrl+Shift+F9
(3)I don't know
(4)F8
(5)F5
( )3.MsgBox的回傳值型別是       (第一天測驗-20)
(1)I don't know
(2)integer
(3)string
(4)single
(5)date
( )4.程式碼如下
For i= 1 to 10 
      cells(1,i).value=1
Next i
此程式的執行結果?       (第三天測驗-07)
(1)在儲存格A1:J1填入1到1
(2)I don't know
(3)在儲存格A1:A10填入1到10
(4)在儲存格A1:A10都顯示1
(5)在儲存格A1:J1填入1到10
( )5.請問此圖那一個的真值表       (第二天測驗-03)
(1)not
(2)xor
(3)I don't know
(4)or
(5)and
( )6.在圖中的數字6代表       (第一天測驗-28)
(1)cell
(2)I don't know
(3)workbook
(4)worksheet
(5)range
( )7.工作表如圖,若執行底下程式會顯示什麼?
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)I don't know
(2)15
(3)16
(4)17
(5)18
( )8.Dim StdNo(10) as String這樣的宣告跟底下那一個相同       (第四天測驗-05)
(1)Dim StdNo(10) as Integer
(2)I don't know
(3)Dim StdNo(1 to 10) as String
(4)Dim StdNo(0 to 10) as String
(5)Dim StdNo(0 to 10) as date
( )9.請問此圖i若變成95,執行時會在即時視窗顯示       (第二天測驗-21)
(1)I don't know
(2)
(3)
(4)
(5)
( )10.在圖中的數字3代表       (第一天測驗-25)
(1)cell
(2)I don't know
(3)row
(4)column
(5)range
( )11.在Excel VBA中程式碼註解是用什麼字元       (第一天測驗-04)
(1)雙斜線
(2)冒號
(3)分號
(4)I don't know
(5)單引號
( )12.底下程式執行時會在即時視窗顯示什麼
Sub test1()
    Dim no As Variant
    no = Array(1, 2, 3, 4, 5)
    Debug.Print no(1)   '顯示陣列索引為1的資料
End Sub       (第四天測驗-02)
(1)1
(2)2
(3)3
(4)4
(5)I don't know
( )13.底下程式碼執行結果會在執行視窗出現
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       (第三天測驗-10)
(1)I don't know
(2)3,13
(3)4,10
(4)3,10
(5)10,10
( )14.工作表如圖,若執行底下程式會顯示什麼?
Sub test9()
    Dim i As Integer
    
    i = 1
    
    Do While Cells(1, i).Value <> ""
       i = i + 1
    Loop
    
    MsgBox i

End Sub       (第三天測驗-24)
(1)3
(2)5
(3)6
(4)I don't know
(5)4
( )15.在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
( )16.工作表如圖,若執行底下程式會顯示什麼?
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
       (第三天測驗-19)
(1)68
(2)0
(3)I don't know
(4)37
(5)63
( )17.底下程式碼執行結果會在即時視窗出現
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)0,5
(2)I don't know
(3)5,0
(4)5,1
(5)5,-1
( )18.在Excel中工作表的英文名稱為       (第一天測驗-02)
(1)excel
(2)Application
(3)I don't know
(4)workbook
(5)worksheet
( )19.修改Excel按鈕顯示文字是使用那一個屬性       (第一天測驗-16)
(1)name
(2)text
(3)value
(4)I don't know
(5)caption
( )20.在Excel VBA的即時視窗輸入 print mid("N1234",2,1) 請問會顯示       (第二天測驗-18)
(1)I don't know
(2)N
(3)1
(4)2
(5)3
( )21.在Excel 2007要儲存含有巨集的格式,檔案副檔名為       (第一天測驗-09)
(1)xlsm
(2)xlsx
(3)csv
(4)txt
(5)I don't know
( )22.在Excel VBA的即時視窗輸入 print 1 & 2 + 3 請問會顯示       (第二天測驗-30)
(1)6
(2)0
(3)15
(4)I don't know
(5)123
( )23.在Excel VBA的即時視窗輸入 print 1+2+3 請問會顯示       (第二天測驗-28)
(1)0
(2)I don't know
(3)123
(4)1+2+3
(5)6
( )24.底下程式執行時會在即時視窗顯示什麼
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)7
(2)9
(3)I don't know
(4)3
(5)5
( )25.在Excel VBA中要宣告變數I為有小數語法為       (第一天測驗-06)
(1)dim I as date
(2)I don't know
(3)dim I as integer
(4)dim I as single
(5)dim I as string
 
  

池田大作名言:【19、鼓勵,就是給予安心、希望和勇氣,是精神的觸發作業,點燃對方的生命,引出永不屈服的力量。】
1小時內上線人數:344 人

您有在MOMO購物嗎?可以透過https://pinkrose.info/32RI3?uid1=exam&uid2=text&uid3=url 連結去購物會有分潤支持網站營運