VB筆試模擬試卷5（共411題）

VB筆試模擬試卷5（共9套）（共411題）VB筆試模擬試卷第1套一、公共基礎(chǔ)選擇題(本題共10題，每題1.0分，共10分。)1、在窗體上畫(huà)一個(gè)名稱(chēng)為Commandl的命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1Click()Move500，500EndSub程序運(yùn)行后，單擊命令按鈕，執(zhí)行的操作為A、命令按鈕移動(dòng)到距窗體左邊界、上邊界各500的位置B、窗體移動(dòng)到距屏幕左邊界、上邊界各500的位置C、命令按鈕向左、上方向各移動(dòng)500D、窗體向左、上方向各移動(dòng)500標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：Move是表示控件或窗體移動(dòng)的方法。后接兩個(gè)參數(shù)，分別表示要移動(dòng)到某點(diǎn)的橫坐標(biāo)值與縱坐標(biāo)值。對(duì)于窗體來(lái)說(shuō)，橫坐標(biāo)與縱坐標(biāo)分別表示窗體距離屏幕左邊界與上邊界的長(zhǎng)度。本題表示單擊Command1控制按鈕后，窗體移動(dòng)到(500,500)處。故答案為B。答案A與C是錯(cuò)誤的，因?yàn)楫?dāng)方法前省去主體時(shí)，一般指窗體。D項(xiàng)錯(cuò)在Move方法并不是使窗體移動(dòng)多大的距離，而是使窗體達(dá)到指定的位置。2、以下關(guān)于窗體的描述中，錯(cuò)誤的是A、執(zhí)行UnLoadForml語(yǔ)句后，窗體Forml消失，但仍在內(nèi)存中B、窗體的Load事件在加載窗體時(shí)發(fā)生C、當(dāng)窗體的Enabled屬性為False時(shí)，通過(guò)鼠標(biāo)和鍵盤(pán)對(duì)窗體的操作都被禁止D、窗體的Height、Width屬性用于設(shè)置窗體的高和寬標(biāo)準(zhǔn)答案：1知識(shí)點(diǎn)解析：本題考查窗體的方法與屬性。在執(zhí)行UnLoadForm1語(yǔ)句后，窗體Form1從內(nèi)存中卸載，并從屏幕中消失。只有在執(zhí)行Hide方法時(shí)，F(xiàn)orm1才會(huì)消失但仍在內(nèi)存中，故選擇A。3、以下定義數(shù)組或給數(shù)組元素賦值的語(yǔ)句中，正確的是A、DimaAsVarianta=Array(1，2，3，4，5)B、Dima(10)AsIntegera=Array(1，2，3，4，5)C、Dima%(10)a(1)="ABCDE"D、Dima(3)，b(3)AsIntegera(0)=0a(1)=1a(2)=2b=a標(biāo)準(zhǔn)答案：1知識(shí)點(diǎn)解析：對(duì)于一數(shù)組，賦值一般可以用For循環(huán)來(lái)逐一賦值，也可以用Array函數(shù)來(lái)賦值。Array函數(shù)賦值的方法為：數(shù)組變量名=Array(表達(dá)式，表達(dá)式，…)故答案A是正確的。注意，在用Array函數(shù)賦值時(shí)，數(shù)組變量名后面不需要加“()”。選項(xiàng)B的錯(cuò)誤在于它首先定義了一個(gè)靜態(tài)數(shù)組，然后用Array函數(shù)賦值，并且所賦的元素只用5個(gè)，少于a數(shù)組應(yīng)有的數(shù)組元素個(gè)數(shù)。選項(xiàng)c的錯(cuò)誤在于數(shù)據(jù)類(lèi)型不搭配，Dim定義a為%數(shù)據(jù)類(lèi)型，而a(1)被賦以字符串?dāng)?shù)據(jù)。選項(xiàng)D中a數(shù)組的賦值方法是正確的，但b的賦值不能通過(guò)b=a這種方式，可以使用For循環(huán)語(yǔ)句來(lái)賦值。考生需特別注意。4、編制一個(gè)好的程序，首先要保證它的正確性和可靠性，還應(yīng)強(qiáng)調(diào)良好的編程風(fēng)格，在選擇標(biāo)識(shí)符的名字時(shí)應(yīng)考慮A、名字長(zhǎng)度越短越好，以減少源程序的輸入量B、多個(gè)變量共用一個(gè)名字，以減少變量名的數(shù)目C、選擇含義明確的名字，以正確提示所代表的實(shí)體D、盡量用關(guān)鍵字作名字，以使名字標(biāo)準(zhǔn)化標(biāo)準(zhǔn)答案：4知識(shí)點(diǎn)解析：標(biāo)識(shí)符的名字應(yīng)該能反映出它所代表的實(shí)際東西，應(yīng)有一定的意義。名字不是越長(zhǎng)越好，應(yīng)當(dāng)選擇精練的意義明確的名字。必要時(shí)可以使用縮寫(xiě)名字，但這時(shí)要注意縮寫(xiě)規(guī)則要一致，并且給每個(gè)名字加注釋。同時(shí)，在一個(gè)程序中，一個(gè)變量只有一種用途。5、函數(shù)String(n,"str")的功能是A、把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串B、返回由n個(gè)字符組成的字符串C、從字符串中取出n個(gè)字符D、從字符串中第n個(gè)字符的位置開(kāi)始取子字符串標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：本題主要考查字符串函數(shù)String$。String(n,"str")返回n個(gè)指定字符組成的字符串，當(dāng)指定字符為字符串時(shí)，返回該字符串第一個(gè)字符組成的n個(gè)字符的字符串。據(jù)此，本題應(yīng)選擇B項(xiàng)。6、在窗體上畫(huà)一個(gè)名稱(chēng)為Commandl的命令按鈕，然后編寫(xiě)如下程序：PrivateSubCommand1_Click()StaticXAsIntegerStaticYAsIntegerClsY=1Y=Y+5X=5+XPrintX，YEndSub程序運(yùn)行時(shí)，三次單擊命令按鈕Commandl后，窗體上顯示的結(jié)果為A、1516B、156C、1515D、56標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：本題考查Static的用法。Static用于在過(guò)程中定義靜態(tài)變量及數(shù)組變量。與Dim不同，如果用Static定義了一個(gè)變量，則每次引用該變量時(shí)，其值都會(huì)繼續(xù)保留．本題中，三次單擊命令按鈕意味著每次Y值加5，X值也加5。由于在事件過(guò)程中事先給Y賦值1，所以每次單擊按鈕，Y值都被初始化為1，但X繼續(xù)保留上次的值，即在第三次單擊命令按鈕時(shí)，X連加了3次5，Y值為1加5，故正確選項(xiàng)為D。7、下列敘述中正確的是A、軟件交付使用后還需要進(jìn)行維護(hù)B、軟件一旦交付使用就不需要再進(jìn)行維護(hù)C、軟件交付使用后其生命周期就結(jié)束D、軟件維護(hù)是指修復(fù)程序中被破壞的指令標(biāo)準(zhǔn)答案：1知識(shí)點(diǎn)解析：維護(hù)是軟件生命周期的最后。一個(gè)階段，也是持續(xù)時(shí)間最長(zhǎng)、付出代價(jià)最大的階段，在軟件交付使用后，還需要進(jìn)行維護(hù)。軟件維護(hù)通常有以下四類(lèi)：為糾正使用中出現(xiàn)的錯(cuò)誤而進(jìn)行的改正性維護(hù)；為適應(yīng)環(huán)境變化而進(jìn)行的適應(yīng)性維護(hù)；為改進(jìn)原有軟件而進(jìn)行的完善性維護(hù)；為將來(lái)的可維護(hù)和可靠而進(jìn)行的預(yù)防性維護(hù)。軟件維護(hù)不僅包括程序代碼的維護(hù)，還包括文檔的維護(hù)。綜上所述，本題的正確答案是A，其余選項(xiàng)的說(shuō)法錯(cuò)誤。8、以下敘述中錯(cuò)誤的是A、下拉式菜單和彈出式菜單都用菜單編輯器建立B、在多窗體程序中，每個(gè)窗體都可以建立自己的菜單系統(tǒng)C、除分隔線(xiàn)外，所有菜單項(xiàng)都能接收Click事件D、如果把一個(gè)菜單項(xiàng)的Enabled屬性設(shè)置為False，則該菜單項(xiàng)不可見(jiàn)標(biāo)準(zhǔn)答案：8知識(shí)點(diǎn)解析：下拉式菜單與彈出式菜單都用菜單編輯器建立，不同的是，彈出式菜單還需要用PopupMenu方法激活。答案A表述正確。在多重窗體程序中，每個(gè)窗體都可以建立自己的菜單，答案B也是正確的。菜單中，除了分隔線(xiàn)外，所有菜單項(xiàng)都能接收Click事件，選項(xiàng)C表述正確。選項(xiàng)D處犯了一個(gè)典型的錯(cuò)誤，就是沒(méi)有區(qū)別Visible屬性與Enabled屬性。前者表示該菜單項(xiàng)不可見(jiàn)，或者表示該菜單項(xiàng)功能失效，此時(shí)顯示為灰色。故本題選擇D項(xiàng)。9、設(shè)有如下關(guān)系表：則下列操作中正確的是A、T=R∩SB、T=R∪SC、T=R×SD、T=R/S標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：選項(xiàng)A、B、C分別進(jìn)行交運(yùn)算、并運(yùn)算、笛卡爾積運(yùn)算，選項(xiàng)D不是關(guān)系運(yùn)算。T由屬于關(guān)系R以及關(guān)系S的元組組成，簡(jiǎn)單來(lái)說(shuō)，就是S和R的元組之和，是并運(yùn)算，選項(xiàng)B正確。10、下列模式中，能夠給出數(shù)據(jù)庫(kù)物理存儲(chǔ)結(jié)構(gòu)與物理存取方法的是A、內(nèi)模式B、外模式C、概念模式D、邏輯模式標(biāo)準(zhǔn)答案：1知識(shí)點(diǎn)解析：能夠給出數(shù)據(jù)庫(kù)物理存儲(chǔ)結(jié)構(gòu)與物理存取方法的是內(nèi)模式。外模式是用戶(hù)的數(shù)據(jù)視圖，也就是用戶(hù)所見(jiàn)到的數(shù)據(jù)模式。概念模式是數(shù)據(jù)庫(kù)系統(tǒng)中全局?jǐn)?shù)據(jù)邏輯結(jié)構(gòu)的描述，是全體用戶(hù)公共數(shù)據(jù)視圖。沒(méi)有邏輯模式這一說(shuō)法。正確答案為A。二、選擇題(本題共20題，每題1.0分，共20分。)11、在窗體中添加一個(gè)名稱(chēng)為Commandl的命名按鈕，然后編寫(xiě)如下程序：PrivateSubCommand1Click()PrintTab(1)；“第一”P(pán)rintTab(6)；“第二”EndSub程序運(yùn)行后，如果單擊命令按鈕，在窗體上顯示的內(nèi)容是(口表示空格)A、第一□□第二B、第一第二□□C、第一□□第二D、第一□□第二標(biāo)準(zhǔn)答案：4知識(shí)點(diǎn)解析：本題考查T(mén)ab函數(shù)以及Print方法使用。Tab(n)表示把光標(biāo)移到由參數(shù)n指定的位置，如果當(dāng)前的顯示位置已經(jīng)超過(guò)n，則自動(dòng)下移一行。本題由于第一個(gè)Print方法后接逗號(hào)，為14個(gè)字符的區(qū)段，所以第二個(gè)Print方法顯示的字符串會(huì)自動(dòng)換行，故答案C。12、以下關(guān)于菜單的敘述中，錯(cuò)誤的是A、在程序運(yùn)行過(guò)程中可以增加或減少菜單項(xiàng)B、如果把一個(gè)菜單項(xiàng)的Enabled屬性設(shè)置為False，則可刪除該菜單項(xiàng)C、彈出式菜單在菜單編輯器中設(shè)計(jì)D、利用控件數(shù)組可以實(shí)現(xiàn)菜單項(xiàng)的增加或減少標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：主要考查菜單項(xiàng)的增減。在菜單設(shè)計(jì)時(shí)，如果把一個(gè)菜單項(xiàng)的Enabled屬性設(shè)置為False，則該項(xiàng)菜單呈灰色，表示不可用，并非是刪除該項(xiàng)菜單。所以本題答案為B。13、設(shè)a="MicrosoftVisualBasic"，則以下使變量b的值為VisualBasic的語(yǔ)句是A、b=LeR(a,10)B、b=Mid(a，10)C、b=Right(a,10)D、b=Mid(a，11，10)標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：本題考查考生對(duì)常用字符串函數(shù)的應(yīng)用能力?？忌鷳?yīng)該對(duì)VB中的標(biāo)準(zhǔn)函數(shù)熟練掌握。Left函數(shù)是從字符串的左邊取出一個(gè)字符串，選項(xiàng)A結(jié)果是Microsoft；Right函數(shù)是從字符串的右邊取出一個(gè)字符串，選項(xiàng)C結(jié)果是isualBasic；Mid函數(shù)是取出字符串一部分連續(xù)字符組成新的字符串，函數(shù)形式為Mid(String,n,m)，從第n個(gè)字符開(kāi)始，截取m個(gè)字符，如果略去m的話(huà)，則認(rèn)為從第n個(gè)字符到字符串末尾，選項(xiàng)D結(jié)果是VisualBasi。字符串函數(shù)是考試重點(diǎn)內(nèi)容，也是VB語(yǔ)言的基礎(chǔ)，考生應(yīng)該熟練使用。14、在窗體上畫(huà)一個(gè)命令按鈕，名稱(chēng)為Commandl，然后編寫(xiě)如下事件過(guò)程．OptionBase0PrivateSubCommand1_ClickDimcityAsVariantcity=Array(“北京”，“上海”，“天津”，“重慶”)Printcity(1)EndSub程序運(yùn)行后，如果單擊命令按鈕，則在窗體上顯示的內(nèi)容是A、空白B、錯(cuò)誤提示C、北京D、上海標(biāo)準(zhǔn)答案：8知識(shí)點(diǎn)解析：本題主要考查數(shù)組的初始賦值。由于有“OptionBase0”，所以以Array函數(shù)賦值的數(shù)組下標(biāo)下界為0。所以city(1)指Array賦給city的第二個(gè)元素，即“上?！?，故本題選D。15、假定有以下函數(shù)過(guò)程：FunctionFun(SAsString)AsStringDims1AsStringFori=1ToLen(S)s1=UCase(Mid(S，i，1))+s1NextiFun=s1EndFunction在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()DimStr1AsString，Str2AsStringStrl=InputBox(“請(qǐng)輸入一個(gè)字符串”)Str2=Fun(Str1)PrintStr2EndSub程序運(yùn)行后，單擊命令按鈕，如果在輸入對(duì)話(huà)框中輸入字符串“abcdefg”，則單擊“確定”按鈕后在窗體上的輸出結(jié)果為，A、abcdefgB、ABCDEFGC、gfedcbaD、GFEDCBA標(biāo)準(zhǔn)答案：8知識(shí)點(diǎn)解析：本題主要考查對(duì)函數(shù)過(guò)程的調(diào)用，但關(guān)鍵點(diǎn)在于正確理解s1=UCase(Mid(S，i，1))+s1所表達(dá)的字符串相加順序。當(dāng)輸入“abcde龜”后，首先通過(guò)Fori循環(huán)語(yǔ)句，逐一將該字符串中的字符按照從右往左的順序變?yōu)榇髮?xiě)字母后相加，最終結(jié)果為Str2="GFEDCBA"，故選擇D項(xiàng)。做本題時(shí)，很容易選B，應(yīng)加以注意。16、以下關(guān)于焦點(diǎn)的敘述中，錯(cuò)誤的是A、如果文本框的TabStop屬性為False，則不能接收從鍵盤(pán)上輸入的數(shù)據(jù)B、當(dāng)文本框失去焦點(diǎn)時(shí)，觸發(fā)LostFocus事件C、當(dāng)文本框的Enabled屬性為False時(shí)，其Tab順序不起作用D、可以用TabIndex屬性改變Tab順序標(biāo)準(zhǔn)答案：1知識(shí)點(diǎn)解析：本題考查焦點(diǎn)與Tab順序。TabStop是可獲得焦點(diǎn)的控件都具備的屬性，當(dāng)設(shè)置其為False時(shí)，控件仍保持在實(shí)際Tab順序中的位置，只不過(guò)按Tab時(shí)會(huì)被跳過(guò)，但該控件仍可以通過(guò)鍵盤(pán)輸入獲得焦點(diǎn)從而接受數(shù)據(jù)的輸入。故A項(xiàng)說(shuō)法錯(cuò)誤。17、下列程序段的執(zhí)行結(jié)果為A=0：B=1DoA=A+BB=B+1LoopWhileA＜10PrintA；BA、105B、ABC、01D、1030標(biāo)準(zhǔn)答案：1知識(shí)點(diǎn)解析：本題考查Do循環(huán)語(yǔ)句的同時(shí)考查了Print方法的應(yīng)用。當(dāng)A＞=10時(shí)，Do循環(huán)終止，此時(shí)B值為5，A值為10，同時(shí)A與B之間用分號(hào)隔開(kāi)，表示用Print輸出A與B的值時(shí)以緊湊的方式輸出，故答案為A。18、在窗體上畫(huà)兩個(gè)文本框，其名稱(chēng)分別為T(mén)ext1和Text2，然后編寫(xiě)如下程序：PrivateSubForm_Load()ShowText1.Text=""Text2.Text="’’Text1.SetFocusEndSubPrivateSubText1_Change()Text2.Text=Mid(Text1.Text,8)EndSub程序運(yùn)行后，如果在文本框Text1中輸入BeijingChina，則在文本框Text2中顯示的內(nèi)容是A、BeijingChinaB、ChinaC、BeijingD、BeijingC標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：本題考查文本框?qū)傩?、文本框事件以及Mid函數(shù)的用法。當(dāng)在文本框Text1中輸入BeijingChina時(shí)，Text2.Text=Mid(Text1.Text,8)會(huì)執(zhí)行。Mid(Str-ing,m,n)函數(shù)返回從m起向后的n個(gè)字符省略n時(shí)，則直到尾部結(jié)束。題目中Mid(BeijingChina,8)將返回China，所以選項(xiàng)B是正確答案。19、在窗體上畫(huà)一個(gè)列表框和一個(gè)命令按鈕，其名稱(chēng)分別為L(zhǎng)ist1和Command1，然后編寫(xiě)如下事件過(guò)程：PrivateSubFormLoad()List1.AddItem"Item1"List1.Addltem"Item2"Listl.Addltem"Item3"EndSubPrivateSubCommand1Click()Listl.List(Listl.ListCount)="AAAA"EndSub程序運(yùn)行后，單擊命令按鈕，其結(jié)果為A、把字符串“AAAA”添加到列表框中，但位置不能確定B、把字符串“AAAA”添加到列表框的最后(即“Item3”的后面)C、把列表框中原有的最后一項(xiàng)改為“AAAA”D、把字符串“AAAA”插入到列表框的最前面(即“Item1”的前面)標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：List屬性用來(lái)列出表項(xiàng)的內(nèi)容，可以加下標(biāo)用“()”括起來(lái)配合使用。ListCount是列表框一個(gè)很重要的屬性，它返回列表框中表項(xiàng)的數(shù)量。同時(shí)還要注意列表框ListIndex屬性值是從0開(kāi)始，而不是從1開(kāi)始。Listl.ListCount返回值為3，所以應(yīng)該是插入到第4個(gè)位置，即選項(xiàng)B是正確的。20、在窗體中添加一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下代碼：FunctionF(aAsInteger)b=0Staticcb=b+1c=c+1F=a+b+cEndFunctionPrivateSubCommand1Click()DimaAsIntegerDimbAsIntegera=2Fori=1To3b=F(A)PrintbNextiEndSub程序運(yùn)行后，如果單擊按鈕，則在窗體上顯示的內(nèi)容是A、444B、456C、567D、555標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：本題綜合考查了Function函數(shù)過(guò)程的建立與調(diào)用及For循環(huán)控制語(yǔ)句。但解題的關(guān)鍵是理解Static定義變量，使變量具有的數(shù)值存儲(chǔ)功能。本題在Fori的三次循環(huán)中，每調(diào)用一次函數(shù)過(guò)程F(A)，c的值都會(huì)在上次調(diào)用的基礎(chǔ)上加1，b的數(shù)值保持不變，a的數(shù)值也保持不變，故單擊按鈕時(shí)，窗體上顯示的內(nèi)容為B項(xiàng)內(nèi)容，即數(shù)值分別為4，5、6。21、在窗體中添加一個(gè)命令按鈕(其N(xiāo)ame屬性為Command1)，然后編寫(xiě)如下代碼：OptionBase1PrivateSubCommand1Click()Dimaa=Array(2，4，6，8)j=1Fori=4To1Step-3s=s+a(i)(jj=j(10NextiPrintsEndSub運(yùn)行上面的程序，單擊命令按鈕，其輸出結(jié)果是A、22B、24C、26D、28標(biāo)準(zhǔn)答案：8知識(shí)點(diǎn)解析：根據(jù)題意，F(xiàn)or循環(huán)在i為4和1時(shí)分別執(zhí)行1次For循環(huán)語(yǔ)句，第1次執(zhí)行時(shí)j值為1，a(i)為8；第2次執(zhí)行時(shí)，j值為10，a(i)值為2，故最終用Print輸出s時(shí)，s的值為20加8，答案為D。注意，本題事先聲明了OptionBase1，故數(shù)組a的下標(biāo)下界為1。22、下列程序段的執(zhí)行結(jié)果為DimA(10，10)ForI=2To4ForJ=4To5A(I，J)=I*JNextJNextIPrintA(2，5)+A(3，4)+A(4，5)A、22B、42C、32D、52標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：根據(jù)題意，該二維數(shù)組的賦值方法為A(I，J)=I(J，故A(2，5)、A(3,4)、A(4,5)的值分別為10、12、20。相加的結(jié)果為42，故答案為B。23、設(shè)有如下程序：OptionBase1PrivateSubCommand1Click()Dima(10)AsIntegerDimnAsIntegern=InputBox(“輸入數(shù)據(jù)”)Ifn＜10ThenCall，GetArray(a，n)EndIfEndSubPrivateSubGetArray(b()AsInteger，nAsInteger)Dimc(10)AsIntegerj=0Fori=1Tonb(i)=CInt(Rnd()*100)Ifb(i)/2=b(i)\2Thenj=j+1c(j)=b(i)EndIfNextPrintjEndSub以下敘述中錯(cuò)誤的是A、數(shù)組b中的偶數(shù)被保存在數(shù)組c中B、程序運(yùn)行結(jié)束時(shí)，在窗體上顯示的是c數(shù)組中元素的個(gè)數(shù)C、GetArray過(guò)程的參數(shù)n是按值傳送的D、如果輸入的數(shù)據(jù)大于10，則窗體上不顯示任何信息標(biāo)準(zhǔn)答案：4知識(shí)點(diǎn)解析：GetArray過(guò)程返回c數(shù)組中元素的個(gè)數(shù)。c數(shù)組元素由b(i)賦值，但只有b(i)中為偶數(shù)的元素才能賦值給c數(shù)組中的元素。單擊按鈕時(shí)，如果輸入的n值小于10，則調(diào)用GetArray過(guò)程。據(jù)此A、B、D項(xiàng)都是正確的。C項(xiàng)的錯(cuò)誤比較明顯，GetArray過(guò)程的參數(shù)n前沒(méi)有關(guān)鍵字“ByVal”，則默認(rèn)為“ByRef”，即n是按傳地址的方式傳送參數(shù)的。24、在窗體上畫(huà)一個(gè)命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()a$="321"：b$="abc"Forj=1To5PrintMid$(a$，6-j，1)+Mid$(b$，j，1)；NextiEndSub程序運(yùn)行后，輸出的結(jié)果是；A、a1b2c3B、ab1c23C、c1b2a3D、a12bc1標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：Mid函數(shù)是VisualBasic考試的熱點(diǎn)之一。Mid(a$，i，n)表示從字符串a(chǎn)$的笫i個(gè)字符開(kāi)始向后截取n個(gè)字符，據(jù)此不難看出答案為B。注意Print方法后面以分號(hào)結(jié)束，意味著每執(zhí)行一次For循環(huán)輸出的字符都以緊湊方式與上一次For循環(huán)輸出的字符相連。25、以下敘述中錯(cuò)誤的是A、在同一窗體的菜單項(xiàng)中，不允許出現(xiàn)標(biāo)題相同的菜單項(xiàng)B、在菜單的標(biāo)題欄中，“&”所引導(dǎo)的字母指明了訪(fǎng)問(wèn)該菜單項(xiàng)的訪(fǎng)問(wèn)鍵C、程序運(yùn)行過(guò)程中，可以重新設(shè)置菜單的Visible屬性D、彈出式菜單也在菜單編輯器中定義標(biāo)準(zhǔn)答案：1知識(shí)點(diǎn)解析：同一窗體可以出現(xiàn)相同標(biāo)題的菜單項(xiàng)，A項(xiàng)表述錯(cuò)誤。在菜單的標(biāo)題欄中，“&”所引導(dǎo)的字母指明了訪(fǎng)問(wèn)該菜單項(xiàng)的訪(fǎng)問(wèn)鍵，一般與Alt鍵配合使用。程序運(yùn)行過(guò)程中，可以通過(guò)程序代碼重新設(shè)置菜單的Visible屬性。所以B、C項(xiàng)表述正確。彈出式菜單也在菜單編輯器中定義，使用時(shí)可以用PopupMenu方法打開(kāi)。26、在窗體上繪制一個(gè)名稱(chēng)為L(zhǎng)abell的標(biāo)簽，然后編寫(xiě)如下事件過(guò)程：PrivateSubForm_Click()Dimarr(10，10)AsIntegerDimiAsInteger，jAsIntegerFori=2To4Forj=2To4arr(i，j)=i*jNextiNextiLabell.Caption=Str(arr(2，2)+arr(3，3))EndSub程序運(yùn)行后，單擊窗體，在標(biāo)簽中顯示的內(nèi)容是A、12B、13C、14D、15標(biāo)準(zhǔn)答案：2知識(shí)點(diǎn)解析：多重循環(huán)屬于考試難點(diǎn)，考生應(yīng)該注意多重循環(huán)中環(huán)應(yīng)該按照先進(jìn)后出、后進(jìn)先出的原則，不能交叉。按照這個(gè)原則將循環(huán)層次分清楚就不容易出錯(cuò)。程序運(yùn)行后在標(biāo)簽中顯示的內(nèi)容是13，選項(xiàng)B正確。27、以下關(guān)于KeyPress事件過(guò)程中參數(shù)KeyAscii的敘述中正確的是A、KeyAscii參數(shù)是所按鍵的ASCII碼B、KeyAscii參數(shù)的數(shù)據(jù)類(lèi)型為字符串C、KeyAscii參數(shù)可以省略D、KeyAscii參數(shù)是所按鍵上標(biāo)注的字符標(biāo)準(zhǔn)答案：1知識(shí)點(diǎn)解析：本題考查對(duì)于KeyPress事件過(guò)程的理解。28、在窗體上畫(huà)一個(gè)名稱(chēng)為Commandl的命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()Forn=1To20IfnMod3＜＞0Thenm=m+n\3NextnprintnEndSub程序運(yùn)行后，如果單擊命令按鈕，則窗體上顯示的內(nèi)容是A、15B、18C、21D、24標(biāo)準(zhǔn)答案：4知識(shí)點(diǎn)解析：本題考查For循環(huán)控制語(yǔ)句，做好此題的關(guān)鍵是掌握For循環(huán)語(yǔ)句的執(zhí)行過(guò)程。For循環(huán)首先把“初值”賦給循環(huán)變量，接著檢查循環(huán)變量的值是否超過(guò)終值，如果超過(guò)就停止執(zhí)行循環(huán)體，跳出循環(huán)，執(zhí)行Next后面的語(yǔ)句；否則執(zhí)行一次循環(huán)體，然后把“循環(huán)變量+步長(zhǎng)”的值賦給循環(huán)變量，重復(fù)上述過(guò)程。據(jù)此，如果For循環(huán)的終值等于初值，F(xiàn)or循環(huán)也會(huì)執(zhí)行一次循環(huán)。本題需要輸出執(zhí)行完Forn循環(huán)后n值，應(yīng)為21。根據(jù)前述，當(dāng)執(zhí)行完n=20的循環(huán)時(shí)，n被賦值21，然后再取檢驗(yàn)它是否超過(guò)了終值。故正確答案為C。29、一個(gè)工程中包含兩個(gè)名稱(chēng)分別為Forml、Form2的窗體，一個(gè)名稱(chēng)為mdlFunc的標(biāo)準(zhǔn)模塊。假定在Forml、Form2和md1Func中分別建立了自定義過(guò)程，其定義格式為：Form1中定義的過(guò)程：PrivateSubfrmFunctionl()...EndSubForm2中定義的過(guò)程：PublicSubfrmFunction2()...EndSubmd1Func中定義的過(guò)程：PublicSubmdlFunction()...EndSub在調(diào)用上述過(guò)程的程序中，如果不指明窗體或模塊的名稱(chēng)，則以下敘述中正確的是A、上述三個(gè)過(guò)程都可以在工程中的任何窗體或模塊中被調(diào)用B、frmFunction2和mdlFunction過(guò)程能夠在工程中各個(gè)窗體或模塊中被調(diào)用C、上述三個(gè)過(guò)程都只能在各自被定義的模塊中調(diào)用D、只有mdlFunction過(guò)程能夠被工程中各個(gè)窗體或模塊調(diào)用標(biāo)準(zhǔn)答案：8知識(shí)點(diǎn)解析：本題考查過(guò)程的調(diào)用。只有在標(biāo)準(zhǔn)模塊中用Public定義的Sub過(guò)程才能被工程中各個(gè)窗體或模塊調(diào)用，故本題選D。30、在窗體上繪制一個(gè)名稱(chēng)為Command1的命令按鈕和一個(gè)名稱(chēng)為T(mén)ext1的文本框，在文本框中輸入以下字符串：MicrosoftSubCommand1_Click()然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()Open"d：\temp\outf.txt"ForOutputAs#1Fori=1ToLen(Text1.Text)c=Mid(Text1.Text，i，1)Ifc＞="A"Andc＜="Z"ThenPrint#1，LCase(C)EndIfNextiCloseEndSub程序運(yùn)行后，單擊命令按鈕，文件outf.txt中的內(nèi)容是A、MVBPB、mvbpC、MVBPD、mvbp標(biāo)準(zhǔn)答案：8知識(shí)點(diǎn)解析：首先考生應(yīng)該弄清楚題目給出程序的功能是什么。首先使用Open語(yǔ)句創(chuàng)建outf.txt文件順序文件。寫(xiě)入的內(nèi)容是將文本框中的文字進(jìn)行相關(guān)處理然后通過(guò)Print#語(yǔ)句向文件寫(xiě)入數(shù)據(jù)。LCase函數(shù)的功能是將大寫(xiě)字符串轉(zhuǎn)換為小寫(xiě)，正確答案是選項(xiàng)D。三、公共基礎(chǔ)填空題(本題共5題，每題1.0分，共5分。)31、實(shí)現(xiàn)算法所需的存儲(chǔ)單元多少和算法的工作量大小分別稱(chēng)為算法的【】。標(biāo)準(zhǔn)答案：空間復(fù)雜度和時(shí)間復(fù)雜度知識(shí)點(diǎn)解析：算法的復(fù)雜性是指對(duì)一個(gè)在有限步驟內(nèi)終止算法和所需存儲(chǔ)空間大小的估計(jì)。算法所需存儲(chǔ)空間大小是算法的空間復(fù)雜性，算法的計(jì)算量是算法的時(shí)間復(fù)雜性。32、數(shù)據(jù)結(jié)構(gòu)包括數(shù)據(jù)的邏輯結(jié)構(gòu)、數(shù)據(jù)的【】以及對(duì)數(shù)據(jù)的操作運(yùn)算。標(biāo)準(zhǔn)答案：存儲(chǔ)結(jié)構(gòu)知識(shí)點(diǎn)解析：數(shù)據(jù)結(jié)構(gòu)包括3個(gè)方面，即數(shù)據(jù)的邏輯結(jié)構(gòu)、數(shù)據(jù)的存儲(chǔ)結(jié)構(gòu)及對(duì)數(shù)據(jù)的操作運(yùn)算。33、一個(gè)類(lèi)可以從直接或間接的祖先中繼承所有屬性和方法。采用這個(gè)方法提高了軟件的【】標(biāo)準(zhǔn)答案：可重用性知識(shí)點(diǎn)解析：繼承的優(yōu)點(diǎn)：相似的對(duì)象可以共享程序代碼和數(shù)據(jù)結(jié)構(gòu)，從而大大減少了程序中的冗余，提高軟件的可重用性。34、面向?qū)ο蟮哪Ｐ椭?，最基本的概念是?duì)象和【】。標(biāo)準(zhǔn)答案：類(lèi)知識(shí)點(diǎn)解析：面向?qū)ο竽Ｐ椭?，最基本的概念是?duì)象和類(lèi)。對(duì)象是現(xiàn)實(shí)世界中實(shí)體的模型化：將屬性集和方法集相同的所有對(duì)象組合在一起，可以構(gòu)成一個(gè)類(lèi)。35、軟件維護(hù)活動(dòng)包括以下幾類(lèi)：改正性維護(hù)、適應(yīng)性維護(hù)、【】維護(hù)和預(yù)防性維護(hù)。標(biāo)準(zhǔn)答案：完善性知識(shí)點(diǎn)解析：軟件維護(hù)活動(dòng)包括以下幾類(lèi)：改正性維護(hù)、適應(yīng)性維護(hù)、完善性維護(hù)和預(yù)防性維護(hù)。改正性維護(hù)是指在軟件交付使用后，為了識(shí)別和糾正軟件錯(cuò)誤、改正軟件性能上的缺陷、排除實(shí)施中的誤使用，應(yīng)當(dāng)進(jìn)行的診斷和改正錯(cuò)誤的過(guò)程：適應(yīng)性維護(hù)是指為了使軟件適應(yīng)變化，而去修改軟件的過(guò)程；完善性維護(hù)是指為了滿(mǎn)足用戶(hù)對(duì)軟件提出的新功能與性能要求，需要修改或再開(kāi)發(fā)軟件，以擴(kuò)充軟件功能、增強(qiáng)軟件性能、改進(jìn)加工效率、提高軟件的可維護(hù)性；預(yù)防性維護(hù)是為了提高軟件的可維護(hù)性、可靠性等，為以后的進(jìn)一步改進(jìn)軟件打下良好基礎(chǔ)。四、填空題(本題共1題，每題1.0分，共1分。)36、在菜單編輯器中建立了一個(gè)菜單，名為pmenu，用下面的語(yǔ)句可以把它作為彈出式菜單彈出，請(qǐng)?zhí)羁?。Forml.______pmenu標(biāo)準(zhǔn)答案：PopupMenu知識(shí)點(diǎn)解析：本題屬于記憶性?xún)?nèi)容，當(dāng)在菜單編輯器中建立一個(gè)菜單后，可以使用“窗體名.PopupMenu菜單名”將該菜單變成彈出式菜單。五、填空題（含2小題）(本題共2題，每題1.0分，共2分。)37、設(shè)有程序：OptionBase1PrivateSubCommand1Click()Dimarrl，MaxasIntegerarrl=Array(12，435，76，24，78，54，866，43)______=arrl(1)Fori=1To8Ifarrl(i)＞MaxThen_______NextiPrint“最大值是：”；MaxEndSub以上程序的功能是：用Atray函數(shù)建立一個(gè)含有8個(gè)元素的數(shù)組，然后查找并輸出該數(shù)組中元素的最大值。請(qǐng)?zhí)羁?。?biāo)準(zhǔn)答案：Max,Max=arrl(i)知識(shí)點(diǎn)解析：本題綜合考查數(shù)組的初始賦值與For循環(huán)控制語(yǔ)句。根據(jù)題意，先用Array函數(shù)為數(shù)組arr1賦值，然后令變量Max等于arr1(1)，相當(dāng)于給Max賦了一個(gè)初始值。在For循環(huán)中，進(jìn)行8次循環(huán)，逐一遍歷比較arr1(i)值與Max值的大小，如果arr1(i)＞Max，則令Max值等于此時(shí)的arr1(i)值。通過(guò)這個(gè)過(guò)程，求出arr1數(shù)組中的最大元素。故第12空填：Max。根據(jù)上面的分析，第13空應(yīng)該把a(bǔ)rrl(i)賦給Max，故填：Max=arrl(i)。38、在名稱(chēng)為Form1的窗體上繪制一個(gè)文本框，其名稱(chēng)為T(mén)ext1，在屬性窗口中把該文本框的MultiLine屬性設(shè)置為T(mén)rue，然后編寫(xiě)如下的事件過(guò)程：PrivateSubFormClick()Open"d：\test\smtext1.txt"ForInputAs#1DoWhileNotLineInput#1，aspectswhole$=whole$+aspect$+Chr$(13)+Chr$(10)LoopText1.Text=whole$Close#1Open"d：\test\smtext2.txt"ForOutputAs#1Print#1,______Close#1EndSub上述程序的功能是，把磁盤(pán)文件smtext1.txt的內(nèi)容讀到內(nèi)存并在文本框中顯示出來(lái)，然后把該文本框中的內(nèi)容存入磁盤(pán)文件smtext2.txt。標(biāo)準(zhǔn)答案：EOF(1),Text1.Text或Text1或Form1.Text1.Text或Form1.Text1或Me.Text1.Text或Me.Text1知識(shí)點(diǎn)解析：本題考查文件操作。文件操作是考試難點(diǎn)，也是眾多考生認(rèn)為困難的內(nèi)容。首先把磁盤(pán)文件smtext1.txt的內(nèi)容讀到內(nèi)存，如何判斷文件是否讀取完成呢?EOF函數(shù)的功能就是當(dāng)文件指針到達(dá)文件尾部時(shí)返回True，否則返回False，當(dāng)EOF(文件號(hào))可以判斷是否讀取完成。Linelnput#語(yǔ)句的功能是從一個(gè)打開(kāi)的順序文件中，讀出一行數(shù)據(jù)賦給一個(gè)aspect$變量，然后進(jìn)行相應(yīng)運(yùn)算，Chr(13)+Chr(10)的功能是回車(chē)換行。最后將whole$變量的值顯示在文本框中，然后關(guān)閉#1文件。接下來(lái)就是如何把文本框中的內(nèi)容存入文件中，這里使用Open"d：\test\smtext2.txt"ForOutputAs#1，該語(yǔ)句可以打開(kāi)d：\test\目錄下的名為smtext2.txt的文件，如果不存在，該語(yǔ)句將創(chuàng)建一個(gè)名為smtext2.txt的文件。文件的寫(xiě)入是由Print#語(yǔ)句實(shí)現(xiàn)，考生需要注意區(qū)分Print#語(yǔ)句與Write#語(yǔ)句的區(qū)別。VB筆試模擬試卷第2套一、公共基礎(chǔ)選擇題(本題共34題，每題1.0分，共34分。)1、下面程序運(yùn)行后輸出結(jié)果是()。ForI=1to2S=1Forj=0toI-1S=S+S*INextjPrintSNextIA、11B、02C、29D、69標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析2、窗體的隱藏和刪除，分別用在不同的場(chǎng)合，隱藏Form1和刪除Form1的命令是()A、HideForm1UnloadForm1B、Form1.HideForm1.UnloadC、Form1.HideUnloadForm1D、HideForm1Form1.Unload標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析3、程序的基本控制結(jié)構(gòu)是()。A、Do-Loop結(jié)構(gòu)、Do-LoopWhile結(jié)構(gòu)和For-Next結(jié)構(gòu)B、子程序結(jié)構(gòu)，自定義函數(shù)結(jié)構(gòu)C、順序結(jié)構(gòu)，選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu)D、單行結(jié)構(gòu)，多行結(jié)構(gòu)和多分支結(jié)構(gòu)標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析4、下列程序段的執(zhí)行結(jié)果為()。Dimm(10),n(10)I=3ForI=1to5M(t)=tN(I)=2*I+tNexttPrintn(I);m(I)A、311B、315C、113D、153標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析5、下列程序段的執(zhí)行結(jié)果為()。a=6Fork=1To0a=a+kNextkPrintk;aA、-16B、116C、16D、1121標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析6、下列各種形式的循環(huán)中，輸出“*”的個(gè)數(shù)最少的循環(huán)是()。A、a=5:b=8DoPrint"*"a=a+1LoopWhilea＜bB、a=5:b=8DoPrint"*"a=a+1LoopUntila＜bC、a=5:b=8DoUntila-bprint"*"b=b+1LoopD、a=5:b=8DoUntila＞bPrint"*"a=a+1Loop標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析7、在窗體上畫(huà)一個(gè)名稱(chēng)為Command1的命令按鈕和兩個(gè)名稱(chēng)分別為T(mén)ext1、Text2的文本框，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()n=Text1.TextSelectCasenCase1To20x=10Case2,4,6x=20CaseIs＜10x=30Case10x=40EndSelectText2.Text=xEndSub程序運(yùn)行后，如果在文本框Text1中輸入10，然后單擊命令按鈕，則在Text2中顯示的內(nèi)容是()。A、10B、20C、30D、40標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析8、在窗體上畫(huà)一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()Move500,500EndSub程序運(yùn)行后，單擊命令按鈕，執(zhí)行的操作為()A、命令按鈕移動(dòng)到距窗體左邊界、上邊界各500的位置B、窗體移動(dòng)到距屏幕左邊界、上邊界各500的位置C、命令按鈕向左、上方向各移動(dòng)500D、窗體向左、上方向各移動(dòng)500標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析9、在窗體上畫(huà)一個(gè)命令按鈕，其名稱(chēng)為Command1，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()a=12345PrintFormat$(a,"000,00")EndSub程序運(yùn)行后，單擊命令按鈕，窗體上顯示的是()。A、123.45B、12345.00C、12345D、00123.45標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析10、已知數(shù)組a(1To10)AsInteger,下面調(diào)用GetValue函數(shù)正確的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=1To10GetValue=GetValue+a(i)NextiEndFunctionA、S=GetValue(a(1To10))B、S=GetValue(a)C、S=GetValue(a(10))D、S=GetValuea標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析11、計(jì)算z的值，當(dāng)x大于等于y時(shí)，z=x；否則z=y。下列語(yǔ)句錯(cuò)誤的是()A、Ifx＞=yThenz=x:z=yB、Ifx＞=yThenz=xElsez=yC、z=y:Ifx＞=yThenz=xD、Ifx＜yThenz=yElsez=x標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析12、在窗體上畫(huà)一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程：PrivateSubCommand1_Click()StaticxAsIntegerClsFori=1To2y=y+xx=x+2NextPrintx,yEndSub程序運(yùn)行后，連續(xù)三次單擊Command1按鈕后，窗體上顯示的是()。A、42B、1218C、1230D、46標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析13、設(shè)有如下程序段：x=2Fori=1To10Step2x=x+iNext運(yùn)行以下程序后，x的值是()。A、26B、27C、38D、57標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析14、在窗體上添加一個(gè)文本框，名為text1，然后編寫(xiě)如下的load事件過(guò)程，則程序的運(yùn)行結(jié)果是()。PrivateSubForm_LoadText1.Text=""Text1.SetFocusFork=1to5t=t*kNextkText1.Text=tEndSubA、在文本框中顯示120B、文本框中仍為空C、在文本框中顯示1D、出錯(cuò)標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析15、在窗體上繪制一個(gè)命令按鈕和一個(gè)文本框，名稱(chēng)分別為Command1和Text1，然后編寫(xiě)如下程序：PrivateSubCommand1_Click()a=InputBox("請(qǐng)輸入日期(1～31)")t="旅游景點(diǎn)："_&IIf(a＞0Anda＜=10，"長(zhǎng)城:,"")_&IIf(a＞10Anda＜=20，"故宮","")_&IIf(a＞20Anda＜=31，"頤和園:,"")Text1.Text=tEndSub程序運(yùn)行后，如果從鍵盤(pán)上輸入16，則在文本框中顯示的內(nèi)容是()A、旅游景點(diǎn)：長(zhǎng)城故宮B、旅游景點(diǎn)：長(zhǎng)城頤和園C、旅游景點(diǎn)：頤和園D、旅游景點(diǎn)：故宮標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析16、在窗體上畫(huà)一個(gè)名稱(chēng)為T(mén)xtA的文本框，然后編寫(xiě)如下的事件過(guò)程：PrivateSubTxtA_KeyPress(keyAsciiAsInteger)EndSub若焦點(diǎn)位于文本框中，則能夠觸發(fā)KeyPress事件的操作是()。A、單擊鼠標(biāo)B、雙擊文本框C、鼠標(biāo)滑過(guò)文本框D、按下鍵盤(pán)上的某個(gè)鍵標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析17、在窗體上畫(huà)兩個(gè)文本框，其名稱(chēng)分別為T(mén)ext1和Text2，然后編寫(xiě)如下程序：PrivateSubForm_Load0ShowText1.Text=""Text2.Text=""Text1.SetFocusEndSubPrivateSubText1Change()Text2.Text=Mid(Text1.Text,8)EndSub程序運(yùn)行后，如果在文本框Text1中輸入BeijingChina，則在文本框Text2中顯示的內(nèi)容是()。A、BeijingChinaB、ChinaC、BeijingD、BeijingC標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析18、在一個(gè)窗體上添加一命令按鈕控件，名為Command1，事件過(guò)程如下，則該過(guò)程的執(zhí)行結(jié)果是()。optionbase1PrivateSubCommand1_Ctick()Dima(5)AsIntegerDimkAsIntegerDimtotalAsIntegera(1)=2a(2)=5a(3)=4a(4)=10a(5)=6Fork=1To5total=total+a(k)NextkPrinttotalEndSubA、10B、15C、27D、35標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析19、在窗體上畫(huà)1個(gè)命令按鈕，名稱(chēng)為Command1，然后編寫(xiě)如下程序：DimFlagAsBooleanPrivateSubCommand1_Click()DimintNumAsIntegerintNum=InputBox("請(qǐng)輸入：")IfFlagThenPrintf(intNum)EndIfEndSubFunctionf(xAsInteger)AsIntegerIfX＜10ThenY=XElseY=X+10EndIff=YEndFunctionPrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)Flag=TrueEndSub運(yùn)行程序，首先單擊窗體，然后單擊命令按鈕，在輸入對(duì)話(huà)框中輸入5，則程序的輸出結(jié)果為()。A、0B、5C、15D、無(wú)任何輸出標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析20、在窗體上用復(fù)制、粘貼的方法建立了一個(gè)命令按鈕數(shù)組，數(shù)組名為M1。設(shè)窗體Form1標(biāo)題為“myform1”，雙擊控件數(shù)組中的第3個(gè)按鈕，打開(kāi)代碼編輯器，寫(xiě)下如下代碼：PrivaeSubM1_Click(IndexAsInteger)Form1.Caption="myform2"EndSub運(yùn)行時(shí)，單擊按鈕數(shù)組中的第1個(gè)按鈕，窗本標(biāo)題為()。A、Form1B、M1C、myform1D、myform2標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析21、下面程序段執(zhí)行結(jié)果為()。x=Int(Rnd()+4)SelectCasexCase5Print"excellent"Case4Print"good"Case3Print"pass"CaseElsePrint"fail"EndSelectA、excellentB、goodC、passD、fail標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析22、Sub過(guò)程與Function過(guò)程最根本的區(qū)別是（）。A、Sub過(guò)程名稱(chēng)與Function過(guò)程名稱(chēng)的格式不統(tǒng)一B、Function過(guò)程可以有參數(shù)，Sub過(guò)程不可以C、兩種過(guò)程參數(shù)的傳遞方式不同D、Sub過(guò)程的過(guò)程名稱(chēng)不能有返回值，而Function過(guò)程能通過(guò)過(guò)程名稱(chēng)得到返回值標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析23、下列選項(xiàng)中不符合良好程序設(shè)計(jì)風(fēng)格的是（）。A、源程序要文檔化B、數(shù)據(jù)說(shuō)明的次序要規(guī)范化C、避免濫用goto語(yǔ)句D、模塊設(shè)計(jì)要保證高耦合、高內(nèi)聚標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析24、函數(shù)String(n,"str")的功能是（）。A、把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串B、返回由n個(gè)字符組成的字符串C、從字符串中取出n個(gè)字符D、從字符串中第n個(gè)字符的位置開(kāi)始取子字符串標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析25、以下關(guān)于菜單的敘述中，錯(cuò)誤的是（）。A、在程序運(yùn)行過(guò)程中可以增加或減少菜單項(xiàng)B、如果把一個(gè)菜單項(xiàng)的Enabled屬性設(shè)置為False，則可刪除該菜單項(xiàng)C、彈出式菜單在菜單編輯器中設(shè)計(jì)D、利用控件數(shù)組可以實(shí)現(xiàn)菜單項(xiàng)的增加或減少標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析26、設(shè)有如下語(yǔ)句：str1=IntputBox("輸入"，""，"練習(xí)")從鍵盤(pán)上輸入字符串“示例”后，str1的值是（）。A、輸入C、練習(xí)D、示例標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析27、以下（）程序段可以實(shí)施X、Y變量值的互換。A、Y=X:X=YB、Z=X:Y=Z:X=YC、Z=X:X=Y:Y=ZD、Z=X:W=Y:Y=Z:X=Y標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析28、下列表達(dá)式中，（）的運(yùn)算結(jié)果與其他3個(gè)不同。A、10g(Exp(-3.5))B、Int(-3.5)+0.5C、-3.5D、Sin(30*3.14/180)標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析29、andomize語(yǔ)句的功能是（）。A、產(chǎn)生個(gè)(0，1)之間的隨機(jī)小數(shù)B、產(chǎn)生一個(gè)[1，10]之間的隨機(jī)整數(shù)C、產(chǎn)生一個(gè)(-1，1)之間的隨機(jī)小數(shù)D、產(chǎn)生新的隨機(jī)整數(shù)標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析30、不能脫離控件(包括窗體)而獨(dú)立存在的過(guò)程是（）。A、事件過(guò)程B、通用過(guò)程C、Sub過(guò)程D、函數(shù)過(guò)程標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析31、使用ReDim/Preserve可以改變數(shù)組（）。A、最后一維的大小B、第一維的大小C、所有維的大小D、改變維數(shù)和所有維的大小標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析32、文本框控件中將Text的內(nèi)容全部顯示為所定義的字符的屬性項(xiàng)是（）。A、PasswordCharB、需要編程來(lái)實(shí)現(xiàn)C、PasswordD、以上都不是標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析33、關(guān)于多行結(jié)構(gòu)條件語(yǔ)句的執(zhí)行過(guò)程，正確的是（）。A、各個(gè)條件所對(duì)應(yīng)的〈語(yǔ)句塊〉中，一定有一個(gè)〈語(yǔ)句塊〉被執(zhí)行B、找到〈條件〉為T(mén)rue的第一個(gè)入口，便從此開(kāi)始執(zhí)行其后的所有〈語(yǔ)句塊〉C、若有多個(gè)〈條件〉為T(mén)rue，則它們對(duì)應(yīng)的〈語(yǔ)句塊〉都被執(zhí)行D、多行選擇結(jié)構(gòu)中的〈語(yǔ)句塊〉，有可能任何一個(gè)〈語(yǔ)句塊〉都不被執(zhí)行標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析34、執(zhí)行x$=InputBox("請(qǐng)輸入x的值")時(shí)，在彈出的對(duì)話(huà)框中輸入123，在列表框List1選中1個(gè)列表項(xiàng)(數(shù)據(jù)為456)，使y的值是123456的語(yǔ)句是（）。A、y=x$+List1.List(O)B、y=x$+List1.List(1)C、y=Val(x$)+Val(List1.List(0))D、y=Val(x$)&Val(List1.List(1))標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析二、公共基礎(chǔ)填空題(本題共11題，每題1.0分，共11分。)35、以下程序的功能是將字符串“12345”逆序打印出來(lái)。請(qǐng)?jiān)诋?huà)線(xiàn)處填上適當(dāng)?shù)膬?nèi)容使程序完整。Functionrev(newl)AsStringb=Mid(_______,1,1)ifb=""thenrev=""elserev=rev(Mid(new1,2))+_______endifEndFunctionPrivateSubForm_Click()old="12345"PrintoldPrintrev(old)EndSub標(biāo)準(zhǔn)答案：new1b知識(shí)點(diǎn)解析：暫無(wú)解析36、以下程序代碼實(shí)現(xiàn)單擊命令按鈕Command1時(shí)生成20個(gè)(0，100)之間的隨機(jī)整數(shù)，存于數(shù)組中，打印數(shù)組中大于50的數(shù)，并求這些數(shù)的和。PrivateSubCommand.Click()Dimarr(1To20)Fori=1To20arr(i)=_______Text1.Text=Text1.Text&arr(i)&Chr(13)&chr(10)NextiSum=0ForEachxInarrIfx＞50ThenPrintTab(20);xSum=______EndIfNextxPrintTab(20);"Sum=";SumEndSub標(biāo)準(zhǔn)答案：Int(Rnd*99+1)Sum+x知識(shí)點(diǎn)解析：暫無(wú)解析37、圖案■表示______。標(biāo)準(zhǔn)答案：?jiǎn)芜x按鈕知識(shí)點(diǎn)解析：暫無(wú)解析38、要選擇多個(gè)不相鄰的控件，按住______或SHIFT鍵不放，再單擊要選擇的控件。標(biāo)準(zhǔn)答案：Ctrl知識(shí)點(diǎn)解析：暫無(wú)解析39、語(yǔ)句Print5*5\5/5的輸出結(jié)果是______。標(biāo)準(zhǔn)答案：25知識(shí)點(diǎn)解析：暫無(wú)解析40、表達(dá)式Fix(-12.08)+Int(-23.82)的值為_(kāi)_____。標(biāo)準(zhǔn)答案：-36知識(shí)點(diǎn)解析：暫無(wú)解析41、數(shù)據(jù)獨(dú)立性分為邏輯獨(dú)立性與物理獨(dú)立性。當(dāng)數(shù)據(jù)的存儲(chǔ)結(jié)構(gòu)改變時(shí)，其邏輯結(jié)構(gòu)可以不變，因此，基于邏輯結(jié)構(gòu)的應(yīng)用程序不必修改，稱(chēng)為_(kāi)_____。標(biāo)準(zhǔn)答案：物理獨(dú)立性知識(shí)點(diǎn)解析：暫無(wú)解析42、在程序運(yùn)行時(shí)，如果將框架的______屬性設(shè)為False，則框架的標(biāo)題呈灰色，同時(shí)框架內(nèi)的所有對(duì)象均被屏蔽，不允許用戶(hù)對(duì)其進(jìn)行操作。標(biāo)準(zhǔn)答案：Enabled知識(shí)點(diǎn)解析：暫無(wú)解析43、VB6.0保存工程文件的快捷鍵是______。標(biāo)準(zhǔn)答案：Ctrl+S知識(shí)點(diǎn)解析：暫無(wú)解析44、擴(kuò)展名為.bas的文件稱(chēng)為_(kāi)_____。標(biāo)準(zhǔn)答案：程序模塊文件知識(shí)點(diǎn)解析：暫無(wú)解析45、圖像框控件使用系統(tǒng)資源比圖片框______。標(biāo)準(zhǔn)答案：少知識(shí)點(diǎn)解析：暫無(wú)解析VB筆試模擬試卷第3套一、公共基礎(chǔ)選擇題(本題共33題，每題1.0分，共33分。)1、有如下一個(gè)Sub過(guò)程：Submlt(ParamArraynumbers())n=1ForEachxInnumbersn=n*xNextxPrintnEndSub在一個(gè)事件過(guò)程中如下調(diào)用該Sub過(guò)程：PrivateSubCommand1_Click()DimaAsIntegerDimbAsIntegerDimcAsIntegerDimdAsIntegera=1b=2c=3d=4mlta,b,c,dEndSub該程序的運(yùn)行結(jié)果為()。A、12B、24C、36D、48標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析2、假定有如下事件過(guò)程：PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenPopupMenupopFormEndIfEndSub則以下描述中錯(cuò)誤的是()。A、該過(guò)程的功能是彈出一個(gè)菜單B、PopForm是在菜單編輯器中定義的彈出式菜單的名稱(chēng)C、參數(shù)X、Y指明鼠標(biāo)的當(dāng)前位置D、Button=2表示按下的是鼠標(biāo)左鍵標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析3、窗體上有一個(gè)命令按鈕，命令按鈕的單擊事件過(guò)程如下。運(yùn)行程序后，單擊命令按鈕，輸出結(jié)果是()。PrivateSubCommand1_Clcik()Dimaa=Array(1,2,3,4,5)Fork=1To4s=s+a(k)NextkPrintsEndSubA、10B、14C、15D、120標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析4、設(shè)有以下循環(huán)結(jié)構(gòu)Do循環(huán)體LoopWhile〈條件〉則以下敘述中錯(cuò)誤的是()。A、若“條件”是一個(gè)為0的常數(shù)，則一次也不執(zhí)行循環(huán)體B、“條件”可以是關(guān)系表達(dá)式、邏輯表達(dá)式或常數(shù)C、循環(huán)體中可以使用ExitDo語(yǔ)句D、如果“條件”總是為T(mén)rue，則不停地執(zhí)行循環(huán)體標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析5、在窗體上畫(huà)一個(gè)名稱(chēng)為T(mén)ext1的文本框，一個(gè)名稱(chēng)為Command1的命令按鈕，然后編寫(xiě)如下事件過(guò)程和通用過(guò)程：PrivateSubCommand1_Click()n=Val(Text1.Text)ifn\2=n/2Thenf=f1(n)Elsef=f2(n)EndIfPrintf;nEndSubPublicFunctionf1(ByRefx)x=x*xf1=x+xEndFunctionPublicFunctionf2(ByValx)x=x*xf2=x+x+xEndFunction程序運(yùn)行后，在文本框中輸入6，然后單擊命令按鈕，窗體上顯示的是()。A、7236B、10836C、726D、1086標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析6、設(shè)有如下程序：OptionBase1PrivateSubCommand1_Click()Dima(10)AsIntegerDimnAsIntegern=InputBox("輸入數(shù)據(jù)")Ifn＜10ThenCallGetArray(a,n)EndIfEndSubPrivateSubGetArray(b()AsInteger,nAsInteger)Dimc(10)AsIntegerj=0Fori=1Tonb(i)=Clnt(Rnd()*100)Ifb(i)/2=b(i)\2Thenj=j+1c(j)=b(i)EndIfNextPrintjEndSub以下敘述中錯(cuò)誤的是()。A、數(shù)組b中的偶數(shù)被保存在數(shù)組C中B、程序運(yùn)行結(jié)束時(shí)，在窗體上顯示的是c數(shù)組中元素的個(gè)數(shù)C、GetArray過(guò)程的參數(shù)n是按值傳送的D、如果輸入的數(shù)據(jù)大于10，則窗體上不顯示任何信息標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析7、下列關(guān)于DO…Loop語(yǔ)句的敘述不正確的是()。A、Do…loop語(yǔ)句采用邏輯表達(dá)式來(lái)控制循環(huán)體執(zhí)行的次數(shù)B、當(dāng)Dowhile…Loop或Dountil…Loop語(yǔ)句中while或until后的表達(dá)式的值為true或非零時(shí)，循環(huán)繼續(xù)C、Do…Loopwhile語(yǔ)句與Do…Loopuntil語(yǔ)句都至少執(zhí)行一次循環(huán)體D、Dowhile…Loop語(yǔ)句與Dountil…Loop語(yǔ)句可能不執(zhí)行循環(huán)體標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析8、下列程序段的執(zhí)行結(jié)果為()。a=1b=1ForI=1To3f=a+ba=bb=fPrintf：NextIA、236B、235C、234D、228標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析9、在運(yùn)行階段，要在文本框Text1獲得焦點(diǎn)時(shí)選中文本框中所有內(nèi)容，對(duì)應(yīng)的事件過(guò)程是()A、PrivateSubText1_GotFocus()Text1.SelStart=0Text1.SelStart=Len(Text1.text)EndSubB、PrivateSubText1_LostFocus()Text1.SelStart=0Text1.SelStart=Len(Text1.text)EndsubC、PrivateSubText1_Change()Text1.SelStart=0Text1.SelStart=Len(Text1.text)EndsubD、PrivateSubText1_SetFocus()Text1.SelStart=0Text1.SelStart=Len(Text1.text)Endsub標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析10、有如下程序：PrivateSubForm_Click()DimCheck,CounterCheck=TrueCounter=0DoDoWhileCounter＜20Counter=Counter+1IfCounter=10ThenCheck=FalseExitDoEndIfLoopLoopUntilCheck=FalsePrintCounter,CheckEndSub程序運(yùn)行后，單擊窗體，輸出結(jié)果為()。A、150B、20-1C、10TrueD、10False標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析11、下列程序段()能夠正確實(shí)現(xiàn)條件：如果X＜Y則A=15，否則A=-15。A、IfX＜YThenA=15A=-15PrinAB、IfX＜YThenA=15:PrintAA=-15:PrintAC、IfX＜YThenA=1.5:PrintAElseA=-15:PrintAEndIfD、IfX＜YThenA=15ElseA=-15PrintAEndIf標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析12、編寫(xiě)如下事件過(guò)程：PrivateSubForm-MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfShift=6AndButton=2ThenPrint"Hello"EndIfEndSub程序運(yùn)行后，為了在窗體上輸出“Hello”，應(yīng)在窗體上執(zhí)行以下()操作。A、同時(shí)按下Shift鍵和鼠標(biāo)左鍵B、同時(shí)按下Shift鍵和鼠標(biāo)右鍵C、同時(shí)按下Ctrl、Alt鍵和鼠標(biāo)左鍵D、同時(shí)按下Ctrl、Alt鍵和鼠標(biāo)右鍵標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析13、閱讀下面的程序段：Fori=1To3Forj=1ToiFork=jTo4a=a+1NextkNextjNexti執(zhí)行上面的三重循環(huán)后，a的值為()。A、9B、14C、20D、21標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析14、下列選項(xiàng)中不屬于結(jié)構(gòu)化程序設(shè)計(jì)方法的是（）。A、自頂向下B、逐步求精C、模塊化D、可復(fù)用標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析15、在文本框中，當(dāng)用戶(hù)鍵入一個(gè)字符時(shí)，能同時(shí)引發(fā)的事件的是（）。A、KeyPress和ClickB、KeyPress和LostFocusC、KeyPress和ChangeD、Change和LostFocus標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析16、若要將某命令按鈕設(shè)置為默認(rèn)命令按鈕。則應(yīng)設(shè)置為T(mén)rue的屬性是（）。A、ValueB、CancelC、DefaultD、Enabled標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析17、如果要在程序代碼中為圖片框動(dòng)態(tài)加載和清除圖像，可以利用（）函數(shù)。A、InputBoxB、InputC、LoadPictureD、PaintPicture標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析18、以下描述正確的是（）。A、過(guò)程的定義可以嵌套，但過(guò)程的調(diào)用不能嵌套B、過(guò)程的定義不可以嵌套，但過(guò)程的調(diào)用可以嵌套C、過(guò)程的定義和過(guò)程的調(diào)用均可以嵌套D、過(guò)程的定義和過(guò)程的調(diào)用均不能嵌套標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析19、VisualBasic根據(jù)計(jì)算機(jī)訪(fǎng)問(wèn)文件的方式將文件分成三類(lèi)，其中不包括（）。A、順序文件B、Unix文件C、二進(jìn)制文件D、隨機(jī)文件標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析20、以下能夠觸發(fā)文本框Change事件的操作是（）。A、文本框失去焦點(diǎn)B、文本框獲得焦點(diǎn)C、設(shè)置文本框的焦點(diǎn)D、改變文本框的內(nèi)容標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析21、在用通用對(duì)話(huà)框控件建立”打開(kāi)”或”保存”文件對(duì)話(huà)框時(shí)，如果需要指定文件列表框所列出的文件類(lèi)型是文本文件(即.txt文件)，則正確的描述格式是（）。A、text(.txt)|(*.txt)B、文本文件(.txt)|(.txt)C、text(.txt)FFFFF||(*.txt)D、text(.txt)(*.text)標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析22、為啟動(dòng)定時(shí)器控件，需要設(shè)置定時(shí)器的屬性是（）。A、NameB、IntervalC、LeftD、Top標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析23、已知變量X、Y為整型，且x=4，y=12，S為字符串型，且s=a，1blok為標(biāo)簽控件，下列賦值語(yǔ)句合法的是（）。A、x=1blok.CaptionB、Lblok.caption=Str(x)C、x*3=yD、Y=x*s標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析24、以下敘述中錯(cuò)誤的是（）。A、一個(gè)工程可以包括多種類(lèi)型的文件B、VisualBasic應(yīng)用程序既能以編譯方式執(zhí)行，也能以解釋方式執(zhí)行C、程序運(yùn)行后，在內(nèi)存中只能駐留一個(gè)窗體D、對(duì)于事件驅(qū)動(dòng)型應(yīng)用程序，每次運(yùn)行時(shí)的執(zhí)行順序可以不一樣標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析25、在窗體模塊的通用聲明段中聲明變量時(shí)，不能使用（）關(guān)鍵字。A、DimB、PublicC、PrivateD、Static標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析26、以下關(guān)于多重窗體程序的敘述中，錯(cuò)誤的是（）A、用Hide方法不但可以隱藏窗體，而且能清除內(nèi)存中的窗體B、在多重窗體程序中，各窗體的菜單是彼此獨(dú)立的C、在多重窗體程序中，可以根據(jù)需要指定啟動(dòng)窗體D、對(duì)于多重窗體程序，需要單獨(dú)保存每個(gè)窗體標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析27、要使控件與框架捆綁在一起，以下操作正確的是（）。A、要在窗體不同位置上分別畫(huà)一框架和控件，再將控件拖到框架上B、在窗體上畫(huà)好控件，再畫(huà)框架將控件框起來(lái)C、在窗體上畫(huà)好框架，再在框架中畫(huà)控件D、在窗體上畫(huà)好框架，再雙擊工具箱中的控件標(biāo)準(zhǔn)答案：C知識(shí)點(diǎn)解析：暫無(wú)解析28、下面4個(gè)語(yǔ)句中，能打印顯示40*90字樣的是（）。A、Print"40*90"B、Print40*90C、PrintChr$(40)+"*"+CHr$(90)D、PrintVal("40")*Val("90")標(biāo)準(zhǔn)答案：A知識(shí)點(diǎn)解析：暫無(wú)解析29、在設(shè)計(jì)階段，雙擊窗體Form1的空白處，打開(kāi)代碼窗口，顯示（）事件過(guò)程模板。A、Form_ClickB、Form_LoadC、Form1_ClickD、Foma1_Load標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析30、程序設(shè)計(jì)語(yǔ)言的基本成分是數(shù)據(jù)成分、運(yùn)算成分、控制成分和（）。A、對(duì)象成分B、變量成分C、語(yǔ)句成分D、傳輸成分標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析31、下列各選項(xiàng)說(shuō)法錯(cuò)誤的一項(xiàng)是（）。A、文件對(duì)話(huà)框可分為兩種，即打開(kāi)(Open)文件對(duì)話(huà)框和保存(SaveAs)文件對(duì)話(huà)框B、通用對(duì)話(huà)框的Name屬性的默認(rèn)值為CommonDialogX，此外，每種對(duì)話(huà)框都有自己的默認(rèn)標(biāo)題C、打開(kāi)文件對(duì)話(huà)框可以讓用戶(hù)指定一個(gè)文件，由程序使用；而用保存文件對(duì)話(huà)框可以指定一個(gè)文件，并以這個(gè)文件名保存當(dāng)前文件D、DefaultEXT屬性和DialogTitle屬性都是打開(kāi)對(duì)話(huà)框的屬性，但非保存對(duì)話(huà)框的屬性標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析32、下面關(guān)于多重窗體的敘述中，正確的是（）。A、作為啟動(dòng)對(duì)象的Main子過(guò)程只能放在窗體模塊中B、如果啟動(dòng)對(duì)象的Main子過(guò)程，則程序啟動(dòng)時(shí)不加載任何窗體，以后由該過(guò)程根據(jù)不同情況決定是否加載及加載哪一個(gè)窗體C、沒(méi)有啟動(dòng)窗體，程序不能運(yùn)行D、以上都不對(duì)標(biāo)準(zhǔn)答案：B知識(shí)點(diǎn)解析：暫無(wú)解析33、應(yīng)用程序設(shè)計(jì)完成后，應(yīng)將程序保存，保存的過(guò)程是（）。A、只保存窗體文件即可B、只保存工程文件即可C、先保存工程文件，之后還要保存窗體文件D、先保存窗體文件(或標(biāo)準(zhǔn)模塊文件)，之后還要保存工程文件標(biāo)準(zhǔn)答案：D知識(shí)點(diǎn)解析：暫無(wú)解析二、公共基礎(chǔ)填空題(本題共13題，每題1.0分，共13分。)34、下列程序計(jì)算Sn的值。Sn=a+aa+aaa+…+aaa…a，其中最后一項(xiàng)為n個(gè)。例如：a=5，n=4時(shí)，則Sn=5+55+555+5555。請(qǐng)?jiān)诳瞻滋幪钊脒m當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。PrivateSubCommand1_Click()DimaAsInteger，nAsInteger，CoutAsIntegerDimSnAsLong，TnAsLongCout=1Sn=0Tn=0a=InputBox("請(qǐng)輸入a的值：")n=InputBox("請(qǐng)輸入n的值!")DOTn=Tn*10+aSn=Sn+TnCout=Cout+1______Debug.Printa,n,SnEndSub標(biāo)準(zhǔn)答案：Loopwhilecout＜=n或LoopUntilCout=n+1知識(shí)點(diǎn)解析：a和n的值必須已知，表達(dá)式才能計(jì)算。但程序中沒(méi)有給變量n賦值的語(yǔ)句，可見(jiàn)第一個(gè)空白行應(yīng)該填寫(xiě)給n賦值的語(yǔ)句。Do循環(huán)應(yīng)該有與之相對(duì)應(yīng)的終端語(yǔ)句，可見(jiàn)第二個(gè)空白行應(yīng)填寫(xiě)Do循環(huán)的終端語(yǔ)句，即While語(yǔ)句，同時(shí)要構(gòu)造出控制循環(huán)的＜條件＞。程序中有四個(gè)賦值語(yǔ)句，其中有一個(gè)計(jì)數(shù)語(yǔ)句Cout=Cout+1，可見(jiàn)控制循環(huán)次數(shù)的變量應(yīng)是Cout。35、用戶(hù)可以用______語(yǔ)句定義自己的數(shù)據(jù)類(lèi)型。標(biāo)準(zhǔn)答案：Type知識(shí)點(diǎn)解析：用戶(hù)可以用Type語(yǔ)句來(lái)定義數(shù)據(jù)類(lèi)型，格式是：Type數(shù)據(jù)類(lèi)型名數(shù)據(jù)類(lèi)型元素名As類(lèi)型名數(shù)據(jù)類(lèi)型元素名As類(lèi)型名……EndType其中“數(shù)據(jù)類(lèi)型名”是要定義的數(shù)據(jù)類(lèi)型的名字，其命名規(guī)則和變量的命名規(guī)則相同；“數(shù)據(jù)類(lèi)型元素名”也遵守相同的規(guī)則，且不能是數(shù)組名；“類(lèi)型名”可以是任何基本數(shù)據(jù)類(lèi)型，也可以是用戶(hù)定義的類(lèi)型。36、下列程序運(yùn)行后的輸出結(jié)果是______。PrivateSubf(k,s)s=1Forj=1TokS=S*jNextEndSubPrivateSubCommand1_Click()Sum=0Fori=1To3Callf(i,s)Sum=Sum+sNextPrintSumEndSub標(biāo)準(zhǔn)答案：9知識(shí)點(diǎn)解析：本題考查的重點(diǎn)是在子過(guò)程的調(diào)用過(guò)程中，虛實(shí)參數(shù)的傳送問(wèn)題，變量s按十傳送。子過(guò)程f()求n!，sum的計(jì)算過(guò)程