國家二級（VB）機試模擬試卷5（共9套）（共396題）國家二級（VB）機試模擬試卷第1套一、選擇題(本題共40題，每題1.0分，共40分。)1、為把圓周率的近似值3.14159存放在變量pi中，應(yīng)該把變量pi定義為()。A、DimpiAsIntegerB、Dimpi(7)AsIntegerC、DimpiAsSingleD、DimpiAsLong標(biāo)準(zhǔn)答案：C知識點解析：單精度Single或雙精度Double型的變量能夠保存浮點型小數(shù)，整型Integer和長整型Long的變量只能保存整型數(shù)據(jù)。本題中圓周率為3.14159，小數(shù)，可用定義一個Single或Double型變量來保存。故選C。2、能夠存放組合框的所有項目內(nèi)容的屬性是()。A、CaptionB、TextC、ListD、Selected標(biāo)準(zhǔn)答案：C知識點解析：組合框沒有Caption屬性；Text屬性用來設(shè)置或返回組合框中當(dāng)前選項的文本內(nèi)容；Selected屬性是列表框控件的屬性，組合框沒有Selected屬性；List屬性用來設(shè)置或返回組合框中的各選項，它是一個字符串?dāng)?shù)組，組合框中各選項內(nèi)容用List(下標(biāo))表示。故A、B、D選項錯誤，C選項正確。3、工程文件中包含一個模塊文件和一個窗體文件。模塊文件的程序代碼是：PublicXAsIntegerPrivateYAsInteger窗體文件的程序代碼是：DimaAsIntegerPrivateSubForm_Load()DimbAsIntegera=2：b=3：x=10：y=20EndSubPrivateSubCommand1_Click()a=a+5：b=b+5：x：x+5：y=y+5Printa；b；x；yEndSub運行程序，單擊窗體上的命令按鈕，則在窗體上顯示的是()。A、55155B、751525C、78155D、75155標(biāo)準(zhǔn)答案：D知識點解析：程序在模塊文件中定義x為整型全局變量，在整個工程中都起作用，而y定義為整型私有變量，只能在本模塊文件中起作用。在窗體文件中變量a在本窗體文本中起作用，窗體加載事件中定義的變量b和沒有聲明的變量y，只在本事件過程起作用。程序窗體加載時，對后邊有影響的變量值為a為2，x為10，沒有指定初值的變量值默認為0，因此單擊命令按鈕后，a=a+5=7，b=b+5=5，x=x+5=15，y=y+5=5，結(jié)果輸出75155。4、在關(guān)系代數(shù)運算中，有5種基本運算，它們是()。A、并(∪)、差(-)、交(∩)、除(÷)和笛卡兒積(×)B、并(∪)、差(-)、交(∩)、投影(π)和選擇(σ)C、并(∪)、交(∩)、投影(π)、選擇(σ)和笛卡兒積(×)D、并(∪)、差(-)、投影(π)、選擇(σ)和笛卡兒積(×)標(biāo)準(zhǔn)答案：D知識點解析：并、差、笛卡兒積、投影和選擇是5種基本的運算，其他運算即交、連接和除，均可以通過5種基本的運算來表達。5、要建立一個隨機文件記錄學(xué)生的信息，如下定義的學(xué)生記錄類型，由學(xué)號、姓名和5門課程成績(百分制)組成，下列的定義正確的是()。A、TypestunoAsIntegernameAsStringscore(1To5)AsSingleEndTypeB、TypestunoAsIntegernameAsString*10score()AsSingleEndTypeC、TypestunoAsIntegernameAsString*10score(1To5)AsSingleEndTypeD、TypestunoAsIntegernameAsStringscore()AsSingleEndType標(biāo)準(zhǔn)答案：C知識點解析：本題考查自定義類型。自定義類型定義的關(guān)鍵字為Type，自定義類型中的成員類型可以為字符串，但只能是定長字符串；也可以是數(shù)組類型，但必須為靜態(tài)數(shù)組。6、執(zhí)行以下程序后，在窗體上輸出的是()。PrivateSubCommand1_Click()Dima(20)Forj=1To20Step2a(j)=jNextjPrinta(1)+a(2)+a(3)EndSubA、4B、5C、6D、7標(biāo)準(zhǔn)答案：A知識點解析：本題考查數(shù)組元素的賦值。利用循環(huán)對數(shù)組a中所有的元素賦值，循環(huán)變量的初值為1，步長為2。因此數(shù)組a中所有的奇數(shù)下標(biāo)項的值為相應(yīng)的下標(biāo)，偶數(shù)下標(biāo)項的值為0。因此a(1)+a(2)+a(3)=1+0+3。7、以下描述中，不是線性表順序存儲結(jié)構(gòu)特征的是()。A、可隨機訪問B、需要連續(xù)的存儲空間C、不便于插入和刪除D、邏輯相鄰的數(shù)據(jù)物理位置上不相鄰標(biāo)準(zhǔn)答案：D知識點解析：線性表的順序存儲是用一片連續(xù)的空間來存放數(shù)據(jù)元素，其特點是邏輯上相鄰的元素在物理位置上也相鄰。數(shù)據(jù)元素之間邏輯上的先后關(guān)系自動隱含住物理位置的相鄰元素之中，因此不需要另外開辟空間來保存元素之間的關(guān)系。8、下列是VisualBasic中所允許的形式數(shù)是()。A、+25．74B、3．457E-100C、368D、1．87E+50標(biāo)準(zhǔn)答案：C知識點解析：本題考查VB中的數(shù)據(jù)表示。VB中的實數(shù)可以分為單精度和雙精度，單精度指數(shù)形式為±n；nE±m(xù)，表示數(shù)據(jù)的最大值為3．402823E38；實際在使用的時候，“±”不能同時出現(xiàn)。9、用LineInput語句從順序文件讀出數(shù)據(jù)時，每次讀出一行數(shù)據(jù)。所謂一行是指遇到()分隔符，即認為一行的結(jié)束。A、文件結(jié)束符B、回車符C、空格D、Tab字符標(biāo)準(zhǔn)答案：B知識點解析：本題考查行結(jié)束標(biāo)志。文件中用EOF測試是否到達末尾；而用“回車符”確定是否結(jié)束一行。10、假定通用對話框的名稱為CD1，命令按鈕的名稱為Command1，則單擊命令按鈕后，能使打開對話框的標(biāo)題為“通用對話框"的事件過程是()。A、PfivateSubCommand1_Click()CD1．DialogTitle="通用對話框"CD1．ShowPrinterEndSubB、PrivateSubCommand1_Click()CD1．DialogTitle="通用對話框"CD1．ShowFontEndSubC、PrivateSubCommand1_Click()CD1．DialogTitle="通用對話框"CD1．ShowOpenEndSubD、PrivateSubCommand1_Click()CD1．DialogTitle="通用對話框"CD1．ShowColorEndSub標(biāo)準(zhǔn)答案：C知識點解析：本題考查通用對話框的常見屬性。通用對話框的標(biāo)題屬性為DialogTitle，如果要打開“打開”對話框可以設(shè)置CD1的Action屬性為1或者使用ShowOpen方法。11、在軟件開發(fā)中，需求分析階段產(chǎn)生的主要文檔是()。A、軟件集成測試計劃B、軟件詳細設(shè)計說明書C、用戶手冊D、軟件需求規(guī)格說明書標(biāo)準(zhǔn)答案：D知識點解析：需求分析階段的工作可以概括為：需求獲取、需求分析、編寫需求規(guī)格說明書、需求評審四個方面。所以選擇D。12、設(shè)一棵滿二叉樹共有15個結(jié)點，則在該滿二叉樹中的葉子結(jié)點數(shù)為()。A、7B、8C、9D、10標(biāo)準(zhǔn)答案：B知識點解析：在具有n個結(jié)點的滿二叉樹，其非葉子結(jié)點數(shù)為int(n／2)，而葉子結(jié)點數(shù)等于總結(jié)點數(shù)減去非葉子結(jié)點數(shù)。n=15，故非葉子結(jié)點數(shù)等于int(15／2)=7，葉子結(jié)點數(shù)等于15-7=8。13、定義無符號整數(shù)類為UInt，下面可以作為類UInt實例化值的是()。A、一369B、369C、0．369D、整數(shù)集合{1，2，3，4，5}標(biāo)準(zhǔn)答案：B知識點解析：只有B選項369可以用無符號整數(shù)來表示和存儲。A選項一369有負號，選項C0．369是小數(shù)，都不能用無符號整數(shù)類存儲。選項D是一個整數(shù)集合，得用數(shù)組來存儲。14、為組合框Combol增加一個列表項”電腦”，下列語句正確的是()。A、Combol．Text=“電腦”B、Combol．Lisflndex=“電腦”C、Combol．Addltem”電腦”D、Combol．I,ListCount=“電腦”標(biāo)準(zhǔn)答案：C知識點解析：考查組合框?？梢酝ㄟ^Addltem方法給組合框添加列表項。15、在標(biāo)準(zhǔn)模塊中用Public關(guān)鍵字定義的變量，其作用域為()。A、本模塊所有過程B、整個工程C、所有窗體D、所有標(biāo)準(zhǔn)模塊標(biāo)準(zhǔn)答案：B知識點解析：在標(biāo)準(zhǔn)模塊中用Public定義的變量是公用的、全局變量，在整個工程中的所有窗口、模塊中都能引用，作用域是整個工程。故B選項正確。16、某系統(tǒng)總體結(jié)構(gòu)圖如下圖所示：該系統(tǒng)總體結(jié)構(gòu)圖的深度是()。A、7B、6C、3D、2標(biāo)準(zhǔn)答案：C知識點解析：根據(jù)總體結(jié)構(gòu)圖可以看出該樹的深度為3，比如：XY系統(tǒng)——功能2——功能2．1，就是最深的度數(shù)的一個表現(xiàn)。17、現(xiàn)有如下一段程序：PrivateSubCommand1_Chck()x=UCase(InputBox("輸入："))SelectCasexCase"A"To”C"Print"考核通過!"Case"D"Print"考核不通過!"CaseElsePrint"輸入數(shù)據(jù)不合法!"EndSelectEndSub執(zhí)行程序，在輸入框中輸入字母“B”，則以下敘述中正確的是()。A、程序運行錯B、在窗體上顯示“考核通過!”C、在窗體上顯示“考核不通過!”D、在窗體上顯示“輸入數(shù)據(jù)不合法!”標(biāo)準(zhǔn)答案：B知識點解析：程序中Ucase函數(shù)將輸入的字母轉(zhuǎn)換為大寫，然后通過Select多分支控制語句選擇輸出不同信息，當(dāng)輸入字母在“A”到“C”之間時，顯示“考核通過!”，輸入的是“D”時顯示“考核不通過!”，如果輸入的是“A”到“D”之外的其他字符則顯示“輸入數(shù)據(jù)不合法!”。程序中輸入字母“B”，因此會顯示“考核通過!”。18、設(shè)窗體上有一個名稱為Text1的文本框，程序運行時，要求該文本框不能接受鍵盤輸入，但能輸出信息，以下屬性設(shè)置正確的是()。A、Text1．Enabled=FlaseB、Text1．Locked=FalseC、Text1．Visible=FlaseD、Text1．Width=0標(biāo)準(zhǔn)答案：A知識點解析：文本框的Enabled屬性設(shè)置為False，表示該文本框控件處于不可用狀態(tài)，即不能向文本框中輸入信息，但是文本框可以輸出內(nèi)容，即A選項正確。本題選擇A選項。19、在窗體上畫一個命令按鈕和一個標(biāo)簽，其名稱分別為Command1和Label1，然后編寫如下事件過程：PrivateSubCommand1_Click()Dimarr(10)Fori＝6To10arr(i)＝i－5NextiLabel1.Caption＝arr(0)＋arr(arr(10)/arr(6))EndSub運行程序，單擊命令按鈕，則在標(biāo)簽中顯示的是()。A、0B、1C、2D、3標(biāo)準(zhǔn)答案：A知識點解析：程序為使用For語句為數(shù)組中部分元素賦值，沒顯示賦值的數(shù)組元素的值默認為0，因此arr(0)＝0，arr(10)＝10－5＝5，arr(6)＝6－5＝1，arr(arr(10)/arr(6))即，arr(5/1)＝arr(5)＝0，arr(0)＋arr(5)＝0＋0＝0。因此標(biāo)簽中顯示為0。20、窗體上有一個名稱為Command1的命令按鈕，有程序如下：OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger’第1個ForFori=1To10a(i)=Int(Rnd*100+100)Printa(i);Nextx=a(i)y=x’第2個ForFori=1To10Ifx<a(i)Thenx=a(i)Ify>a(i)Theny=a(i)s=s+a(i)NextPrintx,y,sEndSub關(guān)于上述程序的敘述中，正確的是A、程序運行出錯，第1個For循環(huán)之后的x=a(i)賦值語句錯B、程序正常運行，x是10個隨機數(shù)中的最大值C、程序正常運行，s是10個隨機數(shù)的和D、程序正常運行，10個隨機數(shù)的范圍是100-200標(biāo)準(zhǔn)答案：A知識點解析：第一個For循環(huán)中缺省Step，步長為1，退出循環(huán)時下標(biāo)為10，第1個For循環(huán)之后的x=a(i)賦值語句下標(biāo)越界，出錯。選A）。21、下面關(guān)于VB應(yīng)用程序的敘述中正確的是A、VB應(yīng)用程序只能解釋運行B、VB應(yīng)用程序只能編譯運行C、VB應(yīng)用程序既能解釋運行，也能編譯運行D、VB應(yīng)用程序必須先編譯，然后解釋運行標(biāo)準(zhǔn)答案：C知識點解析：VB程序有兩種運行方式，即解釋方式與編譯方式。22、設(shè)Label1、Command1、Text1、Check1分別為標(biāo)簽、命令按鈕、文本框、復(fù)選框的名稱，則以下屬性設(shè)置語句中，運行時不會出錯的是A、Label1.BackStyle=2B、Command1.Style=1C、Text1.ScrollBars=4D、Check1.Value=2標(biāo)準(zhǔn)答案：D知識點解析：標(biāo)簽的BackStyle屬性只有0、1兩個屬性值；命令按鈕的Style屬性是只讀屬性，必須在屬性窗口設(shè)置；文本框的ScrollBars屬性只有0、1、2、3四個屬性值，并且必須在屬性窗口設(shè)置。23、對長度為10的線性表進行冒泡排序，最壞情況下需要比較的次數(shù)為A、9B、10C、45D、90標(biāo)準(zhǔn)答案：C知識點解析：冒泡法是在掃描過程中逐次比較相鄰兩個元素的大小，最壞的情況是每次比較都要將相鄰的兩個元素互換，需要互換的次數(shù)為9+8+7+6+5+4+3+2+1=45，選C。24、命令按鈕不支持的事件為A、ClickB、DblClickC、GotFocusD、MouseMove標(biāo)準(zhǔn)答案：B知識點解析：命令按鈕支持的事件有Click，GotFocus和MouseMove，不支持DblClick事件，故選B）。25、以下能正確定義數(shù)據(jù)類型TelBook的代碼是A、TypeTelBookNameAsString*10TelNumAsIntegerEndTypeB、TypeTelBookNameAsString*10TelNumAsIntegerEndTelBookC、TypeTelBookNameString*10TelNumIntegerEndTypeTelBookD、TypedefTelBookNameString*10TelNumIntegerEndType標(biāo)準(zhǔn)答案：A知識點解析：用戶定義數(shù)據(jù)類型可以用Type語句來定義。格式是：Type數(shù)據(jù)類型名數(shù)據(jù)類型元素名AS類型名數(shù)據(jù)類型元素名AS類型名....EndType。選項中符合上面格式的，只有A項，其余項都錯誤。26、某二叉樹共有13個結(jié)點，其中有4個度為1的結(jié)點，則葉子結(jié)點數(shù)為A、5B、4C、3D、2標(biāo)準(zhǔn)答案：A知識點解析：在樹結(jié)構(gòu)中，一個節(jié)點所擁有的后件個數(shù)稱為該節(jié)點的度。對任何一棵二叉樹，度為0的節(jié)點（即葉子節(jié)點）總是比度為2的節(jié)點多一個。二叉樹中有13個節(jié)點，設(shè)葉子節(jié)點個數(shù)為n0，度為1的節(jié)點個數(shù)為4，設(shè)度為2的節(jié)點個數(shù)為n2。13=n0+4+n2且n0=n2+1，則n0=5，n2=4。A選項正確。27、為了改變文本框中所顯示文本的顏色，需設(shè)置的屬性為A、FontColorB、BackColorC、ForeColorD、FillColor標(biāo)準(zhǔn)答案：C知識點解析：ForeColor屬性用來改變文本框中文本顏色，故選擇C。28、以下不能作為容器使用的控件是A、圖像框B、框架C、圖片框D、窗體標(biāo)準(zhǔn)答案：A知識點解析：容器是包含其它對象的對象。圖像框控件主要作用顯示圖片，不能放其他控件，故A不能做容器?？蚣苁且粋€容器控件,用于將屏幕上的對象分組，不同的對象可以放在一個框架中；圖片框是一個完整的圖形控件，可以作為其他對象的容器。選項B、C和D都可以作為容器使用。故選A。29、要使圖片框P1中顯示當(dāng)前路徑下的圖片文件img1.jpg，則應(yīng)使用的語句是A、P1.Picture="img1.jpg"B、P1.Image="img1.jpg"C、P1.Picture=LoadPicture("img1.jpg")D、LoadPicture("img1.jpg")標(biāo)準(zhǔn)答案：C知識點解析：在程序代碼中可以使用LoadPicture函數(shù)把圖形文件裝入圖片框或圖像框中。[格式][對象.]Picture=LoadPicture("文件名")；可知選項A，B，D均錯誤。本題正確答案為C選項。30、下列敘述中正確的是A、不同的對象可以具有相同名稱的方法B、’abcd’是一個合法的字符串常量C、語句Dima(1To6,-2To4)AsInteger定義數(shù)組時出錯D、向隨機文件中寫數(shù)據(jù)時，既可用Write#語句也可用Put#語句標(biāo)準(zhǔn)答案：A知識點解析：字符串常量由字符組成，可以是雙引號和回車符以外的任何ASCII字符，選項B中應(yīng)該用一對雙引號括起來。選項C所定義的數(shù)組正確，Write#語句的功能是向順序文件寫入記錄，Put#語句的功能是把"變量"的內(nèi)容寫入由"文件"號所指定的磁盤文件中，故本題正確選項為A。31、下面控件中，沒有Caption屬性的是()。A、復(fù)選框B、單選按鈕C、組合框D、框架標(biāo)準(zhǔn)答案：C知識點解析：Caption屬性是設(shè)置或返回控件的標(biāo)題。組合框沒有Caption屬性。故選C。32、在長度為n的有序線性表中進行二分查找，最壞情況下需要比較的次數(shù)是()。A、O(n)B、O(n2)C、O(log2n)D、O(nlog2n)標(biāo)準(zhǔn)答案：C知識點解析：當(dāng)有序線性表為順序存儲時才能用二分法查找?？梢宰C明的是對于長度為n的有序線性表，在最壞情況下，二分法查找只需要比較log2n次，而順序查找需要比較n次。33、設(shè)a＝2，b＝3，c＝4，d＝5，表達式Nota<＝cOr4*c＝b^2Andb<>a＋c的值是()。A、－1B、1C、TrueD、False標(biāo)準(zhǔn)答案：D知識點解析：計算表達式的值，先計算算術(shù)運算符，再計算關(guān)系運算符，然后計算邏輯運算符(優(yōu)先級從高到低為NotAndOr)，最后結(jié)果為Fasle。故D選項正確。34、算法的有窮性是指()。A、算法程序的運行時間是有限的B、算法程序所處理的數(shù)據(jù)量是有限的C、算法程序的長度是有限的D、算法只能被有限的用戶使用標(biāo)準(zhǔn)答案：A知識點解析：算法原則上能夠精確地運行，而且人們用筆和紙做有限次運算后即可完成。有窮性是指算法程序的運行時間是有限的。35、窗體上有兩個名稱分別為Text1、Text2的文本框。Text1的KeyUp事件過程如下：PrivateSubText1_KeyUp(KeyCodeAsInteger，ShiftAsInteger)DimcAsStringc＝UCase(Chr(KeyCode))Text2.Text＝Chr(Asc(c)＋2)EndSub當(dāng)向文本框Text1中輸入小寫字母a時，文本框Text2中顯示的是()。A、AB、aC、CD、c標(biāo)準(zhǔn)答案：C知識點解析：KeyDown和KeyUp事件的KeyCode參數(shù)返回的是"鍵"，即按字母"A"和"a"時得到的KeyCode的值是相同的，都是&H41。因此程序中對輸入"a"時得到的KeyCode，經(jīng)Chr函數(shù)轉(zhuǎn)為字符后為"A"，經(jīng)Ucase函數(shù)轉(zhuǎn)換仍為"A"，所以變量c中的字符為"A"。Asc(c)將返回變量c中的第一個字符的ASCII，加2后，再由Chr函數(shù)轉(zhuǎn)為字符即為"A"后面的第2個字符，即"C"。所以答案應(yīng)為選項C。36、下列排序方法中，最壞情況下比較次數(shù)最少的是()。A、冒泡排序B、簡單選擇排序C、直接插入排序D、堆排序標(biāo)準(zhǔn)答案：D知識點解析：冒泡排序與簡單插入排序與簡單選擇排序法在最壞情況下均需要比較n(n－1)/2次，而堆排序在最壞情況下需要比較的次數(shù)是nlog2n。37、窗體上有Command1、Command2兩個命令按鈕?，F(xiàn)編寫以下程序：OptionBase0Dima()AsInteger，mAsIntegerPrivateSubCommand1_Click()m＝InputBox("請輸入一個正整數(shù)")ReDima(m)EndSubPrivateSubCommand2_Click()m＝InputBox("請輸入一個正整數(shù)")ReDima(m)EndSub運行程序時，單擊Command1后輸入整數(shù)10，再單擊Command2后輸入整數(shù)5，則數(shù)組a中元素的個數(shù)是()。A、5B、6C、10D、11標(biāo)準(zhǔn)答案：B知識點解析：程序中OptionBase0表示指定數(shù)組的下標(biāo)默認下界為0。ReDim語句用來重新定義動態(tài)數(shù)組，按定義的上下界重新分配存儲單元。在一個程序中，可以多次用ReDim語句定義同一個數(shù)組，隨時修改數(shù)組中元素的個數(shù)。程序中先執(zhí)行ReDima(10)，然后執(zhí)行了ReDima(5)，因此數(shù)組a的下界為0，上界為5，共有6個元素。38、設(shè)：a＝12，b＝5，c＝7，表達式x＝(a\c＋aModb)＋Int(13/5)的值是()。A、5B、6C、7D、9標(biāo)準(zhǔn)答案：A知識點解析：按算術(shù)運算符優(yōu)先級從高到低順序依次計算：/、\、Mod，結(jié)果為5，故選A。39、在窗體上畫一個文本框(名稱為Text1)和一個標(biāo)簽(名稱為Label1)，程序運行后，在文本框中每輸入一個字符，都會立即在標(biāo)簽中顯示文本框中字符的個數(shù)。以下可以實現(xiàn)上述操作的事件過程是()。A、PrivateSubText1_Change()Label1．Caption=Str(Len(Text1．Text))EndSubB、PrivateSubText1_Click()Label1．Caption=Str(Len(Text1．Text))EndSubC、PrivateSubText1_Change()Labell．Caption=Textl．TextEndSubD、PrivateSubLabel1_Change()Label1．Caption=Str(Len(Text1．Text))EndSub標(biāo)準(zhǔn)答案：A知識點解析：根據(jù)題意可知，在文本框中輸入字符這個動作使標(biāo)簽上顯示的內(nèi)容發(fā)生變化，說明是文本框觸發(fā)了某事件，排除D選項；文本框中每輸入一個字符，標(biāo)簽中立即就會發(fā)生變化，故是Change事件，排除B選項；標(biāo)簽中顯示的是文本框中字符的個數(shù)，不是輸入的內(nèi)容，排除C選項。故A選項正確。40、軟件生存周期中，解決軟件“怎么做”的階段是()。A、軟件設(shè)計B、需求分析C、軟件測試D、可行性研究標(biāo)準(zhǔn)答案：A知識點解析：軟件設(shè)計是軟件工程的重要階段，是一個把軟件需求轉(zhuǎn)換為軟件表示的過程。軟件設(shè)計的基本目標(biāo)是用比較抽象概括的方式確定目標(biāo)系統(tǒng)如何完成預(yù)定的任務(wù)，即解決軟件“怎么做”的問題。故本題答案為A選項。二、基本操作題(本題共2題，每題1.0分，共2分。)請根據(jù)以下各小題的要求設(shè)計VisualBasic應(yīng)用程序(包括界面和代碼)。41、在名稱為Form1的窗體上畫一個名稱為CD1的通用對話框，通過屬性窗口設(shè)置CD1的初始路徑為C：＼，默認的文件名為None，標(biāo)題為“保存等級考試”，如圖2所示。注意：存盤時必須存放在考生文件夾下，工程文件名為sjt1．vbp，窗體文件名為sjt1．frm。標(biāo)準(zhǔn)答案：[操作步驟]步驟1：新建一個“標(biāo)準(zhǔn)。EXE”工程，選擇[工程]→[部件]命令，在彈出的“部件”對話框的列表中選中“MicroSoftCommonDiMogControl6．0”項目，單擊“確定”按鈕。步驟2：在窗體Form1上畫一個通用對話框，其相關(guān)屬性設(shè)置如表12—7所示。步驟3：編寫Form1的Iroad事件，加入下面的代碼：CD1．ShowSave步驟4：按要求將文件保存至考生文件夾中。知識點解析：通用對話框的InitDir屬性用于為打開或另存為對話指定初始的目錄，如果此屬性沒有指定，則使用當(dāng)前目錄。通用對話框的初始路徑由InitDir屬性設(shè)置，默認文件名由FileName屬性設(shè)置，標(biāo)題由DialogTitle屬性設(shè)置。42、在名稱為Form1的窗體上設(shè)計一個菜單。要求在窗體上添加名為menu0，標(biāo)題為“菜單命令”的主菜單，再添加兩個名稱分別為“menu1”、“menu2”，標(biāo)題分別為“不可用菜單項”、“上一菜單項可用”的子菜單，并且使程序運行時，menu1子菜單不可用，menu2子菜單已經(jīng)選中(運行時的效果如圖3所示)。再編寫適當(dāng)?shù)氖录^程，使得程序運行時，單擊“上一菜單項可用”，則“不可用菜單項”變?yōu)楹谏?可用)。要求程序中不得使用變量，且只有一條語句。注意：存盤時必須存放在考生文件夾下，工程文件名為sit2．vbp，窗體文件名為sit2．Frm。標(biāo)準(zhǔn)答案：[操作步驟]步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，打開VB菜單設(shè)計器設(shè)計菜單，各菜單項及屬性設(shè)置如表12—8所示。步驟2：打開代碼編輯窗口，編寫“上一菜單項可用”命令的Click事件過程。參考代碼：PrivateSubmenu2_Click()menu1．Enabled=TrueEndSub步驟3：按要求將文件保存至考生文件夾中。知識點解析：①VB中的菜單是通過菜單編輯器來設(shè)計的。菜單編輯器中的基本設(shè)置項有：“標(biāo)題”項，對應(yīng)出現(xiàn)在菜單中的顯示內(nèi)容；“名稱”項，系統(tǒng)識別菜單項的唯一關(guān)鍵字(不能重復(fù))；“索引”項，用于設(shè)置菜單數(shù)組中各元素的索引號；“快捷鍵”項，是一個下拉列表框，用于設(shè)置菜單項的快捷鍵；“幫助上下文”項，設(shè)置當(dāng)鼠標(biāo)移動到某菜單項上按＜Fl＞鍵時顯示的幫助信息在幫助文件中的對應(yīng)位置；Visible(可見)項，用于設(shè)置控件或菜單項在程序運行時是否可見，值為True表示可見，值為False表示不可見；Enabled(有效)項，用于設(shè)置控件或菜單項在程序運行時是否有效，值為True時表示有效，值為False時表示無效(顯示為灰色)。通過編輯按鈕區(qū)的七個按鈕可對菜單進行添加、插入、刪除、提升(設(shè)置為上一級菜單)、縮進(設(shè)置為下一級菜單)、上移、下移等操作。②文本框的Text屬性用于設(shè)置或返回其顯示的文本內(nèi)容。本題原程序設(shè)計思路：在“上一菜單項可用”命令的單擊事件過程中，通過語句設(shè)置“不可用菜單項”命令的Enabled屬性值為True。三、簡單應(yīng)用題(本題共1題，每題1.0分，共1分。)43、(1)在考生文件夾下有一個工程文件sjt3．vbp，相應(yīng)的窗體文件為sjt3．frm。在窗體上有一個命令按鈕，其名稱為Command1，標(biāo)題為“添加”；有一個文本框，名稱為Textl，初始內(nèi)容為空白；有一個列表框，名稱為List1。程序運行后，在文本框中輸入一個英文句子(由多個單詞組成，各單詞之間用一個空格分開)，然后單擊“添加”按鈕，程序?qū)言撚⑽木渥臃纸鉃閱卧~，并把每個單詞作為一個項目添加到列表框中，如圖3—195所示。該程序不完整，請補充完整。要求：去掉程序中的注釋符，把程序中的?改為正確的內(nèi)容，使其能正確運行，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。(2)在考生文件夾下有一個工程文件sit4．vbp，其中的窗體中有一個組合框和一個命令按鈕(如圖3一196所示)。程序的功能是在運行時，如果在組合框中輸入一個項目并單擊“添加”按鈕，則搜索組合框中的項目，如果沒有此項，則把此項添加到列表中；如果有此項，則彈出提示“已有此項”，然后清除輸入的內(nèi)容。要求：去掉程序中的注釋符，把程序中的?改為正確的內(nèi)容，使其實現(xiàn)上述功能，但不能修改程序中的其他部分，也不能修改控件的屬性。最后把修改后的文件以原來的文件名存盤。標(biāo)準(zhǔn)答案：第1小題【操作步驟】步驟1：打開考生文件夾下的工程文件sjt3．vbp。步驟2：打開代碼編輯窗口，去掉程序中的注釋符“’”，將問號“?”改為正確的內(nèi)容。參考代碼：S1=Textl．TextDoWhileMid(S1，11，1)<>””And11<=Len(S1)LiStl．AddItemS2S2=“”步驟3：按要求將文件保存至考生文件夾中。第2小題【操作步驟】步驟1：打開考生文件下的本題工程文件sit4．vbp。步驟2：打開代碼編輯窗口，去掉程序中的注釋符“’”，將問號“?”改為正確的內(nèi)容。參考代碼：Fori=0ToCbl．LiStCount一1IfCbl．List(i)=Cbl．TextThenCbl．AddItemCbl．Text知識點解析：暫無解析四、綜合應(yīng)用題(本題共1題，每題1.0分，共1分。)44、在考生文件夾下有一個工程文件sjt5．vbp，其窗體上有兩個標(biāo)題分別為“讀數(shù)據(jù)”和“統(tǒng)計”的命令按鈕。請?zhí)砑觾蓚€標(biāo)簽，其名稱分別是Labell和Label2，標(biāo)題分別為“單詞的平均長度為”和“最長單詞的長度為”；再添加兩個名稱分別為Textl和Text2，Text屬性為空的文本框，如圖所示。程序功能如下：①如果單擊“讀數(shù)據(jù)”命令按鈕，則將考生文件夾下in5．dat文件的內(nèi)容讀到變量s中(此過程已給出)；②如果單擊“統(tǒng)計”按鈕，則自動統(tǒng)汁變量s(s中僅含有字母和空格，而空格是用來分隔不同單詞的)中每個單詞的長度，并將所有單詞的平均長度(四舍五入取整)在Textl文本框內(nèi)顯示，將最長單詞的長度在Text2文本框內(nèi)顯示。“讀數(shù)據(jù)”命令按鈕的click事件過程已經(jīng)給出，請為“統(tǒng)計”命令按鈕編寫適當(dāng)?shù)氖录^程，實現(xiàn)上述功能。注意：考生不得修改窗體文件中已經(jīng)存在的控件和程序，在結(jié)束程序之前，必須進行統(tǒng)計，且必須通過單擊窗體右上角的“關(guān)閉”按鈕結(jié)束程序，否則無成績。最后，程序按原文件名存盤。標(biāo)準(zhǔn)答案：單擊“讀數(shù)據(jù)”按鈕，將考生文件夾下in5．dat文件的內(nèi)容讀到變量s中；單擊“統(tǒng)計”按鈕，通過SelectCase語句判斷是否為空格或是字母(文件中僅含有字母和空格，空格用來分隔不同單詞)，通過Len函數(shù)得出最長單詞的長度，并通過比較把最長單詞賦值給變量B，將該單詞的長度顯示在Textl文本框內(nèi)，并將該單詞的平均長度顯示在Text2文本框內(nèi)。Left(s，i)表示取字符串S左邊的i個字符。Right(s，J-i)表示字符串s右邊的J-i個字符。R=Split(S，“-”)表示將字符串s按“-”分割成字符數(shù)組。步驟1：打開本題工程文件，添加兩個名稱分別是Labell和Label2，標(biāo)題分別為“單詞的平均長度為”和“最長單詞的長度為”的標(biāo)，以及標(biāo)題分別為Textl和Text2，初始內(nèi)容都為空的文本框。步驟2：分析并編寫程序代碼。程序提代碼OptionBase1DimsAsStringPrivateSubCommandl＿Click()OpenApp．Path＆”＼in5．dat“ForInputAs#ls=Input(LOF(1)，＃1)Close#lEndSubPrivateSubCommand2＿Click()“需考生編寫”EndSubPrivateSubForm＿Unload(CancelAsInteger)OpenApp．Path＆“＼out5．dat”ForOutputAs#1Print#1．Textl．Text．Text2．TextClose#1EndSub程序結(jié)束PrivateSubCommand2＿Click()Fori=1ToLen(s)J=Asc(Mid(S，i，1))SelectCaseJCase48To57，65To90，97To122CaseElseMid(s，i，1)=“-”EndSelectNextiJ=Len(s)-1Fori=1ToJIfMid(S，i，1)=”-”AndMid(s，i+1，1)=“-”ThenS=Left(S，i)+Right(s，J-i)J=J=1i=i-lEndIfNextiS=Left(s，Len(S)-1)R=Split(s，“-”)B=R(0)Fori＝1ToUBound(R)IfLen(B知識點解析：暫無解析國家二級（VB）機試模擬試卷第2套一、選擇題(本題共40題，每題1.0分，共40分。)1、有三個關(guān)系R、S和T如下：則由關(guān)系R、S得到關(guān)系T的操作是()。A、交B、投影C、自然連接D、并標(biāo)準(zhǔn)答案：C知識點解析：交：R∩s結(jié)果是既屬于R又屬于S的記錄組成的集合。并：R∩S是將S中的記錄追加到R后面。上述兩種操作中，關(guān)系R與S要求有相同的結(jié)構(gòu)，故A、D選項錯誤。投影是指從關(guān)系模式中指定若干個屬性組成新的關(guān)系，由于T中含有R中不存在的屬性，明顯不可能由R向S投影得到T，故B選項錯誤。自然連接：去掉重復(fù)屬性的等值連接。R與S重復(fù)屬性是A，等值元組為a和c，進行自然連接得到的兩個元組按照屬性，ABCD的順序為c3f4與a1n5，正好為題目中關(guān)系T，故C選項正確。2、下列程序段不正確的是()。A、DimaAsIntegera=array(1，2，3，4)B、Dima()，b()a=array(1，2，3，)：b=aC、DimaAsVarianta=array(1，"asd"，true)D、Dima()AsVarianta=array(1，2，3，4)標(biāo)準(zhǔn)答案：A知識點解析：本題考查Array函數(shù)。利用Array對數(shù)組各元素賦值，聲明的數(shù)組必須是可變數(shù)組，并且其類型只能是Variant。也可以對數(shù)組進行賦值，但是賦值號左邊的數(shù)組只能聲明為Variant的可變數(shù)組或簡單變量，同時數(shù)組必須有存儲空間。3、設(shè)有如圖所示窗體和以下程序：PrivateSubCommand1_Click()Text1.Text＝"VisualBasic"EndSubPrivateSubText1_LostFocus()IfText1.Text<>"BASIC"ThenText1.Text＝""Text1.SetFocusEndIfEndSub程序運行時，在Text1文本框中輸入"Basic"(如圖所示)，然后單擊Command1按鈕，則產(chǎn)生的結(jié)果是()。A、文本框中無內(nèi)容，焦點在文本框中B、文本框中為"Basic"，焦點在文本框中C、文本框中為"Basic"，焦點在按鈕上D、文本框中為"VisualBasic"，焦點在按鈕上標(biāo)準(zhǔn)答案：A知識點解析：題目程序的功能為，當(dāng)單擊命令按鈕時，Text1失去焦點，激發(fā)Text1的LostFocus事件，在此事件中，程序判斷文本框中字符串是否為"BASIC"，如果是則退出事件過程，繼續(xù)執(zhí)行命令按鈕的單擊事件過程，文本框中顯示"VisualBasic"，如果不是則文本框內(nèi)容置空，焦點返回到文本框中等待輸入，不會執(zhí)行命令按鈕的單擊事件過程。題目中輸入了"Basic"，與"BASIC"不符，因此文本框置空，焦點回到文本框中。4、有兩個關(guān)系R，S如下：由關(guān)系R通過運算得到關(guān)系S，則所使用的運算為()。A、選擇B、投影C、插入D、連接標(biāo)準(zhǔn)答案：B知識點解析：投影運算是指對于關(guān)系內(nèi)的域指定可引入新的運算。本題中S是在原有關(guān)系R的內(nèi)部進行的，是由R中原有的那些域的列所組成的關(guān)系。所以選擇B。5、某人編寫了向隨機文件中寫一條記錄的程序，代碼如下：TypeRTypeNameAsString*10TelAsString*20EndTypePrivateSubCommand1_Click()DimPAsRType[．Name=InputBox("姓名")p．Tel=InputBox("電話號")Open"Books．dat"ForRandomAs#1Put#1，，pClose#1EndSub該程序運行時有錯誤，修改的方法是()。A、在類型定義“TypeRType”之前加上“Private”B、DimpAsRType必須置于窗體模塊的聲明部分C、應(yīng)把Open語句中的ForRandom改為ForOutputD、Put語句應(yīng)該寫為Put#1，p．Name，p．Tel標(biāo)準(zhǔn)答案：A知識點解析：記錄類型的定義必須放在模塊的聲明部分，當(dāng)在標(biāo)準(zhǔn)模塊中定義時，關(guān)鍵字Type前可以有Public(默認)或Private，而如果在窗體模塊中定義，則必須在前面加上關(guān)鍵字蹦vate。Open語句中使用ForRandom表示文件以隨機方式存取。Put語句的語法為：Put#文件號，[記錄號]，變量。其中“變量”是除對象變量和數(shù)組變量外的任何變量。6、在窗體上畫一個命令按鈕，然后編寫如下事件過程：PrivateSubCommand1—Click()x=0doUntilx=-1a=InputBox(“請輸入a的值”)a=Val(A)b=InputBox(“請輸入b的值”)b=Val(B)x=InputBox(“請輸入x的值”)x=Val(x)a=a+b+xLoopPrintaEndSub程序運行后，單擊命令按鈕，依次在輸入對話框中輸入5、4、3、2、1、-1則輸出結(jié)果是()。A、2B、3C、14D、15標(biāo)準(zhǔn)答案：A知識點解析：本題輸出變量a的值，在每次循環(huán)時。都對變量a、b、x進行了賦初值，因此只要考慮最后一次循環(huán)即可。也就是當(dāng)輸入a=2，b=1，x=-1時的表達式“a=a+b+x”的值，也就是最后a的值為2，所以選項A)正確。7、設(shè)a是整型變量，與函數(shù)IIf(a>0，-a，a)有相同結(jié)果的代數(shù)式是()。A、｜a｜B、-｜a｜C、aD、=-a標(biāo)準(zhǔn)答案：B知識點解析：IIf函數(shù)可以用來執(zhí)行簡單的條件判斷操作，它是“If…Then…Else”結(jié)構(gòu)的簡寫版本，其格式為：result=IIf(條件，True部分，F(xiàn)alse部分)。其中“result”是函數(shù)的返回值，“條件”是一個邏輯表達式。當(dāng)“條件”為真時，IIf函數(shù)返回“True部分”，否則返回“False部分”?！癟rue部分”或“False部分”可以是表達式、變量或其他函數(shù)。本題中IIf函數(shù)的作用是如果a>0則返回．a(chǎn)，否則返回a，等價于-｜a｜。8、對于循環(huán)隊列，下列敘述中正確的是()。A、隊頭指針是固定不變的B、隊頭指針一定大于隊尾指針C、隊頭指針一定小于隊尾指針D、隊頭指針可以大于隊尾指針，也可以小于隊尾指針標(biāo)準(zhǔn)答案：D知識點解析：循環(huán)隊列的隊頭指針與隊尾指針都不是固定的，隨著人隊與出隊操作要進行變化。因為是循環(huán)利用的隊列結(jié)構(gòu)所以隊頭指針有時可能大于隊尾指針有時也可能小于隊尾指針。9、設(shè)窗體的名稱為Form1，標(biāo)題為Win，則窗體的MouseDown事件過程的過程名是()。A、Form1_MouseDownB、Win_MouseDownC、Form_MouseDownD、MouseDown_Form1標(biāo)準(zhǔn)答案：C知識點解析：事件過程名格式是：控件名_事件過程名。Form1是窗體控件的名稱，Win是窗體的標(biāo)題，所以窗體的MouseDown事件過程名是：Form1_MouseDown，故選A。10、在窗體上畫一個命令按鈕，然后編寫如下代碼：PrivateSubCommand1_Click()DimMaxSize，NextChar，MyCharOpen"d：＼temp＼female．txt"ForInputAs#1MaxSize=LOF(1)ForNextChar=MaxSizeTo1Step-1Seek#1．NextCharMyChar=Input(1，#1)NextNextCharPrintEOF(1)Close#1EndSub程序運行后，單擊命令按鈕，其輸出結(jié)果為()。A、TrueB、FalseC、0D、Null標(biāo)準(zhǔn)答案：B知識點解析：本題考查文件的操作。以讀的方式打開文件female．txt，Nextchar表示從文件的最后一個字符開始。程序首先定位到該字符，然后取出一個字符，存放到字符串Mychar中。輸出的EOF(1)表示文件指針是否到達文件1的末尾。返回值有True(移動到末尾)和False(沒有到末尾)。既然是從后往前讀出每個字符，因此操作結(jié)束以后，文件指針不可能移動到文件的末尾，所以EOF(1)的值必然為False。11、在窗體上畫1個命令按鈕，名稱為Command1，然后編寫如下程序：DimFlagAsBooleanPrivateSubCommand1Click()DimintNumAsIntegerintNum＝InputBox("請輸入：")IfFlagThenPrintf(intNum)EndIfEndSubFunctionf(XasInteger)AsIntegerIfX＜10ThenY＝XElseY＝X＋10EndIff＝Y(jié)EndFunctionPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XasSingle，YAsSingle)Flag＝TrueEndSub運行程序，首先單擊窗體，然后單擊命令按鈕，在輸入對話框中輸入5，則程序的輸出結(jié)果為()。A、0B、5C、15D、無任何輸出標(biāo)準(zhǔn)答案：B知識點解析：本題考查If語句和函數(shù)過程的分析。函數(shù)過程f的功能是如果X小于10則返回X，否則返回X＋10。窗體的MouseUp事件是松開鼠標(biāo)時觸發(fā)的事件。程序運行后，單擊窗體，則全局變量Flag的值為True，然后單擊命令按鈕，在輸入對話框中輸入5，執(zhí)行If分支語句，調(diào)用f函數(shù)，由于5＜10，因此輸出X，即輸出5。12、一棵二叉樹共有25個結(jié)點，其中5個是葉子結(jié)點，則度為1的結(jié)點數(shù)為()。A、16B、10C、6D、4標(biāo)準(zhǔn)答案：A知識點解析：根據(jù)二叉樹的性質(zhì)3：在任意一棵二叉樹中，度為0的葉子結(jié)點總是比度為2的結(jié)點多一個，所以本題中度為2的結(jié)點是5－1＝4個，所以度為1的結(jié)點的個數(shù)是25－5－4＝16個。13、在名稱為Framel的框架中，有兩個名稱分別為opl、op2的單選按鈕，標(biāo)題分別為“單程”、“往返”，如圖所示。以下敘述中，正確的是()。A、若僅把Framel的Enabled屬性設(shè)為False，則op1、op2仍可用B、對于上圖，op1．Value的值為TrueC、對于上圖，執(zhí)行Op1．Value=False命令，則“往返”單選按鈕被選中D、對于上圖，執(zhí)行Op1．Value=O命令，程序出錯標(biāo)準(zhǔn)答案：B知識點解析：當(dāng)Framel的Enabled屬性設(shè)為False后，框架Framel變?yōu)椴豢捎茫锩娣诺膬蓚€單選按鈕也就變?yōu)椴豢捎?，故A選項錯誤；當(dāng)Opl．Value為False時，“單程”和“往返”單選按鈕都處于未選中狀態(tài)，故C選項錯誤；Opl．Value的值為0，即為False，語句正確，沒有程序錯誤，故D選項說法錯誤；根據(jù)圖可只，“單程”單選按鈕處于選中狀態(tài)，Opl．Value的值為True，故B選項正確。14、某二叉樹共有7個結(jié)點，其中葉子結(jié)點只有1個，則該二叉樹的深度為(假設(shè)根結(jié)點在第1層)()。A、3B、4C、6D、7標(biāo)準(zhǔn)答案：D知識點解析：根據(jù)二叉樹的基本性質(zhì)3：在任意一棵二叉樹中，度為0的葉子節(jié)點總比度為2的節(jié)點多一個，所以本題中度為2的節(jié)點為1－1＝0個，所以可以知道本題目中的二叉樹的每一個節(jié)點都有一個分支，所以共7個節(jié)點共7層，即深度為7。15、能夠產(chǎn)生1到50之間(含1和50)隨機整數(shù)的表達式是()。A、Int(Rnd*51)B、Int(Rnd(50)＋1)C、Int(Rnd*50)D、Int(Rnd*50＋1)標(biāo)準(zhǔn)答案：D知識點解析：Rnd函數(shù)產(chǎn)生0～1之間的隨機數(shù)，不包括0和1。要產(chǎn)生1～50(包含1和50)之間的隨機整數(shù)，可以先產(chǎn)生0～50之間的隨機整數(shù)，然后再這個基礎(chǔ)上加1。故D選項正確。16、某系統(tǒng)結(jié)構(gòu)圖如下圖所示(n≥5)該系統(tǒng)結(jié)構(gòu)圖的最大扇出數(shù)是()。A、nB、3C、2D、n+1標(biāo)準(zhǔn)答案：A知識點解析：模塊的扇出是指本模塊的直屬下層模塊的個數(shù)，或者說是由一個模塊直接調(diào)用的其他模塊數(shù)。題干中某系統(tǒng)為一個模塊，其扇出數(shù)目為n(n≥5)，功能2模塊扇出數(shù)為3，功能n模塊扇出數(shù)為2，則該系統(tǒng)結(jié)構(gòu)圖的最大扇出數(shù)是n。故本題答案為A選項。17、在窗體上畫一個命令按鈕，然后編寫如下事件過程：PrivateSubCommandl＿Click()a$=InputBox(“請輸入一個二進制數(shù)”)n=Len(a$)Fori=1TonDec=Dec*2+(a$，i，1)NextIPrintDeeEndSub程序的功能為：單擊命令按鈕，將產(chǎn)生一個輸入對話框，此時如果在對話框中輸入一個二進制數(shù)，并單擊“確定”按鈕，則把該二進制數(shù)轉(zhuǎn)換為等值的十進制數(shù)。這個程序不完整，應(yīng)在“________”處填入的內(nèi)容是()。A、LeftB、RightC、ValD、Mid標(biāo)準(zhǔn)答案：D知識點解析：將二進制數(shù)轉(zhuǎn)換為十進制數(shù)需要將二進制數(shù)的每一位取出來進行運算，從一個數(shù)值字符串中截取一位數(shù)字字符要使用Mid函數(shù)，因此在程序空缺處該填入Mid。18、以下不屬于VB控件的是A、框架B、點C、直線D、形狀標(biāo)準(zhǔn)答案：B知識點解析：形狀控件(Shape)提供了顯示一些規(guī)則圖形的簡易方法，通過設(shè)置形狀控件Shape屬性值，可顯示6種圖形：0－矩形、1－正方形、2－橢圓、3－圓、4－圓角矩形、5－圓角正方形。19、以下聲明數(shù)組和給數(shù)組賦值的語句中，正確的是()。A、DimxAsVariantx=Array(1，2，3，4，5，6)B、Dimx(6)AsStringx=“ABCDEF”C、Dimx(6)．AsIntegerx=Array(1，2，3，4，5，6)D、Dimx(2)，y(2)AsIntegerx(0)=1：x(1)=2：x(2)=3y=x標(biāo)準(zhǔn)答案：A知識點解析：A選項為定義一個默認數(shù)組，數(shù)組名為x，然后通過Array函數(shù)對數(shù)組進行初始化，A選項正確；B選項定義一個一維字符串類型的數(shù)組，且將字符串賦值給數(shù)組名，這種賦值方式不正確；c選項中，定義了一個一維整型數(shù)組，然后試圖使用Array函數(shù)為一維數(shù)組賦值，但是這種賦值方式只適用于變體類型的數(shù)組，即定義數(shù)組的方式為：“DimxAsVariant”，故c選項錯誤；D選項中將數(shù)組x通過賦值語句賦值給數(shù)組y，這種賦值方式是錯誤的，故本題只有A選項是正確聲明和對數(shù)組元素進行賦值。本題選擇A選項。20、下列敘述中正確的是A、程序執(zhí)行的效率與數(shù)據(jù)的存儲結(jié)構(gòu)密切相關(guān)B、程序執(zhí)行的效率只取決于程序的控制結(jié)構(gòu)C、程序執(zhí)行的效率只取決于所處理的數(shù)據(jù)量D、以上說法均錯誤標(biāo)準(zhǔn)答案：A知識點解析：程序執(zhí)行的效率與數(shù)據(jù)的存儲結(jié)構(gòu)、數(shù)據(jù)的邏輯結(jié)構(gòu)、程序的控制結(jié)構(gòu)、所處理的數(shù)據(jù)量等有關(guān)。21、編寫如下程序：PrivateSubCommand1_Click()DimscoreAsIntegerscore=86Ifscore＞85Thenr=1ElseIfscore＞60，Thenr=2Elser=0EndTfPrintrEndSub程序運行后，單擊命令按鈕Command1，輸出結(jié)果為()。A、0B、1C、2D、86標(biāo)準(zhǔn)答案：B知識點解析：考查If…ElseIf…Else…EndIf語句。條件判斷成立則執(zhí)行對應(yīng)分支的語句。86＞85，所以r=1。選B。22、在窗體上畫一個文本框，其名稱為Text1，然后編寫如下程序：OptionBase1PrivateSubForm_Click()DimArr(10)AsIntegerFori=6To10Arr(i)=i-3NextiText1.Text=Str(Arr(6)+Arr(Arr(6)+Arr(10)))EndSub程序運行后，單擊窗體，在文本框中顯示的內(nèi)容是A、7B、8C、9D、10標(biāo)準(zhǔn)答案：D知識點解析：For循環(huán)對數(shù)組Arr的第6個到第10個元素賦值。Arr(6)=3；Arr(10)=7；因此，輸出結(jié)果是10。選D）。23、有人在屬性窗口中通過設(shè)置Picture屬性為命令按鈕裝入了圖片，但沒有顯示，其原因是A、命令按鈕的Enabled屬性為FalseB、命令按鈕的Sytle屬性為0-StandardC、命令按鈕的Default屬性為FalseD、沒有用DisabledPicture屬性為命令按鈕裝入圖片標(biāo)準(zhǔn)答案：B知識點解析：Picture屬性可給命令按鈕指定一個圖片，在Style屬性值為1的情況下，Picture的屬性才有效，也就是當(dāng)Style屬性為0時，Picture屬性無效，故選擇B選項。24、關(guān)于KeyPress事件，以下敘述中正確的是()。A、在控件數(shù)組的控件上按鍵盤鍵，不能觸發(fā)KeyPress事件B、按下鍵盤上任一個鍵時，都能觸發(fā)KeyPress事件C、按字母鍵時，擁有焦點的控件的KeyPress事件會被觸發(fā)D、窗體沒有KeyPress事件標(biāo)準(zhǔn)答案：C知識點解析：A選項錯誤原因：在控件數(shù)組的任何控件上按鍵盤鍵，會觸發(fā)KeyPress事件；B選項錯誤原因：只有按鍵盤上的ASCII字符鍵時，才能觸發(fā)KeyPress事件。ASCII字符鍵包括標(biāo)準(zhǔn)鍵盤上的字符、數(shù)字、標(biāo)點符號、、和鍵等，其他鍵KeyPress事件不能識別。D選項錯誤原因：窗體也有KeyPresss事件。故C選項正確。25、下列關(guān)于數(shù)組的敘述中，正確的是A、數(shù)組名的命名規(guī)則與簡單變量相同B、VisualBasic支持數(shù)組的隱式定義C、使用Static語句定義任何類型的數(shù)組時，都把該數(shù)組的全部元素初始化為0D、使用Dim語句定義任何類型的數(shù)組時，都將把數(shù)組的全部元素初始化為空字符串標(biāo)準(zhǔn)答案：A知識點解析：定義格式中的"數(shù)組名"與簡單變量相同，可以是VB中任何合法的變量名，故A項正確。數(shù)組必須先定義，后使用，不允許使用隱式定義，故B項錯誤。用Dim定義數(shù)組時，并不能任何類型的數(shù)組都初始化為空字符串，比如該語句把數(shù)值數(shù)組中的元素全都初始化為0；故選項D錯誤。同樣，當(dāng)用Static定義數(shù)組時，第一次定義時數(shù)組中的元素全都初始化為0；把字符串?dāng)?shù)組中的元素全都初始化為空字符串；如果沒有退出程序，每次引用靜態(tài)變量的數(shù)組后，其值將繼續(xù)保留，作為下次引用時該變量的初始值，故C錯誤。26、下面不能作為軟件設(shè)計工具的是A、PAD圖B、程序流程圖C、數(shù)據(jù)流程圖(DFD圖)D、總體結(jié)構(gòu)圖標(biāo)準(zhǔn)答案：C知識點解析：軟件設(shè)計常用的工具有：圖形工具：程序流程圖、N-S圖、PAD圖、HIPO；表格工具：判定表；語言工具：PDL（偽碼）。另外，在結(jié)構(gòu)化設(shè)計方法中，常用的結(jié)構(gòu)設(shè)計工具是結(jié)構(gòu)圖，故選擇C選項。27、如果希望向一個順序文件寫入數(shù)據(jù)，但又要保留文件中的原有內(nèi)容，應(yīng)采取的文件打開方式是A、AppendB、OutputC、RandomD、Input標(biāo)準(zhǔn)答案：A知識點解析：Input、Output和Append用于設(shè)置順序文件的打開方式，Input表示從打開的文件中讀取數(shù)據(jù)；Output表示向打開的文件中寫入數(shù)據(jù)，文件中原有的數(shù)據(jù)被覆蓋；Append向打開的文件中添加數(shù)據(jù)，但文件中原有的數(shù)據(jù)被保留，新的數(shù)據(jù)以文件為開始進行添加。故正確答案為選項A。28、窗體上有一個名稱為Command1的命令按鈕，并有如下程序代碼：OptionBase1PrivateSubCommand1_Click()Dima%(3,3)Fori=1To3Forj=1To3Ifi>1Andj>1Thena(i,j)=a(a(i-1,j-1),a(i,j-1))+1Elsea(i,j)=i*jEndIfNextNextPrinta(2,2);a(3,3)EndSub運行程序，單擊命令按鈕，窗體上顯示的是A、13B、21C、22D、33標(biāo)準(zhǔn)答案：D知識點解析：a是個整形的二維數(shù)組。通過For循環(huán)給數(shù)組a元素賦值。i>1并且j>1時執(zhí)行a(i,j)=a(a(i-1,j-1),a(i,j-1))+1語句，否則執(zhí)行a(i,j)=i*j，因此執(zhí)行完第一個大循環(huán)后，數(shù)組a中的元素值分別是：a（1,1）=1，a（1,2）=2，a（1,3）=3。以此類推，可知a（2,2）=3，a（3,3）=3。選D）。29、下列敘述中正確的是A、算法的效率只與問題的規(guī)模有關(guān)，而與數(shù)據(jù)的存儲結(jié)構(gòu)無關(guān)B、算法的時間復(fù)雜度是指執(zhí)行算法所需要的計算工作量C、數(shù)據(jù)的邏輯結(jié)構(gòu)與存儲結(jié)構(gòu)是一一對應(yīng)的D、算法的時間復(fù)雜度與空間復(fù)雜度一定相關(guān)標(biāo)準(zhǔn)答案：B知識點解析：算法的效率與問題的規(guī)模和數(shù)據(jù)的存儲結(jié)構(gòu)都有關(guān)，A錯誤。算法的時間復(fù)雜度，是指執(zhí)行算法所需要的計算工作量，B正確。由于數(shù)據(jù)元素在計算機存儲空間中的位置關(guān)系可能與邏輯關(guān)系不同，因此數(shù)據(jù)的邏輯結(jié)構(gòu)和存儲結(jié)構(gòu)不是一一對應(yīng)的，C錯誤。算法的時間復(fù)雜度和空間復(fù)雜度沒有直接的聯(lián)系，D錯誤。30、以下不能觸發(fā)滾動條Change事件的操作是()。A、拖動滾動框B、單擊兩端的滾動箭頭C、單擊滾動框D、單擊滾動箭頭與滾動框之間的滾動條標(biāo)準(zhǔn)答案：C知識點解析：改變滾動框的位置后會觸發(fā)Change事件，拖動滾動框、單擊滾動箭頭、單擊滾動箭頭與滾動框之間的滾動條都會改變滾動框的位置。31、以下關(guān)于菜單的敘述中錯誤的是A、對于同一窗體中的菜單，各菜單項的名稱必須唯一B、對于同一窗體中的菜單，各菜單項的標(biāo)題必須唯一C、菜單中各菜單項可以是控件數(shù)組元素D、彈出式菜單的編輯、定義在菜單編輯器中進行標(biāo)準(zhǔn)答案：B知識點解析：對于同一窗體中的菜單，各菜單項的標(biāo)題不須唯一。32、VisualBasic中的"啟動對象"是指啟動VisualBasic應(yīng)用程序時，被自動加載并首先執(zhí)行的對象。下列關(guān)于VisualBasic"啟動對象"的描述中，錯誤的是()。A、啟動對象可以是指定的標(biāo)準(zhǔn)模塊B、啟動對象可以是指定的窗體C、啟動對象可以是SubMain過程D、若沒有經(jīng)過設(shè)置，則默認的"啟動對象"是第一個被創(chuàng)建的窗體標(biāo)準(zhǔn)答案：A知識點解析：VB中啟動對象可以是SubMain過程或窗體，不能是標(biāo)準(zhǔn)模塊。故A選項錯誤。33、有如下通用過程：FunctionFs(ByValnAsLong)AsLongDimkAsLongk=1n=Abs(n)DoWhilenk=k*(nMod10)n=n\10LoopFs=kEndFunction編寫如下事件過程：PrivateSubForm_Click()DimaAsLongDimbAsLonga=InputBox("請輸入一個數(shù)")a=CLng(A)b=Fs(A)PrintbEndSub程序運行后，單擊窗體，在輸入對話框中輸入567，輸出結(jié)果為A、56B、67C、210D、18標(biāo)準(zhǔn)答案：C知識點解析：A的值為256，調(diào)用Fs函數(shù)，執(zhí)行3次循環(huán)：第1次，k=7，n=56；第2次，k=7*6=42，n=5；第3次，k=42*5=210，n=0；不滿足循環(huán)條件，退出循環(huán)。故正確答案為選項C。34、以下關(guān)于數(shù)組的敘述中，錯誤的是A、Variant類型的數(shù)組中各數(shù)組元素的類型可以不同B、各數(shù)組元素可以是不同類型的控件C、各數(shù)組元素通過下標(biāo)進行區(qū)別D、各數(shù)組元素具有相同的名稱標(biāo)準(zhǔn)答案：B知識點解析：控件數(shù)組是由一組相同類型的控件組成。它們共用一個控件名，絕大部分的屬性也相同，但有一個屬性不同，即Index屬性的值不同。當(dāng)建立控件數(shù)組時，系統(tǒng)給每個元素賦一個唯一的索引號(Index)，通過屬性窗口的Index屬性，可以知道該控件的下標(biāo)是多少，第1個元素下標(biāo)是0。35、有如下程序：PrivateSubForm_Click()DimSAsStringS=InputBox("請輸入一個字符串：")Fori=1ToLen(S)\2IfMid(S,i,1)<>Mid(S,Len(S)-i+1,1)ThenPrint"No"ExitSubEndIfNextiPrint"Yes"EndSub運行程序，單擊窗體，在輸入對話框中輸入abcscba，則輸出結(jié)果為A、abcB、YesC、cbaD、No標(biāo)準(zhǔn)答案：B知識點解析：程序?qū)崿F(xiàn)從輸入的字符串中查找前半截和后半截中不同的字符，找到后打印No，并退出過程。如果沒有找到，則打印Yes。題目中輸入字符串a(chǎn)bcscba，則Len（S）=7，F(xiàn)or循環(huán)的上限是Len(S)\2=3，代入循環(huán)變量，當(dāng)i=1時Mid(S,i,1)=a，Mid(S,Len(S)-i+1,1)=a，以此類推，每個字符都相等。選B）。36、設(shè)有如下通用過程：PublicFunctionFun(xStrAsString)AsStringDimtStrAsString，strLAsIntegertStr＝""strL＝Len(xStr)i＝1DoWhilei<＝strL/2tStr＝tStr&Mid(xStr，i，1)&Mid(xStr，strL－i＋1，1)i＝i＋1LoopFun＝tStrEndFunction在窗體上畫一個名稱為Command1的命令按鈕。然后編寫如下的事件過程：PrivateSubCommand1_Click()DimS1AsStringS1＝"abcdef"PrintUCase(Fun(S1))EndSub程序運行后，單擊命令按鈕，輸出結(jié)果是()。A、ABCDEFB、abcdefC、AFBECDD、DEFABC標(biāo)準(zhǔn)答案：C知識點解析：通用過程Fun的主要功能在于tStr＝tStr&Mid(xStr，i，1)&Mid(xStr，strL－i＋1，1)這一句。其中Mid(xStr，i，1)的意思是從字符串的左邊開始依次取一個字符，Mid(xStr，strL－i＋1，1)的意思是從串的右邊開始依次取一個字符。整個這條一語句的用意就是從一個字符串兩端依次各取一對字符連成一個字符串。因此當(dāng)Fun過程的參數(shù)為"abcdef"時，返回值為"afbecd"，Ucase("afbecd")結(jié)果為"AFBECD"，這就是輸出結(jié)果。37、下列關(guān)于二叉樹的敘述中，正確的是()。A、葉子結(jié)點總是比度為2的結(jié)點少一個B、葉子結(jié)點總是比度為2的結(jié)點多一個C、葉子結(jié)點數(shù)是度為2的結(jié)點數(shù)的兩倍D、度為2的結(jié)點數(shù)是度為1的結(jié)點數(shù)的兩倍標(biāo)準(zhǔn)答案：B知識點解析：根據(jù)二叉樹的基本性質(zhì)3：在任意一棵二叉樹中，度為0的葉子結(jié)點總是比度為2的結(jié)點多一個。所以選擇B38、用來設(shè)置文字字體是否斜體的屬性是()。A、FontUnderlineB、FontBoldC、FontSlopeD、FontItalic標(biāo)準(zhǔn)答案：D知識點解析：FontUnderline屬性設(shè)置文字是否有下劃線；FontBold屬性是設(shè)置文字是否加粗；FontItalic屬性是設(shè)置文字是否斜體；沒有FontSlope屬性。故選D。39、下面關(guān)于標(biāo)準(zhǔn)模塊的敘述中錯誤的是()。A、標(biāo)準(zhǔn)模塊中可以聲明全局變量B、標(biāo)準(zhǔn)模塊中可以包含一個SubMain過程，但此過程不能被設(shè)置為啟動過程C、標(biāo)準(zhǔn)模塊中可以包含一些Public過程D、一個工程中可以含有多個標(biāo)準(zhǔn)模塊標(biāo)準(zhǔn)答案：B知識點解析：標(biāo)準(zhǔn)模塊中可以包含一個SubMain過程，可以通過"工程屬性"對話框中將SubMain過程設(shè)置啟動對象。故B選項錯誤。40、工程文件中包含一個模塊文件和一個窗體文件。模塊文件的程序代碼是：PublicxAsIntegerPrivateyAsInteger窗體文件的程序代碼是：DimaAsIntegerPrivateSubForm_Load()DimbAsIntegera＝2：b＝3：x＝10：y＝20EndSubPrivateSubCommand1_Click()a＝a＋5：b＝b＋5：x＝x＋5：y＝y(tǒng)＋5Printa；b；x；yEndSub運行程序，單擊窗體上的命令按鈕，則在窗體上顯示的是()。A、55155B、751525C、78155D、75155標(biāo)準(zhǔn)答案：D知識點解析：程序在模塊文件中定義x為整型全局變量，在整個工程中都起作用，而y定義為整型私有變量，只能在本模塊文件中起作用。在窗體文件中變量a在本窗體文本中起作用，窗體加載事件中定義的變量b和沒有聲明的變量y，只在本事件過程起作用。程序窗體加載時，對后邊有影響的變量值為a為2，x為10，沒有指定初值的變量值默認為0，因此單擊命令按鈕后，a＝a＋5＝7，b＝b＋5＝5，x＝x＋5＝15，y＝y(tǒng)＋5＝5，結(jié)果輸出75155。二、基本操作題(本題共2題，每題1.0分，共2分。)請根據(jù)以下各小題的要求設(shè)計VisualBasic應(yīng)用程序(包括界面和代碼)。41、在名稱為Form1的窗體上畫一個名稱為CD1的通用對話框，通過屬性窗口設(shè)置CD1的初始路徑為C：＼，默認的文件名為None，標(biāo)題為“保存等級考試”，如圖2所示。注意：存盤時必須存放在考生文件夾下，工程文件名為sjt1．vbp，窗體文件名為sjt1．frm。標(biāo)準(zhǔn)答案：[操作步驟]步驟1：新建一個“標(biāo)準(zhǔn)。EXE”工程，選擇[工程]→[部件]命令，在彈出的“部件”對話框的列表中選中“MicroSoftCommonDiMogControl6．0”項目，單擊“確定”按鈕。步驟2：在窗體Form1上畫一個通用對話框，其相關(guān)屬性設(shè)置如表12—7所示。步驟3：編寫Form1的Iroad事件，加入下面的代碼：CD1．ShowSave步驟4：按要求將文件保存至考生文件夾中。知識點解析：通用對話框的InitDir屬性用于為打開或另存為對話指定初始的目錄，如果此屬性沒有指定，則使用當(dāng)前目錄。通用對話框的初始路徑由InitDir屬性設(shè)置，默認文件名由FileName屬性設(shè)置，標(biāo)題由DialogTitle屬性設(shè)置。42、在名稱為Form1的窗體上設(shè)計一個菜單。要求在窗體上添加名為menu0，標(biāo)題為“菜單命令”的主菜單，再添加兩個名稱分別為“menu1”、“menu2”，標(biāo)題分別為“不可用菜單項”、“上一菜單項可用”的子菜單，并且使程序運行時，menu1子菜單不可用，menu2子菜單已經(jīng)選中(運行時的效果如圖3所示)。再編寫適當(dāng)?shù)氖录^程，使得程序運行時，單擊“上一菜單項可用”，則“不可用菜單項”變?yōu)楹谏?可用)。要求程序中不得使用變量，且只有一條語句。注意：存盤時必須存放在考生文件夾下，工程文件名為sit2．vbp，窗體文件名為sit2．Frm。標(biāo)準(zhǔn)答案：[操作步驟]步驟1：新建一個“標(biāo)準(zhǔn)EXE”工程，打開VB菜單設(shè)計器設(shè)計菜單，各菜單項及屬性設(shè)置如表12—8所示。步驟2：打開代碼編輯窗口，編寫“上一菜單項可用”命令的Click事件過程。參考代碼：PrivateSubmenu2_Click()menu1．Enabled=TrueEndSub步驟3：按要求將文件保存至考生文件夾中。知識點解析：①VB中的菜單是通過菜單編輯器來設(shè)計的。菜單編輯器中的基本設(shè)置項有：“標(biāo)題”項，對應(yīng)出現(xiàn)在菜單中的顯示內(nèi)容；“名稱”項，系統(tǒng)識別菜單項的唯一關(guān)鍵字(不能重復(fù))