11[簡(jiǎn)答題]在考生文件夾下有一個(gè)工程文件sit3.vbp，窗體上已經(jīng)有一個(gè)標(biāo)簽Labell，請(qǐng)?zhí)砑右粋�(gè)單選按鈕數(shù)組，名稱為Op1，含三個(gè)單選按鈕，它們的Index屬性分別為0、1、2，標(biāo)題依次為“飛機(jī)”、“火車”、“汽車”，再添加一個(gè)名稱為Textl的文本框。窗體文件中已經(jīng)給出了Opl的Click事件過程，但不完整，要求去掉程序中的注釋符，把程序中的?改為正確的內(nèi)容，使得在程序運(yùn)行時(shí)單擊“飛機(jī)”或“火車”單選按鈕時(shí)，在Textl中顯示“我坐飛機(jī)去”或“我坐火車去”，單擊“汽車”單選按鈕時(shí)，在Textl中顯示“我開汽車去”，如圖所示。

　　注意：不能修改程序中的其他部分。最后將修改后的文件按原文件名存盤。

　　參考解析：

　　【考點(diǎn)分析】本題考點(diǎn)有：?jiǎn)芜x按鈕數(shù)組的Name、Caption和Index屬性，文本框的Name屬性，SelectCase選擇語句，“+”字符連接。

　　【解題思路】通過Name屬性設(shè)置對(duì)象名稱;通過Caption屬性設(shè)置對(duì)象的標(biāo)題;設(shè)置兩個(gè)字符型變量a、b，a："我坐"，b="我開"，用于SelectCase選擇語句的字符串連接;通過對(duì)單選按鈕數(shù)組Index屬性的查詢，實(shí)現(xiàn)單擊單選按鈕完成字符串連接和文本框顯示操作的功能。

　　【操作步驟】

　　步驟1：打開本題工程文件，按照題目要求建立單選按鈕數(shù)組，如圖3.9所示。

　　步驟2：按照題目要求建立其他控件并設(shè)置其屬性，見表3.4。

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

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

　　Private Sub Op1_click (Index As Integer)

　　Dima As String，b As String，C As String

　　a="我坐"

　　b="我開"

　　Select Case____Index______

　　´通過Index值決定響應(yīng)哪一個(gè)控件數(shù)組

　　CaSe　O

　　Text1.Text=a+Me.Op1(O).Caption+"去"

　　CaSe　1

　　Text1.Text=____a______+Me.Opl(1).Caption+"去"

　　´當(dāng)Index值為1時(shí)，選擇"我坐"

　　CaSe　2

　　Text1.Text=b+Me.Op1(2).Caption+"去"

　　End Select

　　EndSub

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

　　【易錯(cuò)提示】在窗體上復(fù)制一個(gè)控件時(shí)，如果需要?jiǎng)?chuàng)建控件數(shù)組，則在提示框中單擊“是”即可，如果不需要，則直接單擊“否”。

　　12[單選題] 下面不是鍵盤事件的是(　　)。

　　A.KeyDownB.KeyUpC.KeyPress D.KeyCode

　　參考答案：D

　　參考解析：KeyCede是KeyD0Ⅷ、K叮t’髓事件f參數(shù)，不是鍵盤事件，它返回的是按鍵相應(yīng)的^盥衛(wèi)字符代碉故選項(xiàng)D錯(cuò)誤。

　　13[單選題]假定有如下情況語句：

　　SelectCaseX

　　能表示fxf>5的Case子句是

　　A.CaseNot(-5To5)B.Case5To-5C.CaseIs<-5，Is>5D.CaseAbs(X)>5

　　參考答案：C

　　參考解析：在Select判斷語句中，如果是判斷區(qū)間變量值，可以用”表達(dá)式T0表達(dá)式”的形式;如果不是判斷區(qū)間變量值，則關(guān)系運(yùn)算表達(dá)式前面要加上Is。|x|>5的VB表達(dá)式為X<-5OrX>5，故本題答案為選項(xiàng)C.。

　　14[單選題] 三角形的構(gòu)成條件是：任意2邊之和大于第3邊。設(shè)變量a.b、c是3條直線的長(zhǎng)度，要求判斷這3條直線能否構(gòu)成一個(gè)三角形。

　　下面有3個(gè)程序段可以正確判斷，另一個(gè)不能正確判斷的是

　　參考答案：B

