9月全國計(jì)算機(jī)等級考試二級VB無紙化上機(jī)題題庫題干及答案解析6

一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1的窗體上畫一個(gè)文本框，其名稱為Txt1，寬度和高度分別為1500為400；再畫兩個(gè)命令按鈕，其名稱分別為cmdDisplay和cmdEnlarge，標(biāo)題分別為"顯示"和"擴(kuò)大"，編寫適當(dāng)?shù)氖录^程。程序運(yùn)行后，如果單擊cmdDisplay命令按鈕，則在文本框中顯示"計(jì)算機(jī)考試"，如圖1所示；如果單擊cmdEnlarge命令按鈕，則使文本框在高、寬方向上各增加一倍，文本框中的字體大小擴(kuò)大到原來的3倍，如圖2所示。圖1圖2注意：要求程序中不得使用變量。存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。(2)在名稱為Form1的窗體上畫一個(gè)名稱為Img1的圖像框，有邊框，并可以自動(dòng)調(diào)整裝入圖片的大小以適應(yīng)圖像框的尺寸；再畫三個(gè)命令按鈕，名稱分別為cmdRed、cmdBlack、cmdCls，標(biāo)題分別為"紅桃"、"黑桃"、"清除"。在考生目錄下有二個(gè)圖標(biāo)文件，其名稱分別為""和""。程序運(yùn)行時(shí)，單擊"紅桃"按鈕，則在圖像框中顯示紅桃圖案(即文件，如圖3所示)；單擊"黑桃"按鈕，則在圖像框中顯示黑桃圖案(即文件)；單擊"清除"按鈕則清除圖像框中的圖案。請編寫相應(yīng)控件的Click事件過程，實(shí)現(xiàn)上述功能。注意：要求程序中不得使用變量，每個(gè)事件過程中只能寫一條語句。存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖3二、簡單應(yīng)用題(1)在考生文件夾下有一個(gè)工程文件。窗體上有名稱為Tmr1的定時(shí)器，以及名稱為Lin1和Lin2的兩條水平直線。請用名稱為Shp1的形狀控件，在兩條直線之間畫一個(gè)寬和高都相等的形狀，其顯示形式為圓，并設(shè)置適當(dāng)屬性使其滿足以下要求：①圓的頂端距窗體Form1頂端的距離為360；②圓的顏色為紅色(紅色對應(yīng)的值為：&H000000FF&或&HFF&)，如圖4所示。程序運(yùn)行時(shí)，Shp1將在Lin1和Lin2之間運(yùn)動(dòng)。當(dāng)Shp1的頂端到達(dá)Lin1時(shí)，會(huì)自動(dòng)改變方向而向下運(yùn)動(dòng)；當(dāng)Shp1的底部到達(dá)Lin2時(shí)，會(huì)改變方向而向上運(yùn)動(dòng)。文件中給出的程序不完整，請去掉程序中的注釋符，把程序中的？改為正確內(nèi)容，使其實(shí)現(xiàn)上述功能。注意：不能修改程序的其他部分和已給出控件的屬性。最后將修改后的文件按原文件名存盤。圖4(2)在考生文件夾下有一個(gè)工程文件，窗體上有兩個(gè)標(biāo)題分別為"讀數(shù)"和"統(tǒng)計(jì)"的命令按鈕；兩個(gè)名稱分別為Txt1和Txt2，初始值為空的文本框。如圖5所示。程序功能如下：①單擊"讀數(shù)"按鈕，則將考生文件夾下文件的內(nèi)容(該文件中僅含有字母和空格)顯示在Txt1文本框中；②在Txt1文本框中選中內(nèi)容后，單擊"統(tǒng)計(jì)"按鈕，則自動(dòng)統(tǒng)計(jì)選中文本中從未出現(xiàn)過的字母(統(tǒng)計(jì)過程中不區(qū)分大小寫)，并將這些字母以大寫形式顯示在Txt2文本框內(nèi)。請將"統(tǒng)計(jì)"按鈕Click事件過程中的注釋符去掉，把？改為正確內(nèi)容，以實(shí)現(xiàn)上述程序功能。注意：考生不得修改窗體文件中已經(jīng)存在的控件和程序。最后把修改后的文件按原文件名存盤。圖5三、綜合操作題在考生文件夾中有一個(gè)工程文件，其功能是：找出矩陣元素的最大值，并求出矩陣對角線元素之和，窗體外觀如圖6所示。程序運(yùn)行時(shí)，矩陣數(shù)據(jù)被放入二維數(shù)組a中。當(dāng)單擊"求最大值元素"命令按鈕時(shí)，找出矩陣中最大的數(shù)，并顯示在標(biāo)簽lblMax中。當(dāng)單擊"求對角線元素之和"命令按鈕時(shí)，計(jì)算矩陣主對角線元素之和，并顯示在標(biāo)簽lblSum中。文件中已給出部分程序，請編寫"求最大值元素"及"求對角線元素之和"兩個(gè)命令按鈕的事件過程中的部分程序代碼。圖6注意：不得修改程序的其他部分和控件屬性。最后把修改后的文件按原文件名存盤。程序調(diào)試通過后，兩個(gè)命令按鈕的事件過程必須至少各執(zhí)行一次。第102套題干113一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1的窗體上畫兩個(gè)標(biāo)簽(名稱分別為lblHeight和lblWeight，標(biāo)題分別為"身高"和"體重")、兩個(gè)文本框(名稱分別為txtHeight和txtWeight，Text屬性均為空白)和一個(gè)命令按鈕(名稱為cmdInput，標(biāo)題為"輸入")。然后編寫命令按鈕的Click事件過程，程序運(yùn)行后，如果單擊命令按鈕，則先后顯示兩個(gè)輸入對話框，在兩個(gè)輸入對話框中分別輸入身高和體重，并分別在兩個(gè)文本框中顯示出來，運(yùn)行后的窗體如圖1所示。要求程序中不得使用任何變量。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖1(2)在名稱為Form1的窗體上畫一個(gè)名稱為lstCourse的列表框，通過屬性窗口輸入四個(gè)列表項(xiàng)："語文"、"數(shù)學(xué)"、"物理"、"化學(xué)"，如圖2所示。請編寫適當(dāng)?shù)氖录^程使得在裝入窗體時(shí)，把最后一個(gè)列表項(xiàng)自動(dòng)改為"英語"；單擊窗體時(shí)，則刪除最后一個(gè)列表項(xiàng)。注意：要求程序中不得使用變量，每個(gè)事件過程中只能寫一條語句。存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖2二、簡單應(yīng)用題(1)在考生文件夾下有一個(gè)工程文件，其窗體上有一個(gè)名稱為Label1的控件數(shù)組，含三個(gè)標(biāo)簽，標(biāo)題分別是"開始時(shí)間"、"結(jié)束時(shí)間"和"通話費(fèi)用"；有一個(gè)名稱為Text1的控件數(shù)組，含三個(gè)初始值為空的文本框；此外還有兩個(gè)名稱分別為Cmd1和Cmd2的命令按鈕，標(biāo)題分別是"通話開始"和"通話結(jié)束"。其中通過屬性窗口對"通話結(jié)束"命令按鈕的初始狀態(tài)設(shè)置為禁用，如圖所示。該程序的功能是計(jì)算公用電話計(jì)時(shí)收費(fèi)。計(jì)時(shí)收費(fèi)標(biāo)準(zhǔn)為：通話時(shí)間在3分鐘以內(nèi)時(shí)，收費(fèi)元；3分鐘以上時(shí)，每超過1分鐘加收元，不足1分鐘按1分鐘計(jì)算。程序執(zhí)行的操作如下：①如果單擊"通話開始"按鈕，則在"開始時(shí)間"右側(cè)的文本框中顯示開始時(shí)間，且"通話結(jié)束"命令按鈕變?yōu)榭捎脿顟B(tài)，"通話開始"命令按鈕不可用。②如果單擊"通話結(jié)束"按鈕，則"結(jié)束時(shí)間"右側(cè)的文本框中顯示結(jié)束時(shí)間，同時(shí)計(jì)算通話費(fèi)用，并將其顯示在"通話費(fèi)用"右側(cè)的文本框中，"通話開始"命令按鈕變?yōu)榭捎脿顟B(tài)，"通話結(jié)束"命令按鈕不可用。在窗體文件中已經(jīng)給出了全部控件(如圖3所示)和程序，但程序不完整，要求去掉程序中的注釋符，把？改為正確的內(nèi)容，以實(shí)現(xiàn)上述功能。注意：不得修改已經(jīng)存在的內(nèi)容和控件屬性，最后將修改后的文件按原文件名存盤。圖3(2)在考生文件夾下有一個(gè)工程文件，文件中有5組數(shù)據(jù)，每組10個(gè)，依次代表語文、英語、數(shù)學(xué)、物理、化學(xué)這5門課程10個(gè)人的成績。程序運(yùn)行時(shí)，單擊"讀數(shù)"按鈕，可從文件中讀入數(shù)據(jù)放到數(shù)組a中。單擊"計(jì)算"按鈕，則計(jì)算5門課程的平均分(平均分取整)，并依次放入txtAvg文本框數(shù)組中。單擊"顯示圖形"按鈕，則顯示平均分的直方圖，如圖4所示。窗體文件中已經(jīng)有了全部控件，但程序不完整，要求去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容。圖4注意：不能修改程序的其他部分和控件屬性。最后把修改后的文件按原文件名存盤。三、綜合操作題在考生文件夾下有一個(gè)工程文件，其窗體上有三個(gè)標(biāo)簽、三個(gè)文本框和兩個(gè)命令按鈕，均使用默認(rèn)名稱。程序的功能是：①如果單擊"讀數(shù)"命令按鈕，則把考生文件夾下文件中兩組已按升序方式排列的數(shù)(每組30個(gè)數(shù))分別讀入數(shù)組A和B，并分別將它們顯示在Text1、Text2中；②如果單擊"合并"命令按鈕，則將A、B兩個(gè)數(shù)組合并為另一個(gè)按升序方式排列的數(shù)組C，并將合并后數(shù)組C中的數(shù)據(jù)依升序方式顯示在Text3中。窗體中給出了所有控件(如圖5所示)以及"讀數(shù)"命令按鈕的Click事件過程，請完善"合并"命令按鈕的Click事件過程，使其實(shí)現(xiàn)上述功能。注意：不得修改已經(jīng)存在的控件和程序，在結(jié)束程序運(yùn)行之前，必須進(jìn)行合并操作，且必須通過窗體右上角的"關(guān)閉"按鈕結(jié)束程序，否則無成績。最后，程序按原文件名存盤。圖5第103套題干114一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1的窗體上畫一個(gè)標(biāo)簽(名稱為lblInput，標(biāo)題為"輸入")、一個(gè)文本框(名稱為txtInput，Text屬性為空白)和一個(gè)命令按鈕(名稱為cmdDisplay，標(biāo)題為"顯示")，如圖1所示。然后編寫命令按鈕的Click事件過程。程序運(yùn)行后，在文本框中輸入"計(jì)算機(jī)VB等級考試"，然后單擊命令按鈕，則標(biāo)簽和文本框消失，并在窗體上顯示文本框中的內(nèi)容。運(yùn)行后的窗體如圖2所示。要求程序中不得使用任何變量。圖1圖2注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。(2)在名稱為Form1的窗體上畫1個(gè)名稱為Label1的標(biāo)簽，其初始內(nèi)容為空，且能根據(jù)指定的標(biāo)題內(nèi)容自動(dòng)調(diào)整標(biāo)簽的大??；再畫2個(gè)命令按鈕，標(biāo)題分別是"日期"和"時(shí)間"，名稱分別為cmdDate、cmdTime。請編寫2個(gè)命令按鈕的Click事件過程，使得單擊"日期"按鈕時(shí)，標(biāo)簽內(nèi)顯示系統(tǒng)當(dāng)前日期；單擊"時(shí)間"按鈕時(shí)，標(biāo)簽內(nèi)顯示系統(tǒng)當(dāng)前時(shí)間。如圖3所示。要求：程序中不得使用變量，每個(gè)事件過程中只能寫一條語句。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖3二、簡單應(yīng)用題(1)在考生文件夾下有一個(gè)工程文件。程序的功能是通過鍵盤向文本框中輸入正整數(shù)。在"除數(shù)"框架中選擇一個(gè)單選按鈕，然后單擊"計(jì)算數(shù)據(jù)"命令按鈕，將大于文本框中的正整數(shù)、并且能夠被所選除數(shù)整除的5個(gè)數(shù)添加到列表框Lst1中，如圖4所示。在窗體文件中已經(jīng)給出了全部控件，但程序不完整。要求：請去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能，但不能修改程序的其他部分和控件屬性。最后把修改后的文件按原文件名存盤。圖4(2)考生文件夾下的工程文件中有一個(gè)標(biāo)題為"編號"的標(biāo)簽Label1，一個(gè)用于接收選手編號的初始內(nèi)容為空的文本框txtNum；另有一個(gè)含有10個(gè)元素的標(biāo)簽控件數(shù)組Label2用于顯示評委名稱："評委1"、"評委2"…，一個(gè)含有10個(gè)元素的文本框控件數(shù)組txtScore用于接收10個(gè)評委對某選手的打分；還有一個(gè)標(biāo)題為"統(tǒng)計(jì)得分"的命令按鈕。請?jiān)佼媰蓚€(gè)可根據(jù)顯示內(nèi)容自動(dòng)調(diào)整大小、標(biāo)題分別為"選手編號"和"得分"的標(biāo)簽Label3和Label4，1個(gè)圖片框Pic1，如圖5所示。圖5程序功能如下：在txtNum文本框中輸入選手編號，并在txtScore文本框控件數(shù)組中輸入10個(gè)評委對該選手的打分情況后，單擊"統(tǒng)計(jì)得分"按鈕，則對10個(gè)評委的打分去掉一個(gè)最低分和一個(gè)最高分之后求平均，該平均分即為選手的最后得分。最后將選手編號和得分顯示在圖片框Pic1中，并將txtNum、txtScore的內(nèi)容置為空。命令按鈕的Click事件過程已經(jīng)給出，但事件過程不完整，請將其中的注釋符去掉，把？改為正確的內(nèi)容，以實(shí)現(xiàn)上述程序功能。注意：考生不得修改窗體文件中已經(jīng)存在的控件和程序，最后程序按原文件名存盤。三、綜合操作題在考生文件夾下有一個(gè)工程文件，在該工程文件中已經(jīng)定義了一個(gè)學(xué)生記錄類型數(shù)據(jù)StudType。有三個(gè)標(biāo)題分別為"學(xué)號"、"姓名"和"平均分"的標(biāo)簽；三個(gè)初始內(nèi)容為空，用于接收學(xué)號、姓名和平均分的文本框txtNum、txtName和txtAvg；一個(gè)用于顯示排序結(jié)果的圖片框。還有兩個(gè)標(biāo)題分別是"添加"和"排序"的命令按鈕。如圖6所示。程序功能如下：①在txtNum、txtName和txtAvg這三個(gè)文本框中輸入學(xué)號、姓名和平均分后，單擊"添加"按鈕，則將輸入內(nèi)容存入自定義的學(xué)生記錄類型數(shù)組stud中；(注：最多只能輸入10個(gè)學(xué)生信息，且學(xué)號不能為空)；②單擊"排序"按鈕，則將學(xué)生記錄類型數(shù)組stud中存放的學(xué)生信息，按平均分降序排列的方式顯示在圖片框中，每個(gè)學(xué)生一行，且顯示三項(xiàng)信息。圖6請將"添加"、"排序"按鈕Click事件過程中的注釋符去掉，把？改為正確的內(nèi)容，以實(shí)現(xiàn)上述程序功能。注意：考生不得修改窗體文件中已經(jīng)存在的控件和程序，最后把修改后的文件按原文件名存盤。第104套題干115一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1的窗體上畫一個(gè)名稱為lblCertain的標(biāo)簽，標(biāo)題為"請確認(rèn)"；再畫兩個(gè)命令按鈕，名稱分別為cmdYes、cmdNo，標(biāo)題分別為"是"、"否"，高均為350、寬均為900。如圖1所示。請?jiān)趯傩源翱谥性O(shè)置適當(dāng)屬性滿足以下要求：①窗體標(biāo)題為"確認(rèn)"，窗體標(biāo)題欄上不顯示最大化和最小化按鈕；②在任何情況下，按回車鍵都相當(dāng)于單擊"是"按鈕；按ESC鍵都相當(dāng)于單擊"否"按鈕。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖1(2)在名稱為Form1的窗體上畫一個(gè)名稱為txtComputer，內(nèi)容為"計(jì)算機(jī)"的文本框，且顯示為小四號字；再畫三個(gè)命令按鈕，名稱分別為"cmdLeft"、"cmdCenter"、"cmdRight"，標(biāo)題分別是"居左"、"居中"、"居右"。如圖2所示。圖2要求：編寫3個(gè)命令按鈕的Click事件過程，使得單擊"居左"按鈕時(shí)，文本框的內(nèi)容靠左對齊；單擊"居中"按鈕時(shí)，文本框的內(nèi)容居中對齊；單擊"居右"按鈕時(shí)，文本框的內(nèi)容靠右對齊。程序中不得使用變量，每個(gè)事件過程中只能寫一條語句。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。二、簡單應(yīng)用題(1)在考生文件夾中有一個(gè)工程文件。程序的功能是輸入用戶名和密碼。程序運(yùn)行時(shí)，當(dāng)向文本框txtPwd中輸入密碼時(shí)，若"顯示密碼"復(fù)選框沒有被選中，則在文本框txtChar中同時(shí)顯示"#"(如圖3所示)；若"顯示密碼"復(fù)選框被選中，再重新輸入密碼時(shí)，則在txtChar中同時(shí)顯示的是密碼字符本身。圖3在給出的窗體文件中已經(jīng)添加了全部控件，但程序不完整。要求：去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容。注意：不能修改程序的其他部分和控件屬性。最后把修改后的文件按原文件名存盤。(2)在考生文件夾下有一個(gè)工程文件。其窗體上有一個(gè)由八個(gè)圖片框控件組成的控件數(shù)組、兩個(gè)命令按鈕及一個(gè)計(jì)時(shí)器控件，如圖4所示。圖4程序功能：將計(jì)時(shí)器控件設(shè)置為每隔秒觸發(fā)一次。運(yùn)行程序時(shí)，只顯示下標(biāo)為0的圖片框控件數(shù)組元素，其它圖片框均不顯示。單擊"開始"按鈕，數(shù)組中的每個(gè)圖片框自左至右依次顯示，時(shí)間間隔為秒，產(chǎn)生月亮從左向右移動(dòng)的效果，如圖5所示。月亮移到右端后再從左端重新開始。單擊"停止"按鈕，月亮停止移動(dòng)。圖5要求：按照題目要求設(shè)置控件屬性，去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容。注意：不能修改程序的其他部分和控件屬性。最后把修改后的文件按原文件名存盤。三、綜合操作題在考生文件夾下有一個(gè)工程文件，其窗體中有一個(gè)實(shí)心圓。程序運(yùn)行時(shí)，當(dāng)用鼠標(biāo)左鍵單擊窗體任何位置時(shí)，實(shí)心圓則向單擊位置直線移動(dòng)；若用鼠標(biāo)右鍵單擊窗體，則實(shí)心圓停止移動(dòng)。窗體文件中已經(jīng)給出了全部控件，但程序不完整，程序運(yùn)行時(shí)界面如圖6所示。要求：請去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其能正確運(yùn)行，不能修改程序的其他部分和控件屬性。最后把修改后的文件按原文件名存盤。圖6第105套題干116一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1，標(biāo)題為"列表框示例"的窗體上畫1個(gè)名稱為Lst1的列表框，表項(xiàng)內(nèi)容依次輸入zzz、fff、sss和aaa，且以宋體14號字顯示表項(xiàng)內(nèi)容，圖1所示。最后設(shè)置相應(yīng)屬性，使運(yùn)行后列表框中的表項(xiàng)按字母升序方式排列，圖2所示。圖1圖2注意：存盤時(shí)，將文件保存至考生文件夾下，且窗體文件名為，工程文件名為。(2)在名稱為Form1的窗體上畫一個(gè)文本框，其名稱為Txt1，初始內(nèi)容為空白；然后再畫三個(gè)單選按鈕，其名稱分別為Opt1、Opt2和Opt3，標(biāo)題分別為北京、西安和成都，編寫適當(dāng)?shù)氖录^程。程序運(yùn)行后，如果選擇單選按鈕Opt1，則在文本框中顯示"故宮"；如果選擇單選按鈕Opt2，則在文本框中顯示"兵馬俑"；如果選擇單選按鈕Opt3，則在文本框中顯示"都江堰"。程序的運(yùn)行情況如圖3所示。要求程序中不得使用變量，事件過程中只能寫一條語句。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖3二、簡單應(yīng)用題(1)在考生文件夾下有一個(gè)工程文件，相應(yīng)的窗體文件為。在窗體上有一個(gè)名稱為cmdCalc、標(biāo)題為"計(jì)算"的命令按鈕；兩個(gè)水平滾動(dòng)條，名稱分別為Hsb1和Hsb2，其Max屬性均為100，Min屬性均為1；四個(gè)標(biāo)簽，名稱分別為Lbl1、Lbl2、Lbl3和Lbl4，標(biāo)題分別為"運(yùn)算數(shù)1"、"運(yùn)算數(shù)2"、"運(yùn)算結(jié)果"和空白；此外還有一個(gè)包含4個(gè)單選按鈕的控件數(shù)組，名稱為Opt1，標(biāo)題分別為"+"、"-"、"*"和"/"，如圖4所示。程序運(yùn)行后，移動(dòng)兩個(gè)滾動(dòng)條中的滾動(dòng)框，用滾動(dòng)條的當(dāng)前值作為運(yùn)算數(shù)，如果選中一個(gè)單選鈕，然后單擊命令按鈕，相應(yīng)的計(jì)算結(jié)果將顯示在Lbl4中，程序運(yùn)行情況如圖5所示。這個(gè)程序不完整，請把它補(bǔ)充完整，并能正確運(yùn)行。圖4圖5要求：去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其能正確運(yùn)行，但不能修改程序中的其他部分，也不能修改控件的屬性。最后用原來的文件名保存工程文件和窗體文件。(2)在考生文件夾下有一個(gè)工程文件，相應(yīng)的窗體文件為。窗體上有一個(gè)名稱為cmdStart的命令按鈕和一個(gè)名稱為Tmr1的計(jì)時(shí)器。請?jiān)诖绑w上畫一個(gè)標(biāo)簽(名稱為Lbl1，標(biāo)題為"請輸入一個(gè)正整數(shù)")、再畫一個(gè)文本框(名稱為Txt1，初始內(nèi)容為空白)。已經(jīng)給出了相應(yīng)的事件過程。程序運(yùn)行后，在文本框中輸入一個(gè)正整數(shù)，此時(shí)如果按回車鍵，則可使文本框中的數(shù)字每隔秒減1(倒計(jì)數(shù))；當(dāng)減到0時(shí)，倒計(jì)數(shù)停止，清空文本框，并把焦點(diǎn)移到文本框中。要求：去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其能正確運(yùn)行，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。三、綜合操作題在考生文件夾下有一個(gè)工程文件。在窗體文件中已經(jīng)給出了全部控件及部分程序。程序運(yùn)行時(shí)，在文本框Txt1中輸入一個(gè)大于2的偶數(shù)，并單擊"分解為"命令按鈕，則可以將該偶數(shù)分解為兩個(gè)素?cái)?shù)之和，且要求其中一個(gè)素?cái)?shù)是所能夠分解出的最小的素?cái)?shù)(一個(gè)偶數(shù)有時(shí)可以分解為多種素?cái)?shù)的組合，例如24可以分解為5和19，也可以分解為11和13，要求取含有最小素?cái)?shù)的組合，如圖6所示)。要求編寫"分解為"命令按鈕事件過程中"考生編寫程序開始"和"考生編寫程序結(jié)束"之間的代碼，以實(shí)現(xiàn)上述功能。過程IsPrime用來判斷一個(gè)數(shù)是否為素?cái)?shù)，如果是，返回值為True，否則返回值為False。圖6注意：不得修改原有程序和控件的屬性。至少正確運(yùn)行一次程序，且運(yùn)行時(shí)在文本框中輸入23456，單擊"分解為"按鈕，將結(jié)果顯示在標(biāo)簽中，否則無成績。最后把修改后的文件按原文件名存盤。第106套題干117一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1的窗體上建立一個(gè)名稱為Opt1的單選按鈕數(shù)組，含3個(gè)單選按鈕，它們的標(biāo)題依次為"選項(xiàng)1"、"選項(xiàng)2"、"選項(xiàng)3"，其下標(biāo)分別為0，1，2，初始狀態(tài)下，"選項(xiàng)2"為選中狀態(tài)。運(yùn)行后的窗體如圖1所示。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖1(2)在名稱為Form1的窗體上畫一個(gè)標(biāo)簽，其名稱為Lbl1，標(biāo)題為"計(jì)算機(jī)考試"，Left屬性為0；再畫一個(gè)水平滾動(dòng)條，其名稱為Hsb1，在屬性窗口中設(shè)置其屬性如下：Min=0Max=3000SmallChange=10LargeChange=100編寫適當(dāng)?shù)氖录^程。程序運(yùn)行后，如果移動(dòng)滾動(dòng)條上的滾動(dòng)框，則可使標(biāo)簽向相應(yīng)的方向移動(dòng)，標(biāo)簽距窗體左邊框的距離等于滾動(dòng)框的位置，程序的運(yùn)行情況如圖2所示。要求：程序中不得使用變量，每個(gè)事件過程中只能寫一條語句。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖2二、簡單應(yīng)用題(1)在考生目錄下有一個(gè)工程文件，窗體中有兩個(gè)圖片框，名稱分別為Pic1、Pic2，其中的圖片分別是一個(gè)航天飛機(jī)和一朵云彩；還有一個(gè)計(jì)時(shí)器，名稱為Tmr1；一個(gè)命令按鈕，名稱為Cmd1，標(biāo)題為"發(fā)射"。題目給出了兩個(gè)事件過程，但并不完整，要求：①設(shè)置計(jì)時(shí)器的屬性，使其在初始狀態(tài)下不計(jì)時(shí)。②設(shè)置計(jì)時(shí)器的屬性，使其每隔秒調(diào)用Timer事件過程一次。③去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使得在運(yùn)行時(shí)單擊"發(fā)射"按鈕，則航天飛機(jī)每隔秒向上移動(dòng)一次，當(dāng)?shù)竭_(dá)Pic2的下方時(shí)停止移動(dòng)，程序運(yùn)行時(shí)界面如圖3所示。注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。圖3(2)在考生文件夾下有一個(gè)工程文件，窗體上有一個(gè)名稱為picResult的圖片框；一個(gè)單選按鈕數(shù)組，含3個(gè)單選按鈕，標(biāo)題分別為"飛機(jī)"、"火車"、"汽車"；還有一個(gè)標(biāo)題為"顯示"的命令按鈕。程序的功能是在運(yùn)行時(shí)，如果選中一個(gè)單選按鈕后，單擊"顯示"按鈕，則根據(jù)單選按鈕的選中情況，在圖片框中顯示"選擇了飛機(jī)"、"選擇了火車"或"選擇了汽車"，如圖4所示。要求：①原題中的單選按鈕和命令按鈕沒有標(biāo)題，請利用屬性窗口依次添加單選按鈕標(biāo)題分別為"飛機(jī)"、"火車"、"汽車"，添加命令按鈕標(biāo)題為"顯示"。②去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能。注意：不能修改程序中的其他部分，也不能修改控件的其他屬性。最后把修改后的程序以原文件名存盤。圖4三、綜合操作題在考生文件夾下有一個(gè)工程文件，其窗體上畫有兩個(gè)名稱分別為Txt1、Txt2的文本框，其中Txt1可多行顯示。請畫兩個(gè)名稱分別為Cmd1、Cmd2，標(biāo)題分別為"生成數(shù)組"、"查找"的命令按鈕。如圖5所示。圖5程序功能如下：①單擊"生成數(shù)組"按鈕，則用隨機(jī)函數(shù)生成10個(gè)0～100之間(不含0和100)互不相同的數(shù)值，并將它們保存到一維數(shù)組a中，同時(shí)也將這10個(gè)數(shù)值顯示在Txt1文本框內(nèi)。②單擊"查找"按鈕將彈出輸入對話框，接收用戶輸入的任意一個(gè)數(shù)，并在一維數(shù)組a中查找該數(shù)，若查找失敗，則在Txt2文本框內(nèi)顯示該數(shù)"不存在于數(shù)組中"；否則顯示該數(shù)在數(shù)組中的位置。要求：請去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能，但不能修改窗體文件中已經(jīng)存在的控件和程序。最后把修改后的文件按原文件名存盤。第107套題干118一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1的窗體上畫一個(gè)標(biāo)簽，名稱為lblPwd，標(biāo)簽上顯示"請輸入密碼:"，畫一個(gè)名稱為txtPwd的文本框，其寬、高分別為1800和300，設(shè)置適當(dāng)?shù)膶傩允沟迷谳斎朊艽a時(shí)，文本框中顯示"*"字符，此外再把窗體的標(biāo)題設(shè)置為"密碼輸入窗口"，以上這些設(shè)置都必須在屬性窗口中進(jìn)行，運(yùn)行時(shí)的窗體如圖1所示。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖1(2)在Form1的窗體上畫一個(gè)列表框，名稱為lstCity，通過屬性窗口向列表框中添加4個(gè)項(xiàng)目，分別為"北京"、"上海"、"天津"和"重慶"，編寫適當(dāng)?shù)氖录^程。程序運(yùn)行后，如果單擊列表框中的某一項(xiàng)，則該項(xiàng)就從列表框中消失。程序的運(yùn)行情況如圖2所示。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖2二、簡單應(yīng)用題(1)在窗體(名稱為Form1，KeyPreview屬性為True)上畫一個(gè)列表框(名稱為Lst1)和一個(gè)文本框(名稱為Txt1)，如圖3所示。編寫窗體的KeyDown事件過程。程序運(yùn)行后，如果按"A"鍵，則從鍵盤上輸入要添加到列表框中的項(xiàng)目(內(nèi)容任意，不少于3個(gè))；如果按"D"鍵，則從鍵盤上輸入要?jiǎng)h除的項(xiàng)目，將其從列表框中刪除。程序的運(yùn)行情況如圖4所示。圖3圖4在考生文件夾下有一個(gè)工程文件(相應(yīng)的窗體文件名為)，可以實(shí)現(xiàn)上述功能。但這個(gè)程序不完整，請把它補(bǔ)充完整。要求：去掉程序中的注釋符，把程序中的？改為適當(dāng)?shù)膬?nèi)容，使其正確運(yùn)行，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。(2)在考生目錄下有一個(gè)工程文件，F(xiàn)orm1窗體中有一個(gè)文本框，名稱為Txt1。請?jiān)诖绑w上畫兩個(gè)框架，名稱分別為Fra1、Fra2，標(biāo)題分別為"性別"、"身份"；在Fra1中畫兩個(gè)單選按鈕Opt1、Opt2，標(biāo)題分別為"男"、"女"；在Fra2中畫兩個(gè)單選按鈕Opt3、Opt4，標(biāo)題分別為"學(xué)生"、"老師"；再畫一個(gè)命令按鈕，名稱為Cmd1，標(biāo)題為"確定"。如圖5所示。請編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時(shí)，在Fra1、Fra2中各選一個(gè)單選按鈕，然后單擊"確定"按鈕，就可以按照表1把結(jié)果顯示在文本框中。表1圖5最后把修改后的文件以原來的文件名存盤。注意：考生不得修改窗體文件中已經(jīng)存在的程序和Txt1的屬性，在結(jié)束程序運(yùn)行之前，必須進(jìn)行能夠產(chǎn)生上表中一個(gè)結(jié)果的操作。必須用窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績。三、綜合操作題在考生文件夾下有一個(gè)工程文件，其功能是：①單擊"讀數(shù)"按鈕，則把考生文件夾下文件中的100個(gè)正整數(shù)讀入數(shù)組a中，同時(shí)顯示在Txt1文本框中。②單擊"查找"按鈕，則將數(shù)組a中所有3的倍數(shù)的元素存入數(shù)組b中，并對數(shù)組b中的元素從小到大排序后顯示在文本框Txt2中。在給出的窗體文件中已經(jīng)有了全部控件，但程序不完整。要求：編寫適當(dāng)?shù)某绦虿糠质蛊鋵?shí)現(xiàn)上述功能，程序運(yùn)行時(shí)如圖6所示。圖6注意：考生不得修改窗體文件中已經(jīng)存在的控件和程序，在結(jié)束程序運(yùn)行之前，必須先執(zhí)行"查找"操作，然后再用窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績。最后，程序按原文件名存盤。第108套題干119一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1，標(biāo)題為"選課"的窗體上畫一個(gè)復(fù)選框數(shù)組，名稱為chkCourse，共有四個(gè)復(fù)選框，按順序其標(biāo)題分別是"語文"、"數(shù)學(xué)"、"外語"、"體育"，其中"數(shù)學(xué)"、"體育"復(fù)選框處在選中狀態(tài)，運(yùn)行時(shí)的窗體如圖1所示。請畫出控件并設(shè)置相應(yīng)屬性。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖1(2)在名稱為Form1的窗體上畫一個(gè)標(biāo)簽，其名稱為Lbl1；再畫一個(gè)列表框，其名稱為Lst1，通過屬性窗口向列表框中添加若干個(gè)項(xiàng)目，每個(gè)項(xiàng)目的具體內(nèi)容不限，編寫適當(dāng)?shù)氖录^程。程序運(yùn)行后，如果雙擊列表框中的任意一項(xiàng)，則把列表中的項(xiàng)目數(shù)在標(biāo)簽中顯示出來。程序運(yùn)行情況如圖2所示。不準(zhǔn)使用任何變量。圖2注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。二、簡單應(yīng)用題(1)在名稱為Form1的窗體上畫一個(gè)名稱為Txt1的文本框，再建立一個(gè)名稱為mnuFormat的彈出式菜單，含三個(gè)菜單項(xiàng)，標(biāo)題分別為"加粗"、"斜體"、"下劃線"，名稱分別為mnuFormat1、mnuFormat2、mnuFormat3。請編寫適當(dāng)?shù)氖录^程，在運(yùn)行時(shí)當(dāng)用鼠標(biāo)右鍵單擊文本框時(shí)，彈出此菜單，選中一個(gè)菜單項(xiàng)后，則按所選菜單標(biāo)題設(shè)置文本框中文本的格式，如圖3所示。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖3(2)在考生文件夾下有一個(gè)工程文件(相應(yīng)的窗體文件名為)，其功能是通過調(diào)用過程FindMax求數(shù)組的最大值，請完善此過程。程序運(yùn)行后，在四個(gè)文本框中各輸入一個(gè)整數(shù)，然后單擊命令按鈕，即可求出數(shù)組的最大值，并在窗體上顯示出來(如圖4所示)。這個(gè)程序不完整，請把它補(bǔ)充完整，并能正確運(yùn)行。要求：去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。圖4三、綜合操作題在考生文件夾中有一個(gè)工程文件，窗體界面如圖5所示。該程序的功能是：分別統(tǒng)計(jì)7*7數(shù)組四周元素之和及四周元素中能夠被7整除的元素的個(gè)數(shù)，并將統(tǒng)計(jì)結(jié)果顯示在相應(yīng)的標(biāo)簽中。請仔細(xì)閱讀已有程序，然后在標(biāo)出的位置編寫適當(dāng)?shù)某绦驅(qū)崿F(xiàn)上述功能。圖5要求：不得修改原有程序和控件的屬性。在結(jié)束程序運(yùn)行之前，必須至少正確運(yùn)行一次程序，將統(tǒng)計(jì)的結(jié)果顯示在標(biāo)簽中，否則無成績。最后把修改后的文件按原文件名存盤。第109套題干120一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1的窗體上畫兩個(gè)文本框，其名稱分別為Txt1和Txt2，它們的高、寬分別為350、2500和1500、2500。窗體的標(biāo)題為"文本框示例"。請通過屬性窗口設(shè)置適當(dāng)?shù)膶傩詽M足以下要求：①Txt2可以顯示多行文本，且有垂直和水平兩個(gè)滾動(dòng)條；②運(yùn)行時(shí)在Txt1中輸入的字符都顯示為"*"。運(yùn)行后的窗體如圖1所示。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖1(2)在名為Form1的窗體上繪制一個(gè)名稱為Txt1的文本框；一個(gè)名稱為Hsb1的水平滾動(dòng)條。在屬性窗口中設(shè)置滾動(dòng)條的屬性如下表所示。編寫適當(dāng)?shù)氖录^程，使程序運(yùn)行后，若移動(dòng)滾動(dòng)條上的滾動(dòng)框，則可擴(kuò)大或縮小文本框的高度，并使得文本框的寬度始終是其高度的倍。運(yùn)行后的窗體如圖2所示。注意：要求程序中不得使用任何變量，文件必須存放在考生文件夾中，工程文件名為，窗體文件名為。圖2二、簡單應(yīng)用題(1)在考生目錄下有一個(gè)工程文件，窗體上有一個(gè)組合框cboData，其中已經(jīng)預(yù)設(shè)了內(nèi)容；還有一個(gè)文本框txtData和三個(gè)名稱分別為cmdModify、cmdConfirm、cmdAdd，標(biāo)題分別為"修改"、"確定"、"添加"的命令按鈕。程序運(yùn)行時(shí)，"確定"按鈕不可用，如圖3所示。圖3程序的功能是：在運(yùn)行時(shí)，如果選中組合框中的一個(gè)列表項(xiàng)，單擊"修改"按鈕，則把該項(xiàng)復(fù)制到txtData中(可在txtData中修改)，并使"確定"按鈕可用；若單擊"確定"按鈕，則把修改后的txtData中的內(nèi)容替換組合框中該列表項(xiàng)的原有內(nèi)容，同時(shí)使"確定"按鈕不可用；若單擊"添加"按鈕，則把在txtData中的內(nèi)容添加到組合框中。所提供的窗體文件已經(jīng)給出了所有控件和程序，但程序不完整，請去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容。但不能修改程序中的其他部分，也不能修改控件的屬性。最后把修改后的文件按原文件名存盤。(2)在考生目錄下有一個(gè)工程文件，窗體中的兩個(gè)滾動(dòng)條分別表示紅燈亮和綠燈亮的時(shí)間(秒)，移動(dòng)滾動(dòng)框可以調(diào)節(jié)時(shí)間，調(diào)節(jié)范圍為1-10秒。剛運(yùn)行時(shí)，紅燈亮。單擊"開始"按鈕則開始切換：紅燈到時(shí)后自動(dòng)變?yōu)辄S燈，1秒后變?yōu)榫G燈；綠燈到時(shí)后自動(dòng)變?yōu)辄S燈，1秒后變?yōu)榧t燈，如此切換(如圖4所示)。所提供的窗體文件已經(jīng)給出了所有控件和程序，但程序不完整，請去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容。提示：在三個(gè)圖片框picR、picG和picY中分別放置了紅燈亮、綠燈亮、黃燈亮的圖標(biāo)，并重疊在一起，當(dāng)要使某個(gè)燈亮?xí)r，就使相應(yīng)的圖片框可見，而其他圖片框不可見，并保持規(guī)定的時(shí)間，時(shí)間到就切換為另一個(gè)圖片框可見，其他圖片框不可見。注意：考生不得修改工程中已經(jīng)存在的內(nèi)容和控件屬性，最后把修改后的文件按原文件名存盤。圖4三、綜合操作題考生文件夾下的工程文件中有一個(gè)初始內(nèi)容為空的文本框txtArray，二個(gè)標(biāo)題分別是"讀數(shù)"和"計(jì)算"的命令按鈕；請畫一個(gè)標(biāo)題為"各行平均數(shù)的最大值為"的標(biāo)簽Label2，再畫一個(gè)初始內(nèi)容為空的文本框txtMax。如圖9所示。程序功能如下：①單擊"讀數(shù)"按鈕，則將考生文件夾下文件的內(nèi)容讀入20行5列的二維數(shù)組a中，并同時(shí)顯示在txtArray文本框內(nèi)。②單擊"計(jì)算"按鈕，則自動(dòng)統(tǒng)計(jì)二維數(shù)組a中各行的平均數(shù)，并將這些平均數(shù)中的最大值顯示在txtMax文本框內(nèi)。"讀數(shù)"按鈕的Click事件過程已經(jīng)給出，請編寫"計(jì)算"按鈕的Click事件過程實(shí)現(xiàn)上述功能。注意：考生不得修改窗體文件中已經(jīng)存在的控件和程序，在結(jié)束程序運(yùn)行之前，必須進(jìn)行"計(jì)算"，且必須用窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績。最后，程序按原文件名存盤。圖5第110套題干121一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在標(biāo)題為"文本框示例"、名稱為Form1的窗體上畫一個(gè)名稱為Txt1的文本框，無初始內(nèi)容，其高、寬分別為2000、1800，可顯示多行，有水平滾動(dòng)條，并通過屬性窗口把文本框的字體樣式設(shè)置為"斜體"(如圖1所示)。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖1(2)在名稱為Form1的窗體上畫一個(gè)名稱為Shp1的形狀控件，畫兩個(gè)名稱分別為Cmd1、Cmd2，標(biāo)題分別為"顯示圓形"、"紅色邊框"的命令按鈕。將窗體的標(biāo)題設(shè)置為"形狀控件示例"，如圖2所示。請編寫適當(dāng)?shù)氖录^程使得在運(yùn)行時(shí)，單擊"顯示圓形"按鈕將形狀控件設(shè)為圓形。單擊"紅色邊框"按鈕，將形狀控件的邊框顏色設(shè)為紅色(&HFF&)，如圖3所示。注意：要求程序中不得使用變量，每個(gè)事件過程中只能寫一條語句。存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖2圖3二、簡單應(yīng)用題(1)在考生目錄下有一個(gè)工程文件，包含了所有控件和部分程序。程序運(yùn)行時(shí)，在文本框中每輸入一個(gè)字符，則立即判斷：若是小寫字母，則把它的大寫形式顯示在標(biāo)簽Lbl1中；若是大寫字母，則把它的小寫形式顯示在Lbl1中；若是其他字符，則把該字符直接顯示在Lbl1中。輸入的字母總數(shù)則顯示在標(biāo)簽Lbl2中，如圖4所示。要求：去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容。注意：不得修改已經(jīng)存在的程序，最后把修改后的文件按原文件名存盤。圖4(2)在考生文件夾下有一個(gè)工程文件(相應(yīng)的窗體文件名為)，其功能是通過調(diào)用過程Sort將數(shù)組按降序排序，完善該過程。程序運(yùn)行后，在四個(gè)文本框中各輸入一個(gè)整數(shù)(如圖5所示)，然后單擊命令按鈕，即可使數(shù)組按降序排序，并在文本框中顯示出來(如圖6所示)。這個(gè)程序不完整，請把它補(bǔ)充完整，并能正確運(yùn)行。圖-5圖6要求：去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。三、綜合操作題在考生目錄下有一個(gè)工程文件，包含了所有控件和部分程序。程序運(yùn)行時(shí)，單擊"打開文件"按鈕，則彈出"打開"對話框，默認(rèn)文件類型為"文本文件"，默認(rèn)目錄為考生目錄。選中文件(如圖7所示)，單擊"打開"按鈕，則把文件中的內(nèi)容讀入并顯示在文本框(Text1)中；單擊"修改文件"按鈕，則可把Text1中的大寫字母"E"、"N"、"T"改為小寫，把小寫字母"e"、"n"、"t"改為大寫；單擊"保存文件"按鈕，則彈出"另存為"對話框，默認(rèn)文件類型為"文本文件"，默認(rèn)目錄為考生目錄，默認(rèn)文件為""(如圖8所示)；單擊"保存"按鈕，則把Text1中修改后的內(nèi)容存到文件中。窗體中已經(jīng)給出了所有控件和程序，但程序不完整，去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，并編寫"修改內(nèi)容"按鈕的Click事件過程。圖7圖8注意：考生不得修改已經(jīng)存在的程序。必須把Text1中修改后的內(nèi)容用"保存文件"按鈕存儲(chǔ)結(jié)果，否則無成績。最后，按原文件名把程序存盤。第111套題干122一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1的窗體上畫一個(gè)名稱為Lbl1、標(biāo)題為"速度設(shè)置"的標(biāo)簽，通過屬性窗口把標(biāo)簽的大小設(shè)置為自動(dòng)調(diào)整。畫一個(gè)名稱為Hsb1的水平滾動(dòng)條，通過屬性窗口設(shè)置適當(dāng)屬性使?jié)L動(dòng)條的最大值為80，最小值為1，單擊滾動(dòng)條兩端的箭頭時(shí)，滾動(dòng)框移動(dòng)2，滾動(dòng)框的初始值為30。程序運(yùn)行后的窗體如圖1所示。注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。圖1(2)在名稱為Form1的窗體上用名稱為Shp1的形狀控件畫一個(gè)圓，其直徑為1000(高、寬均為1000)；再畫兩個(gè)命令按鈕，標(biāo)題分別是"垂直線"和"水平線"，名稱分別為Cmd1、Cmd2，如圖2所示。然后編寫兩個(gè)命令按鈕的Click事件過程。程序運(yùn)行后，如果單擊"垂直線"命令按鈕，則圓的內(nèi)部用垂直線填充；如果單擊"水平線"命令按鈕，則圓的內(nèi)部用水平線填充。圖2注意：程序中不得使用變量，每個(gè)事件過程中只能寫一條語句。存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。二、簡單應(yīng)用題(1)在考生目錄下有一個(gè)工程文件vbsj3.vbp,窗體如圖3所示。程序的功能是：通過鍵盤向文本框中輸入數(shù)字，如果輸入的是非數(shù)字字符，則提示輸入錯(cuò)誤，且文本框中不顯示輸入的字符。單擊名稱為cmdAdd、標(biāo)題為"添加"的命令按鈕，則將文本框中的數(shù)字添加到名稱為Cbo1的組合框中。在給出的窗體文件中已經(jīng)添加了全部控件，但程序不完整。要求去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容。注意：不能修改程序中的其他部分和其他控件的屬性。最后把修改后的文件按原文件名存盤。圖3(2)在考生文件夾下有一個(gè)工程文件，請?jiān)贔orm1窗體上建立一個(gè)名稱為Opt1的單選按鈕數(shù)組，含有三個(gè)單選按鈕，其標(biāo)題分別為"10！"、"11！"、"12！"，Index屬性分別為0、1、2；再畫一個(gè)名稱為cmdCalc的命令按鈕，標(biāo)題為"計(jì)算"；畫一個(gè)名稱為Txt1的文本框。程序的功能是在選定一個(gè)單選按鈕并單擊"計(jì)算"按鈕后，可以計(jì)算出相應(yīng)的階乘值，在Txt1中顯示該階乘值，如圖4所示。請畫出上述控件并編寫程序。注意：考生不得修改工程中已經(jīng)存在的內(nèi)容，在結(jié)束程序運(yùn)行之前，必須進(jìn)行一次計(jì)算。必須通過單擊窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績。最后按原文件名存盤。圖4三、綜合操作題在考生文件夾下有一個(gè)工程文件，窗體上有兩個(gè)標(biāo)題分別是"讀數(shù)"和"統(tǒng)計(jì)"的命令按鈕。請畫兩個(gè)標(biāo)簽，名稱分別為Lbl1和Lbl2，標(biāo)題分別為"出現(xiàn)次數(shù)最多的字母是"和"它出現(xiàn)的次數(shù)是"；再畫兩個(gè)名稱分別為Txt1和Txt2，初始值為空的文本框，如圖5所示。程序功能如下：①單擊"讀數(shù)"按鈕，則將考生文件夾下文件的內(nèi)容讀到變量s中(此過程已給出)。②單擊"統(tǒng)計(jì)"按鈕，則自動(dòng)統(tǒng)計(jì)文件中所含各字母(不區(qū)分大小寫)出現(xiàn)的次數(shù)，并將出現(xiàn)次數(shù)最多的字母顯示在Txt1文本框內(nèi)，它所出現(xiàn)的次數(shù)顯示在Txt2文本框內(nèi)。"讀數(shù)"按鈕的Click事件過程已經(jīng)給出，請為"統(tǒng)計(jì)"按鈕編寫適當(dāng)?shù)氖录^程實(shí)現(xiàn)上述功能。圖5注意：考生不得修改窗體文件中已經(jīng)存在的控件和程序，在結(jié)束程序運(yùn)行之前，必須進(jìn)行統(tǒng)計(jì)，且必須用窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績。最后，程序按原文件名存盤。第112套題干123一、基本操作題請根據(jù)以下各小題的要求設(shè)計(jì)VisualBasic應(yīng)用程序(包括界面和代碼)。(1)在名稱為Form1，標(biāo)題為"框架示例"的窗體上畫一個(gè)名稱為Fra1，且沒有標(biāo)題的框架。框架內(nèi)含有兩個(gè)單選按鈕，名稱分別為Opt1和Opt2、標(biāo)題分別為"字體"和"字號"，如圖1所示。圖1注意：存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。(2)在名稱為Form1的窗體上畫一個(gè)名稱為lblPwd，標(biāo)題為"密碼"的標(biāo)簽；畫一個(gè)名稱為txtPwd的文本框；再畫三個(gè)命令按鈕，名稱分別為cmdShow、cmdHide、cmdAgain，標(biāo)題分別為"顯示密碼"、"隱藏密碼"、"重新輸入"。程序運(yùn)行時(shí)，在txtPwd中輸入若干字符，單擊"隱藏密碼"按鈕，則只顯示同樣數(shù)量的"*"(如圖2所示)；單擊"顯示密碼"按鈕，則顯示輸入的字符(如圖3所示)；單擊"重新輸入"按鈕，則清除txtPwd中的內(nèi)容，并把光標(biāo)定位到txtPwd中。圖2圖3要求：請畫出所有控件，編寫命令按鈕的Click事件過程，程序中不得使用變量，在"顯示txtPwd"、"隱藏txtPwd"按鈕的事件過程中只能寫一條語句。存盤時(shí)必須存放在考生文件夾下，工程文件名為，窗體文件名為。二、簡單應(yīng)用題(1)在考生文件夾下有一個(gè)工程文件。程序運(yùn)行時(shí)，單擊窗體則顯示如圖4所示的圖案。請去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容。注意：不能修改程序的其他部分和控件屬性。最后把修改后的文件按原文件名存盤。圖-4(2)在考生文件夾下有一個(gè)工程文件，窗體如圖5所示。程序功能如下：①單擊"讀數(shù)據(jù)"按鈕，則將考生文件夾下文件的內(nèi)容(該文件中僅含有字母和空格)顯示在Txt1文本框中；②在Txt1中選中一部分文本，并單擊"統(tǒng)計(jì)"按鈕，則以不區(qū)分大小寫字母的方式，自動(dòng)統(tǒng)計(jì)選中文本中單詞"the"出現(xiàn)的次數(shù)，并將統(tǒng)計(jì)結(jié)果顯示在Txt2文本框內(nèi)。請將"統(tǒng)計(jì)"按鈕Click事件過程中的注釋符去掉，把？改為正確的內(nèi)容，以實(shí)現(xiàn)上述功能。注意：考生不得修改窗體文件中已經(jīng)存在的控件和程序，最后將程序按原文件名存盤。圖5三、綜合操作題在考生文件夾下有一個(gè)工程文件。其窗體中有一個(gè)名稱為txtRnd的文本框數(shù)組，下標(biāo)從0開始。程序運(yùn)行時(shí)，單擊"產(chǎn)生隨機(jī)數(shù)"按鈕，就會(huì)產(chǎn)生10個(gè)3位數(shù)的隨機(jī)數(shù)，并放入txtRnd數(shù)組中(如圖6所示)；單擊"重排數(shù)據(jù)"按鈕，將把txtRnd中的奇數(shù)移到前面，偶數(shù)移到后面(如圖7所示)。已經(jīng)給出了所有控件和部分程序。圖6圖7要求：請去掉程序中的注釋符，把程序中的？改為正確的內(nèi)容，使其能正確運(yùn)行，不能修改程序的其他部分和控件屬性。最后把修改后的文件按原文件名存盤。提示：在"重排數(shù)據(jù)"按鈕的事件過程中有對其算法的文字描述，請仔細(xì)閱讀。上機(jī)題答案解析第101套上機(jī)答案解析一、基本操作題第1小題【知識點(diǎn)播】①文本框（Text）通常用于接收用戶輸入的字符串?dāng)?shù)據(jù)或用于顯示輸出信息，其Text屬性用于設(shè)置或返回文本框中顯示的文本。②控件的Height和Width屬性用于設(shè)置控件在屏幕上的大小（即高和寬）。③字體大小通過FontSize屬性設(shè)置，一般格式為：FontSize[=點(diǎn)數(shù)]?！緦忣}分析】要在單擊"擴(kuò)大"按鈕時(shí)，使文本框在高、寬方向上各增加一倍，只需在"擴(kuò)大"按鈕的Click事件中編寫設(shè)置文本框的Height和Width屬性值為原來2倍的語句。要使文本框中的字體大小擴(kuò)大到原來的3倍，需編寫設(shè)置文本框的FontSize屬性值為原來3倍的語句。【操作步驟】步驟1：新建一個(gè)"標(biāo)準(zhǔn)EXE"工程，按表1在窗體中畫出控件并設(shè)置其相關(guān)屬性。表1步驟2：打開代碼編輯窗口，編寫兩個(gè)命令按鈕的單擊事件過程。參考代碼：PrivateSubcmdDisplay_Click()Txt1.Text="計(jì)算機(jī)考試"EndSubPrivateSubcmdEnlarge_Click()Txt1.Width=Txt1.Width*2Txt1.Height=Txt1.Height*2Txt1.FontSize=Txt1.FontSize*3EndSub步驟3：按要求將文件保存至考生文件夾中。第2小題【知識點(diǎn)播】①為圖像框控件指定圖片有兩種方法：一是在設(shè)計(jì)階段通過Picture屬性設(shè)置；二是在程序運(yùn)行時(shí)通過LoadPicture()圖片加載函數(shù)加載，其語法為：圖片框.Picture=LoadPicture("圖像文件路徑")，可返回當(dāng)前工程文件所在的文件夾路徑，是使用相對路徑的一種用法。用不帶參數(shù)的LoadPicture函數(shù)為對象的Picture屬性賦值將清除窗體、圖片框及圖像控件中的圖形。②Stretch（自動(dòng)伸縮）屬性用來設(shè)定圖像框是否需要自動(dòng)調(diào)整大小，以適應(yīng)載入圖像框中的圖片的大小，值為True時(shí)表示自動(dòng)調(diào)整。③BorderStyle用于設(shè)置圖像框的邊框類型，值為0表示無邊框，值為1表示有邊框。【審題分析】本題需分別在3個(gè)命令按鈕的Click事件過程中，用LoadPicture()函數(shù)為圖像框加載不同圖片?！静僮鞑襟E】步驟1：新建一個(gè)"標(biāo)準(zhǔn)EXE"工程，按表2在窗體中畫出控件并設(shè)置其相關(guān)屬性。表2步驟2：打開代碼編輯窗口，編寫3個(gè)命令按鈕的單擊事件過程。參考代碼：PrivateSubcmdRed_Click()Img1.Picture=LoadPicture(App.Path&"\Misc1.ico")EndSubPrivateSubcmdBlack_Click()Img1.Picture=LoadPicture(App.Path&"\Misc2.ico")EndSubPrivateSubcmdCls_Click()Img1.Picture=LoadPictureEndSub步驟3：按要求將文件保存至考生文件夾中。二、簡單應(yīng)用題第1小題【知識點(diǎn)播】①形狀控件（Shape）提供了顯示一些規(guī)則圖形的簡易方法。通過設(shè)置形狀控件Shape屬性值，可顯示6種圖形：0－矩形、1－正方形、2－橢圓、3－圓、4－圓角矩形、5－圓角正方形。Width屬性用于設(shè)置形狀的寬度，當(dāng)形狀為圓時(shí)即為圓的直徑。②Move方法用于移動(dòng)窗體或控件，其語法為：對象名.MoveLeft,top,width,height?！緦忣}分析】本題在計(jì)時(shí)器的Timer事件過程中，Shp1每次上下移動(dòng)的距離為s（值為負(fù)向上移動(dòng)，值為正向下移動(dòng)，初值為-40），若Shp1向上移動(dòng)后其Top屬性值小于或等于Lin1的Y1（或Y2）屬性值，則s取其相反數(shù)，Shp1向下移動(dòng)。若Shp1向下移動(dòng)后其Top屬性值與其Width屬性值之和大于或等于Lin2的Y1（或Y2）屬性值，則s再取其相反數(shù)，Shp1向上移動(dòng)。窗體加載時(shí)，計(jì)時(shí)器啟動(dòng)，Shp1開始在Lin1和Lin2之間運(yùn)動(dòng)?！静僮鞑襟E】步驟1：打開考生文件下的本題工程文件，在窗體上兩條水平直線間畫一個(gè)形狀控件，并按表3設(shè)置其屬性。表3步驟2：在代碼編輯窗口，去掉程序中的注釋符"'"，將問號"？"改為正確的內(nèi)容。參考代碼：Tmr1.Enabled=TrueIfShp1.Top<=Lin1.Y1ThenIfShp1.Top+Shp1.Width>=Lin2.Y1Then步驟3：按要求將文件保存至考生文件夾中。第2小題【審題分析】本題在"統(tǒng)計(jì)"按鈕的單擊事件過程中，先檢查是否選中文本框Txt1中的內(nèi)容（if語句條件表達(dá)式為：sl=0或st=""），若沒選擇內(nèi)容則彈出提示信息，否則通過For循環(huán)逐一取出選中內(nèi)容的每個(gè)字符（故循環(huán)終值為sl），并計(jì)算出其中每個(gè)字母（大寫）在26個(gè)字母中的順序，賦值給變量n，數(shù)組元素a(n)則記錄順序號為n的字母出現(xiàn)的次數(shù)。再通過For循環(huán)逐一檢查26個(gè)字母（故循環(huán)終值為26）的出現(xiàn)次數(shù)是否為0（即a(i)=0），將出現(xiàn)次數(shù)為0的字母顯示在文本框Txt2中?！静僮鞑襟E】步驟1：打開考生文件下的本題工程文件，在代碼編輯窗口，去掉程序中的注釋符"'"，將問號"？"改為正確的內(nèi)容。參考代碼：Ifsl=0ThenFori=1Tosla(n)=a(n)+1Fori=1To26步驟2：按要求將文件保存至考生文件夾中。三、綜合操作題【知識點(diǎn)播】位于矩陣左上到右下主對角線上的元素具有行號等于列號的特點(diǎn)，位于4*4矩陣右上到左下對角線上的元素具有行號與列號之和為5的特點(diǎn)。【審題分析】cmdMax_Click事件過程設(shè)計(jì)思路：用變量Max記錄數(shù)組a中第1個(gè)元素的值。然后通過嵌套For循環(huán)讓數(shù)組a中的每一個(gè)元素逐一與變量Max比較大小，當(dāng)有數(shù)組元素的值大于變量Max時(shí)，將其賦值給變量Max，循環(huán)結(jié)束時(shí)變量Max的值即為矩陣中最大的數(shù)，將其顯示在標(biāo)簽lblMax中。cmdSum_Click事件過程設(shè)計(jì)思路：通過For循環(huán)將數(shù)組元素a(i,i）累加入變量Sum（初值為0）中，循環(huán)結(jié)束時(shí)將其顯示在標(biāo)簽lblSum中。【操作步驟】步驟1：打開考生文件夾下的本題工程文件，在碼編輯窗口的指定位置輸入代碼：參考代碼：PrivateSubcmdMax_Click()'====考生編寫程序開始====DimiAsIntegerDimjAsIntegerDimMaxAsIntegerMax=a(1,1)Fori=1To4Forj=1To4IfMax<a(i,j)ThenMax=a(i,j)NextNextlblMax=Max'====考生編寫程序結(jié)束===='不得修改以下部分savelblMaxEndSubPrivateSubcmdSum_Click()'====考生編寫程序開始====DimiAsIntegerDimjAsIntegerDimSumAsIntegerFori=1To4Sum=Sum+a(i,i)NextlblSum=Sum'====考生編寫程序結(jié)束===='不得修改以下部分savelblSumEndSub步驟2：按要求將文件保存至考生文件夾中。步驟3：按<F5>鍵運(yùn)行程序，分別單擊"求最大值元素"按鈕和"求對角線元素之和"按鈕。第102套上機(jī)答案解析一、基本操作題第1小題【知識點(diǎn)播】InputBox()函數(shù)用于顯示一個(gè)輸入框，提示用戶輸入一個(gè)數(shù)據(jù)，該函數(shù)返回值默認(rèn)為字符串類型，其常用語法格式為：InputBox(Prompt[,Title][,Default])。其中，Prompt字符串為輸入框上顯示的提示文本；Title字符串在輸入框的標(biāo)題欄上顯示；Default字符串為輸入框的缺省文本?！緦忣}分析】要實(shí)現(xiàn)本題功能只需在命令按鈕的Click事件過程中，編寫兩條將輸入對話框中用戶輸入內(nèi)容賦值給文本框Text屬性的語句?！静僮鞑襟E】步驟1：新建一個(gè)"標(biāo)準(zhǔn)EXE"工程，在窗體Form1中加入兩個(gè)標(biāo)簽、兩個(gè)文本框和一個(gè)命令按鈕，其相關(guān)屬性設(shè)置如表1所示。表1步驟2：雙擊窗體Form1中的"輸入"按鈕，在打開的代碼編輯窗口中，輸入如下代碼：參考代碼：PrivateSubcmdInput_Click()txtHeight.Text=InputBox("請輸入身高")txtWeight.Text=InputBox("請輸入體重")EndSub步驟3：按要求將文件保存至考生文件夾中?！局饕键c(diǎn)】InputBox()函數(shù)。第2小題【知識點(diǎn)播】①Load(裝載)事件：在一個(gè)窗體被裝載時(shí)發(fā)生，常用于在程序啟動(dòng)時(shí)對屬性和變量進(jìn)行初始化。②列表框的List(Index)屬性用于設(shè)置或返回指定索引號（從0開始）列表項(xiàng)的內(nèi)容。ListCount屬性用來返回列表框中當(dāng)前的列表項(xiàng)項(xiàng)數(shù)。③使用RemoveItem方法可以在程序運(yùn)行時(shí)刪除列表框中的項(xiàng)目，其語法為：列表框.RemoveItem索引值。【審題分析】在窗體的Load事件過程中，設(shè)置列表框lstCourse的List(3)屬性值為"英語"；在窗體的Click事件過程中，使用列表框的RemoveItem方法刪除索引號為3的項(xiàng)目?！静僮鞑襟E】步驟1：新建一個(gè)"標(biāo)準(zhǔn)EXE"工程，在窗體Form1中加入一個(gè)列表框，其相關(guān)屬性設(shè)置如表2所示。表2步驟2：雙擊窗體Form1中的"輸入"按鈕，在打開的代碼編輯窗口中，輸入如下代碼：參考代碼：PrivateSubForm_Load()lstCourse.List(3)="英語"EndSubPrivateSubForm_Click()lstCourse.RemoveItem3EndSub步驟3：按要求將文件保存至考生文件夾中?！究荚囌`區(qū)】列表框中項(xiàng)目的索引號是從0開始的，最后一個(gè)項(xiàng)目的索引號應(yīng)等于，而非。二、簡單應(yīng)用題第1小題【知識點(diǎn)播】Enabled屬性用于設(shè)置控件或菜單項(xiàng)在程序運(yùn)行時(shí)是否有效，值為True時(shí)表示有效，值為False時(shí)表示無效（顯示為灰色）。【審題分析】題目要求在單擊"通話開始"按鈕時(shí)，在"開始時(shí)間"右側(cè)的文本框中顯示開始時(shí)間，故cmdStart_Click事件過程中的？處應(yīng)改為：Text1(0).Text。在單擊"通話結(jié)束"按鈕時(shí)，先計(jì)算通話時(shí)長，再計(jì)算通話費(fèi)用。若通話時(shí)長在3分鐘以上，則通話費(fèi)用為：。設(shè)置cmdStart的Enabled屬性值為True，將使"通話開始"命令按鈕變?yōu)榭捎茫O(shè)置cmdStop的Enabled屬性值為Fasle，將使"通話結(jié)束"命令按鈕不可用。【操作步驟】步驟1：打開考生文件下的本題工程文件，在代碼編輯窗口，去掉程序中的注釋符"'"，將問號"？"改為正確的內(nèi)容。參考代碼：Text1(0).Text=Str(Time())cmdStart.Enabled=TruecmdStop.Enabled=False步驟2：按要求將文件保存至考生文件夾中。第2小題【審題分析】"讀入數(shù)據(jù)"按鈕的單擊事件過程中，Open語句用于打開數(shù)據(jù)文件以讀入數(shù)據(jù)，故？應(yīng)改為：Input。"計(jì)算"按鈕的單擊事件過程中，源程序用嵌套For循環(huán)來計(jì)算5門課程的平均分，其中內(nèi)循環(huán)體中變量s(i)用于統(tǒng)計(jì)某課程的總分，表達(dá)式為：s(i)=s(i)+a(i,j)，外循環(huán)體中變量s(i)的最終值應(yīng)為某課程的平均分。"顯示圖形"按鈕單擊事件過程的For循環(huán)中，根據(jù)每門課程的平均分，先計(jì)算出對應(yīng)直方圖的高度，然后計(jì)算該直方圖的Top屬性值（應(yīng)為水平直線的Y1（或Y2）屬性值減去直方圖的高度），最后顯示該直方圖（通過設(shè)置其Visible實(shí)現(xiàn)）?！静僮鞑襟E】步驟1：打開考生文件下的本題工程文件，在代碼編輯窗口，去掉程序中的注釋符"'"，將問號"？"改為正確的內(nèi)容。參考代碼：OpenApp.Path&"\in4.txt"ForInputAs#1s(i)=s(i)+a(i,j)s(i)=CInt(s(i)/10)Shape1(k-1).Top=m-Shape1(k–1).HeightShape1(k-1).Visible=True步驟2：按要求將文件保存至考生文件夾中。三、綜合操作題【審題分析】分別從數(shù)組a和數(shù)組b中各取出一個(gè)最小數(shù)（即a(1)和b(1)），并比較它們的大小，將兩者中較小的數(shù)作為數(shù)組c的第一個(gè)元素（即c(1)），接下來再用兩者中較大的數(shù)與對方的下一個(gè)數(shù)比較，并將兩者中較小的數(shù)作為數(shù)組c的第二個(gè)元素（即c(2)），依此類推，直至得到數(shù)組c的60個(gè)元素為此。給數(shù)組c各元素賦值可通過一個(gè)For循環(huán)來完成，當(dāng)一個(gè)數(shù)組中的元素較另一個(gè)數(shù)組中的元素先取完時(shí)，則將另一個(gè)數(shù)組中的剩余元素直接作為數(shù)組c的后續(xù)元素?！静僮鞑襟E】步驟1：打開考生文件下的本題工程文件，在代碼編輯窗口的指定位置編寫如下代碼：參考代碼：DimiAsIntegerDimjAsIntegerDimmAsIntegerDimnAsIntegerm=1n=1Fori=1To60Ifa(m)<b(n)Thenc(i)=a(m)m=m+1Elsec(i)=b(n)n=n+1EndIfIfm>30ThenForj=i+1To60c(j)=b(n)n=n+1NextExitForEndIfIfn>30ThenForj=i+1To60c(j)=a(m)m=m+1NextExitForEndIfNext步驟2：按要求將文件保存至考生文件夾中。步驟3：按<F5>運(yùn)行程序，先單擊"讀數(shù)"按鈕，接著單擊"計(jì)算"按鈕，然后單擊窗體右上角的關(guān)閉按鈕結(jié)束程序。第103套上機(jī)答案解析一、基本操作題第1小題【審題分析】要實(shí)現(xiàn)在程序運(yùn)行時(shí)，單擊命令按鈕，使標(biāo)簽和文本框消失，在窗體上顯示文本框中的內(nèi)容，其實(shí)就是在命令按鈕的單擊事件過程中，設(shè)置標(biāo)簽和文本框的Visible屬性值為False，用窗體的print方法將文本框的內(nèi)容輸出到窗體上。【操作步驟】步驟1：新建一個(gè)"標(biāo)準(zhǔn)EXE"工程，在窗體上畫一個(gè)標(biāo)簽、一個(gè)文本框和一個(gè)命令按鈕，其屬性及其值如表1所示。表1步驟2：在代碼編輯窗口，編寫"顯示"按鈕的Click事件過程。參考代碼：PrivateSubcmdDisplay_Click()lblInput.Visible=FalsetxtInput.Visible=FalseEndSub步驟3：按要求將文件保存至考生文件夾中?！局饕键c(diǎn)】控件畫法、簡單事件編程。第2小題【知識點(diǎn)播】①Date函數(shù)用于獲取當(dāng)前系統(tǒng)日期，Time函數(shù)用于獲取當(dāng)前系統(tǒng)時(shí)間。②AutoSize屬性用來確定是否根據(jù)Caption屬性指定的標(biāo)題自動(dòng)調(diào)整標(biāo)簽的大小，可以設(shè)置為True或False。【審題分析】本題只需在"日期"按鈕的單擊事件過程中，通過調(diào)用Date函數(shù)在標(biāo)簽中顯示當(dāng)前系統(tǒng)日期；在"時(shí)間"按鈕的單擊事件過程中，通過調(diào)用Time函數(shù)在標(biāo)簽中顯示當(dāng)前系統(tǒng)時(shí)間?！静僮鞑襟E】步驟1：新建一個(gè)"標(biāo)準(zhǔn)EXE"工程，按表2在窗體中畫出控件并設(shè)置其相關(guān)屬性。表2步驟2：在代碼編輯窗口編寫以下事件過程。參考代碼：PrivateSubcmdDate_Click()Label1.Caption=DateEndSubPrivateSubcmdTime_Click()Label1.Caption=TimeEndSub步驟3：按要求將文件保存至考生文件夾中?！局饕键c(diǎn)】Date函數(shù)、Time函數(shù)。二、簡單應(yīng)用題第1小題【審題分析】判斷整數(shù)A能被整數(shù)B整除的條件表達(dá)式為：AModB=0。本題源程序在"計(jì)算數(shù)據(jù)"的單擊事件過程中，通過For循環(huán)逐一判斷單選按鈕數(shù)組中的每個(gè)元素是否選中，用變量y記錄選中單選按鈕所標(biāo)識的數(shù)字，并調(diào)用過程"calc"計(jì)算滿足條件的正整數(shù)。在過程"calc"中，通過Do循環(huán)依次判斷大于文本框中數(shù)的正整數(shù)是否能被變量y整除，將能被整除的前5個(gè)數(shù)添加到列表框Lst1中?！静僮鞑襟E】步驟1：打開考生文件下的本題工程文件，在代碼編輯窗口，去掉程序中的注釋符"'"，將問號"？"改為正確的內(nèi)容。參考代碼：IfOpt1(i).Value=TrueTheny=Val(Opt1(i).Caption)DoWhilei<=5Lst1.AddItemx步驟2：按要求將文件保存至考生文件夾中。第2小題【審題分析】本題源程序在"統(tǒng)計(jì)得分"按鈕的單擊事件過程中，先檢查是否在文本框中輸入了編號及各評委的打分，若沒輸入則給出提示信息，并等待用戶輸入。接著用變量Max、Min和Sum分別記錄選手的最高得分、最低得分及總得分，他們的初值均設(shè)置為第一位評委的打分（即txtScore(0).Text）。然后通過For循環(huán)逐一與其他評委的打分相比（循環(huán)變量n的初值應(yīng)為1），若Max的值小于某評委的打分（即CaseIs>Max），則將該評委的打分賦值給Max；若Min的值大于某評委的打分（即CaseIs<Min），則將該評委的打分賦值給Min。計(jì)算總分的表達(dá)式應(yīng)為：Sum=Sum+Val(txtScore(n))（或Sum=Val(txtScore(0))+Val(txtScore(n))）。最后將選手編號和計(jì)算出的得分用Print方法顯示在圖片框Pic1中，并將所有文本框的內(nèi)容置空。【操作步驟】步驟1：打開考生文件下的本題工程文件，按表3在窗體中畫出控件并設(shè)置其相關(guān)屬性。表3步驟2：在代碼編輯窗口，去掉程序中的注釋符"'"，將問號"？"改為正確的內(nèi)容。參考代碼：Forn=1To9CaseIs>MaxCaseIs<MinSum=Sum+Val(txtScore(n))步驟3：按要求將文件保存至考生文件夾中。三、綜合操作題【知識點(diǎn)播】"冒泡法"是一種重要的數(shù)據(jù)排序算法，它的核心思路是按順序讓一個(gè)數(shù)列中的每一個(gè)數(shù)都與它之后的所有的數(shù)逐一進(jìn)行比較，如果該數(shù)大于其后面的數(shù)，則把這兩個(gè)位置的數(shù)進(jìn)行交換。通過這樣的循環(huán)，最終按照從小到大的順序排列出該數(shù)列。【審題分析】單擊"添加"按鈕時(shí)先檢查當(dāng)前已輸入學(xué)生信息數(shù)n是否已達(dá)到10條，若沒達(dá)到10條，則標(biāo)記變量tag_in=0表示允許添加信息（且學(xué)生信息數(shù)n增1），否則tag_in=1。當(dāng)tag_in=0時(shí)，接著檢查是否輸入學(xué)號，若沒輸入學(xué)號則提示用戶輸入，且學(xué)生信息數(shù)n應(yīng)減1（即n=n-1）；若已輸入學(xué)號，則將該學(xué)生信息存入記錄數(shù)組元素stud(n)，其中保存學(xué)號的語句為：stud(n).Num=txtNum。在"排序"按鈕的單擊事件過程中，源程序利用"冒泡法"對記錄數(shù)組中的元素按平均分從大到小進(jìn)行排序。故該事件過程中，第1個(gè)？處應(yīng)改為：j，第2個(gè)？處應(yīng)改為：Average，第3個(gè)？處應(yīng)改為：stud(j)。最后在For循環(huán)中，用圖片框的Print方法在圖片框中顯示每個(gè)學(xué)生的3項(xiàng)信息?！静僮鞑襟E】步驟1：打開考生文件下的本題工程文件，在代碼編輯窗口，去掉程序中的注釋符"'"，將問號"？"改為正確的內(nèi)容。參考代碼：n=n–1stud(n).Num=txtNumFork=jTonIfstud(k).Average>stud(j).AverageThenstud(k)=stud(j)步驟2：按要求將文件保存至考生文件夾中。第104套上機(jī)答案解析一、基本操作題第1小題【知識點(diǎn)播】①窗體的標(biāo)題是由其Caption屬性設(shè)置，窗體的MaxButton屬性、MinButton屬性決定其標(biāo)題欄是否顯示最大化、最小化按鈕，True表示顯示，F(xiàn)alse表示不顯示。此外，通過修改窗體的BorderStyle屬性（用于設(shè)置邊框樣式），也可實(shí)現(xiàn)窗體標(biāo)題欄是否顯示最大化、最小化按鈕的效果，其中值設(shè)置為3時(shí)窗體具有固定大小，包含左側(cè)控制框和標(biāo)題欄，但沒有最大化、最小化按鈕。②程序運(yùn)行時(shí)，通常用單擊命令按鈕的方式來選中某個(gè)按鈕，為了能夠在按<Enter>鍵時(shí)也選中這個(gè)命令按鈕，可將其Default屬性設(shè)置為True，某些情況下為了能夠在按<Esc>鍵時(shí)也能選中按鈕，則需要將命令按鈕的Cancel屬性設(shè)置為True?！緦忣}分析】本題只需按題目要求畫出標(biāo)簽、命令按鈕控件并設(shè)置其和窗體相應(yīng)屬性。【操作步驟】步驟1：新建一個(gè)"標(biāo)準(zhǔn)EXE"工程，按表1在窗體中畫出控件并設(shè)置其相關(guān)屬性。表1步驟2：按要求將文件保存至考生文件夾中?！咎貏e提示】為使兩個(gè)控件的大小相同，還可在選中控件后執(zhí)行【格式】→【統(tǒng)一尺寸】→【兩者都相同】命令。【主要考點(diǎn)】窗體、命令按鈕。第2小題【知識點(diǎn)播】①Alignment屬性用于確定文本框中文本的放置方式，其值可以設(shè)置為0（靠左，默認(rèn)）、1（靠右）或2（居中）。②FontSize屬性用來將文本格式設(shè)置成相應(yīng)的字號?！緦忣}分析】本題需分別在三個(gè)命令按鈕的Click事件過程中，設(shè)置文本框的Alignment屬性為對應(yīng)值。【操作步驟】步驟1：新建一個(gè)"標(biāo)準(zhǔn)EXE"工程，按表2在窗體中畫出控件并設(shè)置其相關(guān)屬性。表2步驟2：在代碼編輯窗口，分別編寫3個(gè)按鈕的單擊事件過程。參考代碼：PrivateSubcmdLeft_Click()txtComputer.Alignment=0EndSubPrivateSubCmdCenter_Click()txtComputer.Alignment=2EndSubPrivateSubCmdRight_Click()txtComputer.Alignment=1EndSub步驟3：按要求將文件保存至考生文件夾中。二、簡單應(yīng)用題第1小題【審題分析】本題在txtPwd_Change事件過程中，根據(jù)"顯示密碼"復(fù)選框是否被選中（即屬性值是否為1），來決定文本框txtChar中的字符是否被屏蔽。其中，屏蔽時(shí)將文本框的PasswordChar屬性值設(shè)置為字符"#"，取消屏蔽時(shí)將文本框的PasswordChar屬性值設(shè)置為空字符串。文本框txtPwd中輸入的密碼要同步顯示在文本框txtChar中，需使用語句：【操作步驟】步驟1：打開考生文件下的本題工程文件，在代碼編輯窗口，去掉程序中的注釋符"'"，將問號"？"改為正確的內(nèi)容。參考代碼：IfchkShow.Value=1ThentxtChar.PasswordChar=""ElsetxtChar.PasswordChar="#"EndIf步驟2：按要求將文件保存至考生文件夾中。第2小題【審題分析】根據(jù)題意，本題在加載窗體的初始化設(shè)置中，將隱藏除第1個(gè)圖片框（Picture1(0)）外的所有圖