點(diǎn)擊查看：2016年計(jì)算機(jī)二級(jí)《VB》基礎(chǔ)練習(xí)題及答案匯總

　　1[單選題] 下列關(guān)于控件數(shù)組的敘述中，正確的是

　　A.控件數(shù)組可以由不同類型的控件組成

　　B.控件數(shù)組元素的最小下標(biāo)值為1

　　C.在設(shè)計(jì)階段，可以改變控件數(shù)組元素的Index屬性值

　　D.控件數(shù)組的名字由Caption屬性指定

　　參考答案：C

　　參考解析：控件數(shù)組必須用同類型的控件組成，最小下標(biāo)為0，控件數(shù)組的名字由Name屬性指定。選C。

　　2[單選題] 閱讀程序：

　　運(yùn)行上面的程序，單擊窗體，輸出結(jié)果如下：

　　147

　　258

　　369

　　則在橫線處應(yīng)填入的內(nèi)容為

　　A.i+JB.i*JC.(i-1)*3+JD.i+(j-1)%5

　　參考答案：D

　　參考解析：該程序段是個(gè)兩重嵌套循環(huán)給數(shù)組a元素賦值。下標(biāo)用變量i表示，上標(biāo)用J表示。按循環(huán)執(zhí)行順序依次代入變量值計(jì)算，需要得出如題的打印結(jié)果，計(jì)算公式為i+(j-1)*3，選D.。

　　3[單選題] 某人編寫了下面的程序，希望能把Textl文本框中的內(nèi)容寫到out.txt文件中：

　　調(diào)試時(shí)發(fā)現(xiàn)沒有達(dá)到目的，為實(shí)現(xiàn)上述目的，應(yīng)做的修改是(　　)。

　　A.把Print”Textl”改為Prim#2，Textl

　　B.把Print”Textl”改為Print Textl

　　C.把Print”Textl”改為Write”Textl”

　　D.把所有}}2改為#1

　　參考答案：A

　　參考解析：要把文本框中的內(nèi)容寫入文本文件中，首先要用0pt.語(yǔ)句的For Output模式打開文本文件，并為文件制定一個(gè)文件號(hào)，然后，用Print語(yǔ)句將文本寫入文本文件，最后關(guān)閉文件。本題中Click事件過程中第l、3條語(yǔ)句正確。第2條語(yǔ)句Print語(yǔ)句的格式是：蹦nt#文件號(hào)，要寫入的內(nèi)容，原語(yǔ)句錯(cuò)誤。根據(jù)格式按選項(xiàng)A修改正確，故A選項(xiàng)正確。

　　4[單選題] 關(guān)于隨機(jī)文件，以下敘述中錯(cuò)誤的是(　　)。

　　A.使用隨機(jī)文件能節(jié)約空間

　　B.隨機(jī)文件記錄中，每個(gè)字段的長(zhǎng)度是固定的

　　C.隨機(jī)文件中，每個(gè)記錄的長(zhǎng)度相等

　　D.隨機(jī)文件的每個(gè)記錄都有一個(gè)記錄號(hào)

　　參考答案：A

　　參考解析：隨機(jī)文件中的每一行是一條記錄，每條I記錄的長(zhǎng)度是固定的、相等的，并且都有一個(gè)記錄號(hào)。0pen語(yǔ)l句中的Len用于指定記錄長(zhǎng)度，當(dāng)指定長(zhǎng)度小于記錄實(shí)際長(zhǎng)度l時(shí)將產(chǎn)生錯(cuò)誤;大于實(shí)際長(zhǎng)度時(shí)，可以寫入，但浪費(fèi)空間，所以l隨機(jī)文件占據(jù)磁盤空間較大，故選項(xiàng)A錯(cuò)誤。

　　5[單選題] 窗體上有一個(gè)名稱為Commandl的命令按鈕，有程序如下：

　　關(guān)于上述程序的敘述中，正確的是

