第 1 頁：選擇題

第 3 頁：基本操作題

第 4 頁：簡單應(yīng)用題

第 5 頁：綜合應(yīng)用題

第 6 頁：參考答案及解析

　　(21)為了使文本框同時(shí)具有垂直和水平滾動(dòng)條，應(yīng)先把MultiLine屬性設(shè)置為True，然后再把SemllBars屬性設(shè)置為( )。

　　A.0

　　B.1

　　C.2

　　D.3

　　(22)文本框Textl的KeyDown事件過程如下：

　　Private Sub Textl—KeyDown(KeyCode As Integer，Shift As Integer)End Sllb

　　其中參數(shù)KeyCode的值表示的是發(fā)生此事件時(shí)( )。

　　A.是否按下了Alt鍵或Ctrl鍵

　　B.按下的是哪個(gè)數(shù)字鍵

　　C.所按的鍵盤鍵的鍵碼

　　D.按下的是哪個(gè)鼠標(biāo)鍵

　　(23)窗體上有一個(gè)名稱為HSerolll的滾動(dòng)條，程序運(yùn)行后，當(dāng)單擊滾動(dòng)條兩端的箭頭時(shí)，立即在窗體上顯示滾動(dòng)框的位置(即刻度值)。下面能夠?qū)崿F(xiàn)上述操作的事件過程是( )。

　　A.Private Sub HSemlll_Change( ) End SubPrint HSemlll.

　　B.Private Sub HScmlll_Change( )Value Print HScrolll.SmallChange End Sub

　　C.Private Sub HScrolll—Scroll( )Print HSerolll.ValueEnd Sub

　　D.Private Sub HScrolll Scroll( )Print HScrolll.SmallChange

　　End Sub

　　(24)若已把一個(gè)命令按鈕的Default屬性設(shè)置為True，則下面可導(dǎo)致按鈕的Click事件過程被調(diào)用的操作是( )。

　　A.用鼠標(biāo)右鍵單擊此按鈕

　　B.按鍵盤上的Esc鍵

　　C.按鍵盤上的回車鍵

　　D.用鼠標(biāo)右鍵雙擊此按鈕

　　(25)要使兩個(gè)單選按鈕屬于同一個(gè)框架，下面三種操作方法中正確的是( )。

　�、儋嬕粋�(gè)框架，再在框架中畫兩個(gè)單選按鈕

　�、谙犬嬕粋�(gè)框架，再在框架外畫兩個(gè)單選按鈕，然后把單選按鈕拖到框架中

　�、巯犬媰蓚�(gè)單選按鈕，再畫框架將單選按鈕框起來

　　A.①

　　B.①、②

　　C.③

　　D.①、②、③

　　(26)能夠存放組合框的所有項(xiàng)目內(nèi)容的屬性是( )。

　　A.Caption

　　B.Text

　　C.List

　　D.Selected

　　(27)設(shè)窗體上有一個(gè)標(biāo)簽Labell和一個(gè)計(jì)時(shí)器Timerl，Timerl的Interval屬性被設(shè)置為l000，Enabled屬性被設(shè)置為True。要求程序運(yùn)行時(shí)每秒在標(biāo)簽中顯示一次系統(tǒng)當(dāng)前時(shí)間。以下可以實(shí)現(xiàn)上述要求的事件過程是( )。

　　A.Private SUb Timed_Timer( )Labell.Caption=TrueEnd Sub

　　B.Private Sub Timerl_Timer( )Labell.Caption=Time$End Sub

　　C.Private Sub Timerl Timer( )labell.Interval=lEnd Sub

　　D.Private Sub Timed_Timer( )For k=1 To Timerl.IntervalLabell.Caption=TimerNext k End Sub

　　(28)窗體上有一個(gè)名稱為CD1的通用對(duì)話框控件和由四個(gè)命令按鈕組成的控件數(shù)組Command1，其下標(biāo)從左到右分別為0.1、2、3，窗體外觀如圖所示。

　　

　　命令按鈕的事件過程如下：

　　Private SUb Command1～Click(Index As Integer)

　　Select Case Index

　　Case 0

　　CD1.Action=l

　　Case l

　　CD1.ShowSave

　　Case 2

　　CD1.Action：5

　　Case 3

　　End

　　End Select

　　End Sub

　　對(duì)上述程序，下列敘述中錯(cuò)誤的是( )。

　　A.單擊“打開”按鈕，顯示打開文件的對(duì)話框

　　B.單擊“保存”按鈕，顯示保存文件的對(duì)話框.

