16.執(zhí)行語(yǔ)句s=Len(Mid("VisualBasic",1,6))后，s的值是(A)

　　A.Visual

　　B.Basic

　　C.6

　　D.11

　　17.以下敘述中錯(cuò)誤的是(D)

　　A.下拉式菜單能用菜單編輯器建立

　　B.在多窗體程序中，每個(gè)窗體都可以建立自己的菜單系統(tǒng)

　　C.能夠?qū)Σ藛雾?xiàng)的Click事件編程

　　D.如果把一個(gè)菜單項(xiàng)的Enabled屬性設(shè)置為False，則該菜單項(xiàng)不可見(jiàn)

　　18.在窗體上畫(huà)一個(gè)命令按鈕，其名稱(chēng)為Command1，然后編寫(xiě)如下事件過(guò)程：

　　Private Sub Command1_Click( )

　　a = "12345"

　　Print Format$(a, "000.00")

　　End Sub

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

　　A.123.45

　　B.12345.00

　　C.12345

　　D.00123.45

　　19.以下關(guān)于函數(shù)過(guò)程的敘述中，正確的是(A)

　　A.函數(shù)過(guò)程形參的類(lèi)型與函數(shù)返回值的類(lèi)型沒(méi)有關(guān)系

　　B.在函數(shù)過(guò)程中，過(guò)程的返回值可以有多個(gè)

　　C.當(dāng)數(shù)組作為函數(shù)過(guò)程的參數(shù)時(shí)，既能以傳值方式傳遞，也能以傳址方式傳遞

　　D.如果不指明函數(shù)過(guò)程參數(shù)的類(lèi)型，則該參數(shù)不能有數(shù)據(jù)類(lèi)型的參數(shù)

　　20.以下關(guān)于變量作用域的敘述中，正確的是(C)

　　A.用dim定義變量是靜態(tài)變量

　　B.靜態(tài)變量必須在標(biāo)準(zhǔn)模塊中聲明

　　C.用public定義變量是全局變量

　　D.Static類(lèi)型變量的作用域范圍是它所在的窗體或模塊文件

　　21.確定一個(gè)控件在窗體上的位置的屬性是(C)

　　A.Width和Height

　　B.Width或Height

　　C.Top和Left

　　D.Top或Left

　　22.在窗體上畫(huà)一個(gè)名稱(chēng)為T(mén)ext1的文本框和一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程：

　　Private Sub Command1_Click( )

　　Text1.Text = "Visual"

　　Me.Text1 = "Basic"

　　Text1 = "Program"

　　End Sub

　　程序運(yùn)行后，如果單擊命令按鈕，則在文本框中顯示的是(C)

　　A.Visual

　　B.Basic

　　C.Program

　　D.出錯(cuò)

　　23.以下關(guān)系表達(dá)式中，其值為False的是(A)

　　A."ABC">"AbC"

　　B."the"<>"they"

　　C."VISUAL"=UCase("Visual")

　　D."Integer">"Int"

　　24.語(yǔ)句Print int(5/4*6\5) Mod 2的輸出結(jié)果是(B)

　　A.0

　　B.1

　　C.2

　　D.3

　　25.在窗體上畫(huà)一個(gè)文本框、一個(gè)標(biāo)簽和一個(gè)命令按鈕，其名稱(chēng)分別為T(mén)ext1、Label1和Command1，然后編寫(xiě)如下兩個(gè)事件過(guò)程：

　　Private Sub Command1_Click( )

　　strText = InputBox("請(qǐng)輸入")

　　Text1.Text = strText

　　End Sub

　　Private Sub Text1_Change( )

　　Label1.Caption = Right(Trim(Text1.Text), 3)

　　End Sub

　　程序運(yùn)行后，單擊命令按鈕，如果在輸入對(duì)話(huà)框中輸入abcdef，則在標(biāo)簽中顯示的內(nèi)容是(D)

　　A.空

　　B.abcdef

　　C.abc

　　D.def

　　26.在窗體上畫(huà)一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程：

　　Private Sub Command1_Click( )

　　x = -5

　　If x >0 Then

　　y = x ^ 2

　　Else

　　y = x

　　End If

　　Print y

　　End Sub

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

　　A.-5

　　B.25

　　C.1

　　D.-1

　　27.一個(gè)工程中含有窗體Form1、Form2和標(biāo)準(zhǔn)模塊Model1，如果在Form1中有語(yǔ)句Pubilc X As

　　Integer，在Model1中有語(yǔ)句Pubilc Y As Integer，則以下敘述中正確的是(A)

　　A.變量X、Y的作用域相同

　　B.Y的作用域是Model1

　　C.在Form1的任何地方中可以直接使用Y

　　D.在Form2中可以直接使用X和Y

　　28.在窗體上畫(huà)一個(gè)名稱(chēng)為Drive1的驅(qū)動(dòng)器列表框，一個(gè)名稱(chēng)為Dir1的目錄列表框。當(dāng)改變當(dāng)前驅(qū)動(dòng)器時(shí)，目錄列表框應(yīng)該與之同步改變。設(shè)置兩個(gè)控件同步的命令放在一個(gè)事件過(guò)程中，這個(gè)事件過(guò)程是(A)

　　A.Drive1_Change

　　B.Drive1_Click

　　C.Dir1_Click

　　D.Dir1_KeyPress

　　29.在窗體上畫(huà)一個(gè)命令按鈕(其N(xiāo)AME屬性為Command1)，然后編寫(xiě)如下代碼：

　　Option Base 1

　　Private Sub Command1_Click( )

　　Dim a

　　s = 0

　　a = Array(1, 2, 3, 4)

　　For I = 4 To 1 Step -1

　　s = s + a(I)

　　Next I

　　Print s

　　End Sub

　　運(yùn)行上面的程序，單擊命令按鈕，其輸出結(jié)果是(D)

　　A.4321

　　B.1234

　　C.34

　　D.10

　　30.在窗體上畫(huà)一個(gè)名稱(chēng)為T(mén)ext1的文本框，編寫(xiě)以下代碼：

　　Private Sub Text1_KeyPress(KeyAscii As Integer)

　　If KeyAscii < 65 Or　KeyAscii> 90 Then

　　msgBox "請(qǐng)輸入大寫(xiě)字母"

　　KeyAscii = 0

　　End If

　　End Sub

　　以下能說(shuō)明該事件過(guò)程正確是(A)

　　A.要求文本框只能接收大寫(xiě)字母的輸入

　　B.要求文本框只能接收小寫(xiě)字母的輸入

　　C.要求文本框只能接收數(shù)字的輸入

　　D.要求文本框只能接收65到90之間的數(shù)值的輸入

掃描/長(zhǎng)按二維碼幫助考試通關(guān)

2018年等考報(bào)考資訊

2018等考各科通關(guān)技巧

2018各科最新預(yù)測(cè)試卷

2018等考各科備考資料

微信搜索"考試吧"了解更多考試資訊、下載備考資料

　　相關(guān)推薦：

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

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

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

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

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

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

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