　　A.程序運(yùn)行出錯(cuò)，第1個(gè)For循環(huán)之后的x=a(i)賦值語(yǔ)句錯(cuò)

　　B.程序正常運(yùn)行，x是10個(gè)隨機(jī)數(shù)中的最大值

　　C.程序正常運(yùn)行，s是l0個(gè)隨機(jī)數(shù)的和

　　D.程序正常運(yùn)行，10個(gè)隨機(jī)數(shù)的范圍是l00-200

　　參考答案：A

　　參考解析：第一個(gè)For循環(huán)中缺省Step，步長(zhǎng)為l，退出循環(huán)時(shí)下標(biāo)為l0，第l個(gè)For循環(huán)之后的x=a(i)賦值語(yǔ)句下標(biāo)越界，出錯(cuò)。選A.。

　　6[單選題] 在窗體上畫一個(gè)命令按鈕(名稱為Commandl)，并編寫如下代碼：

　　程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是(　　)。

　　A.10B.0C.11 D.21

　　參考答案：B

　　參考解析：本題是過程的嵌套調(diào)用，過程嵌套調(diào)用時(shí)要先計(jì)算最內(nèi)層的過程，然后由里向外執(zhí)行。因此Funl(Funl(x，(Funl(x，X一1)))，x一1)執(zhí)行過程如下：

　　先執(zhí)行Funl(x，X一1)，由于形參a是按值傳遞，因此不會(huì)影響x的值，x=10，即Funl(10，9)。t=1，b=1+10=11，則函數(shù)返回值為1+1l=12。

　　再執(zhí)行Funl(X，(Funl(x，x一1)))，由于內(nèi)層過程返回12，因此又可寫成Funl(x，(12))，由于x仍為原值，因此過程即Funl(10，12)。t=～2，b=一2+10=8，則函數(shù)返回值為一2+8=6。

　　最后執(zhí)行Funl(Funl(x，(Funl(x，x一1)))，x一1)，即Funl(6，x—1)，由于X仍為原值，因此過程即為Funl(6，9)。t=一3，b=一3+6=3，則函數(shù)返回值為一3+3=0。

　　7[單選題]下面程序的執(zhí)行結(jié)果是(　　)。

　　Private Sub Commandl—Click(　　)a=0

　　k=1Do While k<4

　　X=k+kk=k+1

　　Prim X;

　　LoopEnd Sub

　　A.1 4 27B.1 1 1C.1 4 9 D.0 0 0

　　參考答案：B

　　參考解析：本題主要考查算術(shù)運(yùn)算符中的冪運(yùn)算，在程序中x的值為k的k次方的a次方，k的值每次循環(huán)都加1，但a的值不變總為0，除0以外的任何數(shù)的0次方都是l，因此，在k的值變?yōu)?之前會(huì)輸出三個(gè)l。

　　8[簡(jiǎn)答題] 在名稱為Forml的窗體上添加一個(gè)名稱為Imagel的圖像框，其高、寬分別為l900、1700，通過屬性窗口把考生文件夾下的圖像文件picl.bmp載入圖像框;再畫兩個(gè)命令按鈕控件，名稱分別為Cl、C2，標(biāo)題分別為“放大”、“縮小”，如圖所示。

　　要求：

　　①請(qǐng)編寫適當(dāng)?shù)氖录^程，程序運(yùn)行后，如果單擊“放大”按鈕，則將圖像框的高度、寬度均增加100;單擊“縮小”按鈕，則將圖像框的高度、寬度均減少100，要求程序中不得使用任何變量。

　　②通過屬性窗口設(shè)置圖像框的適當(dāng)屬性，使得在放大、縮小圖像框時(shí)，其中的圖像也自動(dòng)放大、縮小。

　　注意：存盤時(shí)必須存放在考生文件夾下，工程文件名保存為sit2.vbp，窗體文件名保存為sjt2.frm。

　　參考解析：

　　【考點(diǎn)分析】本題考點(diǎn)有：圖像框的Name、Width、Height、Picture和Stretch屬性，命令按鈕的Name、Caption屬性。

