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

開始測驗時間:2026-07-27 22:42:50
其他相關測驗:
最新考題: 154004A17托育人員892題(任選80題)  環境保護共同科目900080A16共100題(任選80題)  職業安全衛生共同科目900060A18共100題(任選80題) 
考卷名稱.: Excel VBA實務班(第二班)測驗(全部95題任選25題)
android版安裝(.APK)
使用者名稱:
記住1週時間
查看考試結果密碼:
  紙本測驗
※可以直接用滑鼠點選答案選項作答
字體大小:A  A  A  將未填答自動填: 1到4亂數   1   2   3   4  
  
  考試題目
( )1.在Excel VBA的即時視窗輸入 print 5/2 請問會顯示       (第二天測驗-07)
(1)I don't know
(2)2.5
(3)2
(4)1
(5)0
( )2.在Excel VBA的即時視窗輸入 print lcase("How are you")請問會顯示       (第二天測驗-24)
(1)How Are You
(2)I don't know
(3)HOW ARE YOU
(4)How are you
(5)how are you
( )3.在Excel VBA中下列那一個敍述是錯的       (第一天測驗-03)
(1)I don't know
(2)i+1=i
(3)let i=i+1
(4)i=i
(5)i=-i
( )4.在圖中的數字1代表       (第一天測驗-23)
(1)I don't know
(2)row(列)
(3)column(行)
(4)worksheet
(5)cell
( )5.在Excel VBA的中斷模式時,按那一個按鈕可以逐一行執行       (第二天測驗-25)
(1)I don't know
(2)F8
(3)F5
(4)shift+F8
(5)Ctrl+Shift+F9
( )6.在Excel VBA要強制宣告變數才可以使用,要在程式的最上方加上       (第二天測驗-15)
(1)Explicit
(2)dim
(3)I don't know
(4)Option Explicit
(5)Option
( )7.在Excel中活頁簿的英文名稱為       (第一天測驗-01)
(1)worksheet
(2)excel
(3)Application
(4)I don't know
(5)workbook
( )8.底下程式執行時會在即時視窗顯示什麼
Sub test6()
    Dim i As Integer
    Dim std_no(5) As Integer
    
    For i = 1 To 5
        std_no(i) = i
    Next
    
    Debug.Print std_no(3)   '顯示陣列索引為3的資料
End Sub       (第四天測驗-08)
(1)I don't know
(2)1
(3)2
(4)3
(5)4
( )9.工作表如圖,若執行底下程式會顯示什麼?
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
       (第三天測驗-22)
(1)86
(2)62
(3)38
(4)41
(5)I don't know
( )10.程式碼如下
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
( )11.程式碼如下

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

end sub       (第三天測驗-08)
(1)在儲存格B2:B11顯示10到1的數字
(2)在儲存格C2:C11顯示10到1的數字
(3)在儲存格D2:D11顯示10到1的數字
(4)I don't know
(5)在儲存格A2:A11顯示10到1的數字
( )12.底下程式執行時會在即時視窗顯示什麼
Sub test2()
    Dim no As Variant
    no = Array(1, 2, 3, 4, 5)
    Debug.Print no(5)   '顯示陣列索引為5的資料
End Sub       (第四天測驗-03)
(1)1
(2)I don't know
(3)出現陣列索引超出範圍
(4)3
(5)4
( )13.插入按鈕是那個圖示       (第一天測驗-18)
(1)
(2)
(3)
(4)
(5)I don't know
( )14.在Excel VBA參數與參數中間是用什麼符號區隔       (第一天測驗-30)
(1)冒號
(2)減號
(3)I don't know
(4)逗點
(5)等號
( )15.程式碼如下
For i= 1 to 10 
      cells(1,i).value=i
Next i
此程式的執行結果?       (第三天測驗-06)
(1)I don't know
(2)在儲存格A1:A10填入1到10
(3)在儲存格A1:A10都顯示1
(4)在儲存格A1:J1填入1到10
(5)在儲存格A1:J1填入1到1
( )16.請問此圖那一個的真值表       (第二天測驗-01)
(1)and
(2)not
(3)xor
(4)I don't know
(5)or
( )17.底下程式執行時會在即時視窗顯示什麼
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
(5)I don't know
( )18.在圖中的數字6代表       (第一天測驗-28)
(1)I don't know
(2)workbook
(3)worksheet
(4)range
(5)cell
( )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,10
(2)5,10
(3)I don't know
(4)4,11
(5)3,10
( )20.程式碼如下
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
( )21.在ExcelVBA中要使用除(只取整數的商)要用那一個?       (第二天測驗-04)
(1)\
(2)/
(3)*
(4)mod
(5)I don't know
( )22.使用array函數建立陣列,型別必須為       (第四天測驗-01)
(1)int
(2)string
(3)date
(4)I don't know
(5)variant
( )23.請問此圖i若變成95,執行時會在即時視窗顯示       (第二天測驗-22)
(1)
(2)
(3)
(4)I don't know
(5)
( )24.在ExcelVBA中要使用餘數要用那一個?       (第二天測驗-05)
(1)*
(2)mod
(3)I don't know
(4)\
(5)/
( )25.工作表如圖,若執行底下程式會顯示什麼?
Sub test6()
    Dim i As Integer
    
    i = 1
    
    Do While Cells(i + 1, 3).Value <> "" Or Cells(i + 2, 3).Value <> ""
       i = i + 1
    Loop
    
    MsgBox Cells(i, 3).Value

End Sub       (第三天測驗-21)
(1)I don't know
(2)62
(3)41
(4)50
(5)59
 
  

勤學智慧小語:【23.久習不成易,此事定非有。只要你願意不斷地去學,沒有一件事情是學不成功的。】
1小時內上線人數:752 人

您有要購買官網Apple產品嗎?可以透過https://joymall.co/3FKHW?uid1=exam&uid2=txt&uid3=url 連結去購買會有分潤支持網站營運