　　參考解析：三角形構(gòu)成的條件必須滿足任意2邊之和大于第3邊，即a，b，c任意兩個(gè)的和必須大于第三個(gè)。A.滿足。B.中的0r是或，條件不滿足。C.和D.可以通過判斷，均能進(jìn)行正確判斷。選B.。

　　15[單選題] 在窗體上畫一個(gè)文本框(名稱為Textl)和一個(gè)標(biāo)簽(名稱為IJabdl)，程序運(yùn)行后，在文本框中每輸入一個(gè)字符.都會(huì)立即在標(biāo)簽中顯示文本框中字符的個(gè)數(shù)。以下可以實(shí)現(xiàn)上述操作的事件過程是(　　)。

　　A.Private Sub Textl_Change(　　)

　　Labell.Caption=Str(Len(Textl.Text))End Sllb

　　B.Private Sub Textl—Click(　　)

　　Labell.Caption=Str(Len(Textl.Text))End Sub

　　C.Private Sub Textl_Change(　　)Labell.Caption=Textl.TextEnd Sub

　　D.Private Sub I_abell_Change(　　)

　　Labell.Caption=Str(Len(Textl.Text))End Sub

　　參考答案：A

　　參考解析：根據(jù)題意可知，在文本框中輸入字符這個(gè)動(dòng)作使標(biāo)簽上顯示的內(nèi)容發(fā)生變化，說明是文本框觸發(fā)了某事件，排除D選項(xiàng);文本框中每輸入一個(gè)字符，標(biāo)簽中立即就會(huì)發(fā)生變化，故是Change事件，排除B選項(xiàng);標(biāo)簽中顯示的是文本框中字符的個(gè)數(shù)，不是輸入的內(nèi)容，排除C選項(xiàng)。故A選項(xiàng)正確。

　　16[單選題] 下列循環(huán)中，可以正常結(jié)束的是

　　參考答案：B

　　參考解析：選項(xiàng)A中先執(zhí)行一次循環(huán)體，i的值變成1，測(cè)試循環(huán)結(jié)束條件，i<1不成立，循環(huán)繼續(xù)，i值總是增加，達(dá)不到循環(huán)結(jié)束條件，不能正常結(jié)束。選項(xiàng)8先執(zhí)行循環(huán)體，i值加1變成2，再測(cè)試循環(huán)結(jié)束條件i=10，繼續(xù)循環(huán)，i值再加1，直到i變?yōu)?0，循環(huán)結(jié)束。選項(xiàng)C中i初值為10，先執(zhí)行一次循環(huán)體，使i加1，然后判斷繼續(xù)循環(huán)的條件i>1是否成立，此后i值不會(huì)小于等于1，循環(huán)會(huì)一直繼續(xù)下去，不會(huì)正常結(jié)束。選項(xiàng)D中i初值為10，每次循環(huán)i值減2，因此它總是偶數(shù)，而循環(huán)結(jié)束的條件是i=1，不可能達(dá)到，循環(huán)會(huì)一直繼續(xù)下去。

　　17[單選題] 在設(shè)計(jì)階段，假定在圖片框Picturel中裝入了一個(gè)圖形，為了刪除該圖片框控件，應(yīng)采用的正確操作是

　　參考答案：A

　　參考解析：刪除圖片框控件，先選擇圖片框，然后按Del鍵。

　　18[單選題] 通用對(duì)話框Filter屬性的作用是

　　A.設(shè)置對(duì)話框的標(biāo)題

　　B.指定對(duì)話框所選擇的文件名

　　C.指定對(duì)話框的打開方式

　　D.指定對(duì)話框中顯示的文件類型

　　參考答案：D

　　參考解析：通用對(duì)話框(CommonDialog)提供諸如打開文件、保存文件、設(shè)置打印選項(xiàng)、選擇顏色和字體、顯示幫助等操作的一組標(biāo)準(zhǔn)對(duì)話框，該控件運(yùn)行時(shí)不可見。通用對(duì)話框的DialogTifle屬性用于返回或設(shè)置該對(duì)話框標(biāo)題欄上所顯示的文本;Action屬性用于設(shè)置被打開對(duì)話框的類型;當(dāng)通用對(duì)話框顯示為“打開”或“另存為”類型時(shí)，其FileName屬性用于返回或設(shè)置所選文件的路徑和文件名，F(xiàn)iber(過濾器)屬性用于指定在對(duì)話框的文件列表中顯示文件的類型。