　　【解題思路】圖像框(Image)控件的Picture屬性用于在設(shè)計(jì)階段時(shí)裝載在圖像框中顯示的圖片，它的Stretch(自動(dòng)伸縮)屬性用來設(shè)定載入其中的圖片是否需要自動(dòng)調(diào)整，以適應(yīng)圖像框的大小。圖像框的寬和高分別由其Width屬性和Hcight屬性設(shè)置。

　　本題要在單擊按鈕時(shí)實(shí)現(xiàn)“放大”或“縮小”的功能，應(yīng)在程序中動(dòng)態(tài)設(shè)置圖像框大小(寬和高)，即在其原來基礎(chǔ)上增加或減小圖像框的寬和高。

　　【操作步驟】

　　步驟1：新建一個(gè)窗體，按照題目要求建立控件并設(shè)置圖像框相應(yīng)屬性，如圖3.17所示。

　　步驟2：按照步驟I設(shè)置其他控件相關(guān)屬性，程序中涉及的控件及屬性見表3.10。

　　步驟3：打開代碼編輯窗口，在指定位置編寫如下代碼。

　　參考答案

　　Private Sub C1_Click()´當(dāng)單擊"放大"按鈕時(shí)，依次將Imagel的高與寬分別加100

　　Image1.Height=Image1.Height+100

　　Image1.Width=Image1.Width+100

　　End Sub

　　Private Sub C2_Click()1當(dāng)單擊”縮小”按鈕，則依次

　　將Imagel的高與寬分別減100

　　Image1.Height=Image1.Height-100

　　Image1.Width=Image1.Width-100

　　EndSub

　　步驟4：調(diào)試并運(yùn)行程序，關(guān)閉程序后按題目要求存盤。

　　9[簡(jiǎn)答題] 在考生文件夾下有一個(gè)工程文件sjt4.vbp，窗體如圖所示。其功能是單擊“輸入數(shù)據(jù)”按鈕，則可輸入一個(gè)整數(shù)n(要求：8≤n≤12);單擊“計(jì)算”按鈕，則計(jì)算1!+2!+3!…+n!的值，并將計(jì)算結(jié)果顯示在文本框中;單擊“存盤”按鈕，則把文本框中的結(jié)果保存到考生文件夾下的out4.dat文件中。文件中已經(jīng)給出了所有控件和程序，但程序不完整，請(qǐng)去掉程序中的注釋符，把程序中的?改為正確的內(nèi)容，并編寫“計(jì)算”按鈕的Click事件過程。

　　注意：不得修改已經(jīng)存在的內(nèi)容和控件屬性，在結(jié)束程序運(yùn)行之前，必須用“存盤”按鈕存儲(chǔ)計(jì)算結(jié)果，否則無成績(jī)。

　　最后將修改后的文件按原文件名存盤。

　　參考解析：

　　【考點(diǎn)分析】本題考點(diǎn)有：Val()函數(shù)、InputBox()函數(shù)、MsgBox()函數(shù)、命令按鈕的Enabled屬性以及文件操作。

　　【解題思路】在Commandl_Click事件過程中通過Val()函數(shù)和InputBox()函數(shù)取得輸入對(duì)話框中的數(shù)值，如果輸入的數(shù)值不在范圍內(nèi)，那么彈出對(duì)話框MsgBox("數(shù)據(jù)錯(cuò)誤，請(qǐng)重新輸入")，并使命令按鈕Command2和Command3不可用，F(xiàn)unctionf()函數(shù)則用來實(shí)現(xiàn)階乘的計(jì)算，Command2_Click事件過程中，運(yùn)用循環(huán)語(yǔ)句的累加實(shí)現(xiàn)表達(dá)式求和運(yùn)算，Command3_Click事件過程通過文件操作實(shí)現(xiàn)數(shù)據(jù)的存盤處理。

　　【操作步驟】

