二、簡(jiǎn)單應(yīng)用題

　　第 1 小題

　　【知識(shí)點(diǎn)播】①KeyPreview 屬性用于設(shè)置是否在控件的鍵盤事件之前激活窗體的鍵盤事件，鍵盤事件有 KeyDown、KeyUp 和 KeyPress。②KeyDown(KeyCode As Integer,Shift as Integer)事件是在對(duì)象具有焦點(diǎn)時(shí)，按下鍵盤上的鍵時(shí)觸發(fā)該對(duì)象的事件，其中 KeyCode 參數(shù)是表示所按鍵的位置信息的代碼，Shift 參數(shù)代表按鍵時(shí) Shift、Ctrl、Alt 鍵的狀態(tài)。

　　【審題分析】本題程序設(shè)計(jì)思路：在窗體的 KeyDown 事件過(guò)程中，先后用兩個(gè) If 語(yǔ)句判斷當(dāng)前鍵盤上按下的是否是鍵或鍵，若是鍵則通過(guò)輸入框輸入內(nèi)容，顯示在文本框中，并添加到列表框中;若是鍵則通過(guò)輸入框輸入內(nèi)容，顯示在文本框中， 利用 For 循環(huán)語(yǔ)句逐一判斷列表框中的各項(xiàng)是否與文本框中的內(nèi)容一致，若一致則刪除該項(xiàng)目。ListCount 屬性可返回列表框中當(dāng)前的列表項(xiàng)總數(shù)，由于循環(huán)的初值為 0，故終值就應(yīng)為 Lst1.ListCount-1。

　　【操作步驟】

　　步驟 1：打開考生文件中的本題工程文件 vbsj3.vbp，按表 53-2 在窗體中畫出控件并設(shè)置其相關(guān)屬性。

　　表 53-2

　　步驟 2：在代碼編輯窗口，去掉程序中的注釋符"’"，將問(wèn)號(hào)"?"改為正確的內(nèi)容。

　　參考代碼：

　　Lst1.AddItem Txt1.Text

　　For i = 0 To Lst1.ListCount - 1

　　If Lst1.List(i) = Txt1.Text Then

　　Lt1.RemoveItem i

　　步驟 3：按要求將文件保存至考生文件夾中。

　　第 2 小題

　　【知識(shí)點(diǎn)播】①Trim 函數(shù)用于刪除字符串左右兩邊的空格;②Right()函數(shù)用于取出已有字符串最右邊指定個(gè)數(shù)的字符串;③Left()函數(shù)用于取出已有字符串最左邊指定個(gè)數(shù)的字符串;④Mid(字符串,起始位置[,個(gè)數(shù)])函數(shù)用于從已有字符串中取出從指定位置開始的含指定個(gè)數(shù)字符的字符串。

　　【審題分析】本題源程序的中心設(shè)計(jì)思想是：將文本框 Txt1 中的字符串按組合框中所選要求進(jìn)行截取并放入文本框 Txt2 中。源程序以組合框列表項(xiàng)的索引號(hào)(即 ListIndex 屬性值)作為 Select Case 語(yǔ)句的判斷表達(dá)式，故第 1 個(gè)?處應(yīng)為 Cbo1.ListIndex;組合框中第三項(xiàng)要求截取第 3~6 個(gè)字符，其實(shí)就是從字符串的第 3 個(gè)字符開始，截取 4 個(gè)字符， 故 Mid 函數(shù)的第 2、3 個(gè)參數(shù)應(yīng)為 3 和 4;最后的?處是將截取結(jié)果顯示在文本框中，故應(yīng)為 tmpStr。

　　【操作步驟】

　　步驟 1：打開考生文件中的本題工程文件 vbsj4.vbp，在代碼編輯窗口，去掉程序中的注釋符"’"，將問(wèn)號(hào)"?"改為正確的內(nèi)容。

　　參考代碼：

　　Select Case Cbo1.ListIndex

　　tmpStr = Mid(Trim(Txt1.Text), 3, 4)

　　Txt2.Text = tmpStr

　　步驟 2：按要求將文件保存至考生文件夾中。

　　編輯推薦：

　　2014年上半年計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間及入口專題

　　各地2014年計(jì)算機(jī)等級(jí)考試費(fèi)用匯總

　　2014年計(jì)算機(jī)等級(jí)考試時(shí)間