　　19[單選題] 設(shè)在工程文件中有一個(gè)標(biāo)準(zhǔn)模塊，其中定義了如下記錄類型：

　　在窗體上畫一個(gè)名為Commandl的命令按鈕，要求當(dāng)執(zhí)行事件過程Commandl—Click時(shí)，在順序文件Person.txt中寫入一條記錄。下列能夠完成該操作的事件過程是(　　)。

　　A.

　　B.

　　C.

　　D.

　　參考答案：A

　　參考解析：數(shù)據(jù)文件的寫操作分為3步，即打開文件、寫入文件和關(guān)閉文件。

　　首先，在順序文件中打開文件寫入數(shù)據(jù)的打開方式為：Open文件名For Output As#文件號(hào)。因此8、c選項(xiàng)排除，只}看A、D選項(xiàng)。

　　寫入順序文件Prlm#語句格式為：Print#文件號(hào)，變量名，’變量名…，Write語句的的格式與Print語句一樣：Write#文件號(hào)，變量名，變量名。而記錄類型變量不能整體引用，需要指明}記錄變量中的成員名，格式為;記錄變量名.成員名，Books類型變量B成員Name和TelNum賦值和引用應(yīng)該是8.Name、B.TelNum，因此A選項(xiàng)正確。

　　20[簡(jiǎn)答題]在考生文件夾下有一個(gè)工程文件sjt3.vbp，含有兩個(gè)窗體，名稱分別為Forml、Form2。其中Forml E有兩個(gè)控件(圖像框和計(jì)時(shí)器)和一個(gè)菜單項(xiàng)“操作”，含有三個(gè)子菜單(如圖l所示)。Form2匕有一個(gè)名稱為Commandl、標(biāo)題為“返回”的命令按鈕(如圖2所示)。要求當(dāng)單擊“窗體2”菜單命令時(shí)，F(xiàn)orml隱藏，F(xiàn)orm2導(dǎo)委。.單考‘動(dòng)畫”菜單命令時(shí)，使小汽車開始移動(dòng)，一旦移到窗口的右邊界時(shí)自動(dòng)跳到窗體的左邊界重新開始移動(dòng)。單擊“退出”菜單命令時(shí)，結(jié)束程序運(yùn)行。請(qǐng)去掉程序中的注釋符，把程序中的?改為正確的內(nèi)容。注意：考生不得修改窗體文件中已經(jīng)存在的程序。最后程序按原文件名存盤。

　　參考解析：

　　在計(jì)時(shí)器的Timer事件過程中，通過設(shè)置標(biāo)簽的Left屬性值在原有基礎(chǔ)上加l00來實(shí)現(xiàn)自左向右移動(dòng)的功能。在“動(dòng)畫”菜單項(xiàng)的單擊事件過程中應(yīng)啟動(dòng)計(jì)時(shí)器，使小汽車開始移動(dòng)，通過圖像框的Left、Width屬性和窗體的Width屬性判斷，小汽車是否移到窗口的右邊界，如果是，則設(shè)置Pieturel的Left屬性為0，自動(dòng)跳到窗體的左邊界重新移動(dòng)。在“窗體2”菜單項(xiàng)的單擊事件過程中，通過窗體的Hide、Show方法，隱藏Forml，顯示Form2。在“退出”菜單項(xiàng)的單擊事件過程中，通過End語句退出程序。

　　【操作步驟】

　　步驟l：打開本題工程文件。步驟2：分析并編寫程序代碼。程序提供代碼

　　窗體l‘的代碼

　　Private Sub mnuOper_Cliek(Index As Integer)'Select Case?

　　Case l

　　Form2.ShowForml.HideCase 2

　　Timerl.Enabled=?

　　Case 3EndEnd SelectEnd Sub

　　Private Sub Timerl_Timer()

　　Pieturel.Left=Pieturel.Left+100

　　If Picturel.Left+Pieturel.Width>=’Then

　　Pieturel.Left=?End IfEnd Sub

　　窗體2的代碼

　　Private Sub Commandl—Click()Forml.Show

　　Fomn2.HideEnd Sub

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

　　第2個(gè)?處填入：True第3個(gè)?處填入：Forml.Width

　　第4個(gè)?處填人：0

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

　　相關(guān)推薦：

　　2016年全國(guó)計(jì)算機(jī)等級(jí)考試時(shí)間

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

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

　　2016計(jì)算機(jī)等級(jí)考試各級(jí)別考試科目常見問題解答