　　步驟1：打開本題工程文件。

　　步驟2：打開代碼編輯窗口，去掉程序中的注釋符“´”，將問號(hào)改為正確的內(nèi)容，并編寫相應(yīng)代碼。

　　參考答案(陰影部分是需考生填入的內(nèi)容)

　　步驟3：調(diào)試并運(yùn)行程序，關(guān)閉程序后按題目要求存盤，如圖3.31所示。

　　10[簡(jiǎn)答題] 在考生文件夾下有一個(gè)工程文件sjt4.Vbp。其窗體上已有部分控件，請(qǐng)按照?qǐng)Dl所示添加框架和單選按鈕。要求：添加兩個(gè)框架，名稱分別為Framel、Frame2，在Framel中添加一個(gè)名為Optionl的單選按鈕數(shù)組，含兩個(gè)單選按鈕，標(biāo)題分別為“古典音樂”、“流行音樂”，在Frame2中添加兩個(gè)單選按鈕，名稱分別為0p—ti.on2.Option3，標(biāo)題分別為“籃球”、“羽毛球”。剛運(yùn)行程序時(shí)，“古典音樂”和“籃球”單選按鈕初始狀態(tài)為選中狀態(tài)。單擊“選擇”按鈕，將把選中的單選鈕的標(biāo)題顯示在標(biāo)簽Label2中，如圖2所示。如果“音樂，，或“體育”未被選中，相應(yīng)的單選按鈕不可用。

　　要求：按照題目要求添加控件，去掉程序中的注釋符，把程序中的?改為正確的內(nèi)容。注意：不能修改程序的其他部分和控件屬性。最后將修改后的文件按原文件名存盤.

　　參考解析：

　　通過設(shè)置單選按鈕的Value屬性，使“古典音樂”和“籃球”單選鈕為選中狀態(tài)。單擊“選擇”按鈕，通過Ⅱ語(yǔ)句判斷單選按鈕是否被選中，把選中的單選按鈕的標(biāo)題通過標(biāo)簽的Caption屬性顯示在標(biāo)簽Label2中，并通過復(fù)選框的Value屬性和框架的Enabled，實(shí)現(xiàn)如果“音樂”或“體育”未被選中，相應(yīng)的單選按鈕不可選。

　　【操作步驟】

　　步驟l：打開本題工程文件，設(shè)置控件的屬性。程序中用到的控件及屬性見表l和表2。

　　步驟2：分析并編寫程序代碼。程序提供代碼

　　Private Sub Checkl—Click()If Checkl.Value=1 ThenFramel.Enabled=TmeElse

　　Framel.Enabled=FalseEndIf

　　End Sub

　　Private Sub Cheek2 Click()If Cheek2.V81Ue=l ThenFrame2.Enabled=TmeElse

　　Frame2.Enabled=Fal8eEnd If

　　End Sub

　　Private Sub Comdl—Click()If Cheekl.Value=l ThenⅡ7=True Then

　　s=”古典音樂”Else

　　s=“流行音樂”EndIf

　　EndIf

　　If Cheek2.Value=1 Then骶9=True Then

　　s=s&”籃球”

　　Else

　　s=s&”羽毛球”、

　　EndIfEndⅡ

　　Labe/2.Caption=?End Sub

　　Private Sub Form—bad()Cheekl.Volue=1

　　Cheek2.Value=1End Sub

　　程序結(jié)束參考答案第1個(gè)?處填入：0ptionl(0).Value

　　第2個(gè)?處填人：0ption2.Value第3個(gè)?處填入：s

　　步驟3：調(diào)試并運(yùn)行程序，關(guān)閉程序后按題目要求存盤。

　　相關(guān)推薦：

　　各地2016年全國(guó)計(jì)算機(jī)等級(jí)考試費(fèi)用匯總

　　2016年計(jì)算機(jī)等級(jí)考試各級(jí)別報(bào)考適合專業(yè)類別

　　各地2016年全國(guó)計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間匯總