　　C.單擊“打印”按鈕，能夠設(shè)置打印選項(xiàng)，并執(zhí)行打印操作

　　D.單擊“退出”按鈕，結(jié)束程序的運(yùn)行

　　(29)窗體上有一個(gè)名稱為Framel的框架(如圖)，若要把框架上顯示的“Framel”改為漢字“框架”，下面正確的語句是( )。

　　A.Framel.Name=”框架”

　　B.Framel.Caption=”框架”

　　C.Framel.Text=”框架”

　　D.Framel.Value=”框架”

　　

　　(30)在窗體上畫一個(gè)名稱為Comb01的組合框，名稱為Textl的文本框，以及名稱為CommanD1的命令按鈕，如圖所示。

　　

　　運(yùn)行程序，單擊命令按鈕，將文本框中被選中的文本添加到組合框中，若文本框中沒有選中的文本，則將文本框中的文本全部添加到組合框中。命令按鈕的事件過程如下：

　　Privme Sub

　　CommanD1—Click( )

　　If Textl.

　　SelLength<>0

　　ThenElse

　　Comb01.

　　AdD1tem Textl

　　End IfEnd Sub程序中橫線處應(yīng)該填寫的是( )。

　　A.Comb01.AddItem Textl.Text

　　B.Combol，AddItem Textl.SelStart

　　C.Comb01.AddItem Textl.SelText

　　D.Comb01.Addhem Textl.SelLength

　　(31)窗體上有一個(gè)名稱為Textl的文本框，一個(gè)名稱為CD1的通用對(duì)話框，一個(gè)標(biāo)題為“打開文件”的命令按鈕，如圖所示。

　　

　　命令按鈕的單擊事件過程如下：

　　Private Sub CommanD1—Click( )CD1.

　　ShowOpen

　　Open CD1.

　　FfleName For Input As#1MsgBox CD1.

　　FfleNalne

　　Line Input#1.

　　sTextl.Text=SClose#1

　　End Sub

　　單擊命令按鈕，執(zhí)行以上事件過程，打開選定的文件，讀取文件的內(nèi)容并顯示在文本框中，以下敘述中正確的是( )。

　　A.程序沒有錯(cuò)誤，可以正確完成打開文件、讀取文件中內(nèi)容的操作

　　B.執(zhí)行Open命令時(shí)出錯(cuò)，因?yàn)闆]有指定文件的路徑

　　C.Open語句是錯(cuò)誤的，應(yīng)把語句中的For Input改為For.Gutput

　　D.Line Input命令格式錯(cuò)

　　(32)窗體上有一個(gè)如右圖所示的圖形控件，控件中顯示了如圖所示的文字，可以判斷這個(gè)圖形控件( )。

　　A.是圖像框(Image)

　　B.是圖片框(PietureBox)

　　C.是形狀控件

　　D.不是上述3種控件中的一種

　　(33)窗體上有一個(gè)名稱為Combol的組合框，要求在其編輯區(qū)輸入文本并按回車鍵后，編輯區(qū)中的文本被添加到列表中。下面能實(shí)現(xiàn)這一功能的是( )。

　　A.Private Sub Comlbol—KeyDown(KeyCode As Integer，Shift As Integer)IfKeyCode=13 ThenComb01.AdD1tem Comb01.TextErldⅡEnd Sub

　　B.Private Sub Combol—KeyDown(KeyCode As Integer，Shift As Integer)IfKeyCode=13 ThenComb01.Addhem Textl.Text，EIldIfEnd Sub

　　C.Private Sub Combol—Click( )Comb01.AdD1tem Comb01.Text·End Sub

　　D.Private Sub Combol—Click( )Comb01.Addhem Textl.TextEnd Sub

　　(34)工程文件中包含一個(gè)模塊文件和一個(gè)窗體文件。模塊文件的程序代碼是：

　　Public x As IntegerPrivate Y As Integer窗體文件的程序代碼是：

　　Dim a As Integer

　　Private Sub Form_Load( )Dim b As Integer

　　a=2：b=3：x=10v=20

　　End Sllb

　　Private Sub CommanD1_Click( )

　　a=a+5：b=b+5：x=x+5：y=Y+5Print a;b;x;Y

　　End Sub

　　運(yùn)行程序，單擊窗體上的命令按鈕，則在窗體上顯示的是( )。

　　A.5 5 15 5

　　B.7 5 15 25

　　C.7 8 15 5

　　D.7 5 15 5

　　(35)窗體上的三個(gè)命令按鈕構(gòu)成名稱為CommanD1的控件數(shù)組。如圖所示。

　　

　　程序如下：

　　Private Sub CommanD1—Click(Index As Integer)

　　IfIndex=1 Then

　　Print”計(jì)算機(jī)等級(jí)考試”

　　End If

　　IfIndex=2 Then

　　Prim CommanD1(2).Caption

　　End IfEnd Sub

　　運(yùn)行程序，單擊“命令按鈕2”，則如下敘述中正確的是( )。

　　A.Print CommanD1(2).Caption語句有錯(cuò)

　　B.在窗體上顯示“命令按鈕2”

　　C.在窗體上顯示“命令按鈕3”

　　D.在窗體上顯示“計(jì)算機(jī)等級(jí)考試”

　　(36)下面程序的執(zhí)行結(jié)果是( )。

　　Private Sub CommanD1—Click( )a=0

　　k=1Do While k<4

　　X=k+kk=k+1

　　Prim X;

　　LoopEnd Sub

　　A.1 4 27

　　B.1 1 1

　　C.1 4 9

　　D.0 0 0

　　(37)窗體上有名稱分別為Textl、Text2的文本框，名稱為CommanD1的命令按鈕。運(yùn)行程序，在Textl中輸入“FormList”，然后單擊命令按鈕，執(zhí)行如下程序：Private Sub CommanD1—Click( )Text2.Text=UCase(Mid(Textl.Text，5，4)End Sub在Text2中顯示的是( )。

　　A.form

　　B.list

　　C.FORM

　　D.LIST

　　(38)窗體上有名稱為CommanD1的命令按鈕，名稱分別為Listl、List2的列表框，其中Listl的MultiSelect屬性

　　設(shè)置為1(Simple)，并有如下事件過程：Private Sub CommanD1—Click( )

　　For i=0 To Listl.ListCount一1

　　If Listl.Selected(i)=True Then

　　List2.AddItem Text

　　EndIf

　　NextEnd Sub上述事件過程的功能是將Listl中被選中的列表項(xiàng)添加到List2中。運(yùn)行程序時(shí)，發(fā)現(xiàn)不能達(dá)到預(yù)期目的，應(yīng)做修改，下列修改中正確的是( )。

　　A.將For循環(huán)的終值改為Listl.ListCount

　　B.將Listl.Selected(i)=True改為Listl.List(i).Selected=True

　　C.將List2.AdD1tem Text改為List2.AddItem Listl.List(i)

　　D.將List2ddItem Text改為List2.Addhem Listl.ListIndex

　　(39)設(shè)有如下CommanD1的單擊事件過程及fun過程：

　　Private Sub CommanD1_Click( )

　　Dim X As Integer

　　x=Val(InputBox(”請(qǐng)輸入一個(gè)整數(shù)”))fun(X)

　　End Sub

　　Private Sub fun(x As Integer)

　　If X Mod 2=0 Then fun(X/2)Print X;

　　End Sub

　　執(zhí)行上述程序，輸入6，結(jié)果是( )。

　　A.3 6

　　B.6 3

　　C.6

　　D.程序死循環(huán)

　　(40)命令按鈕CommanD1的單擊事件過程如下：

　　Private Sub CommanD1—Click( )Dim a(10，10)As IntegerX=0

　　For i=l T0 3

　　For J=1 T0 3

　　a(i，j)=i}2 Mod J

　　If x

　　Next

　　Next

　　Print XEnd Sub

　　執(zhí)行上述事件過程后，窗體上顯示的是( )。

　　A.1

　　B.2

　　C.3

　　D.4

　　相關(guān)推薦：

　　2018年全國計(jì)算機(jī)等級(jí)考試必做試題匯總(各科目)

　　2018年全國計(jì)算機(jī)等級(jí)考試復(fù)習(xí)知識(shí)點(diǎn)匯總(各科目)

　　2018計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間|各地報(bào)名入口|報(bào)名條件

　　2018年全國計(jì)算機(jī)等級(jí)考試時(shí)間|教材目錄（2018年版）

　　2018全國計(jì)算機(jī)等級(jí)考試備考經(jīng)驗(yàn)及應(yīng)試技巧匯總

　　報(bào)名方法|考試內(nèi)容|考試大綱|2018計(jì)算機(jī)等級(jí)考試科目

　　歷年真題匯總|考試吧策劃：2018年計(jì)算機(jī)等級(jí)考試報(bào)考指南