/ＶB必做測(cè)驗(yàn)及答案目錄ＴO(shè)C＼o”1—3”\h\z\uHYPERLIＮK\l”_Toc3541６3211”實(shí)驗(yàn)４選擇結(jié)構(gòu)程序設(shè)計(jì) ＰＡＧEREF_Tｏｃ3５４１63２１1＼h2HYＰＥRLINK＼l”_Ｔoc3５4163212"實(shí)驗(yàn)6循環(huán)結(jié)構(gòu)程序設(shè)計(jì) PＡGEREF_Toc35４163212＼h6HYＰＥRLINＫ＼l"_Ｔoc354163213"實(shí)驗(yàn)７數(shù)組 ＰAGEREＦ_Ｔoc354163213\ｈ8HＹPＥＲLＩNK\ｌ"＿Toc35４16３2１４”實(shí)驗(yàn)9常用控件 ＰＡGERＥF＿Toc354163214\h１0實(shí)驗(yàn)4選擇結(jié)構(gòu)程序設(shè)計(jì)1.若整型變量a的值為２、b的值為3，則下列程序段執(zhí)行后整型變量c的值為____＿_(dá)。Ifａ＞５tｈenIｆb〈4theｎｃ=a－bEｌsｅc=b—aEndｉfＥｌseIｆb>３thenc=a*ｂＥｌsec＝amodｂEndifa）２ｂ)—１c)1ｄ）6答案：A2.下列程序的執(zhí)行結(jié)果為_＿_(dá)__.A＝100:b=50Ifa>bＴｈｅnａ=a—bElｓeb＝b＋ａEｎｄifPｒiｎtａａ）50b)10０c）２00d）1０答案：A３．以下程序輸出1到1０00之間所有的偶數(shù)之和，請(qǐng)補(bǔ)充完該程序。PrivateＳｕｂCoｍmaｎd_Cｌick（)DimxAｓDoubleForＩ=0Tｏ1０00If____Thｅｎx=x+IＥnｄIfＮeｘｔIPriｎtxEndＳuba)iMoｄ2=0b）xMｏd２=0ｃ)IMoｄ2<〉０d）xMod2〈>0答案：A４．下列程序段的執(zhí)行結(jié)果為。ｘ=Int（Ｒnd+4)SeｌｅctCａsｅxCase3Priｎt”優(yōu)秀＂Case4Ｐrｉnt"良好"Ｃase5Prｉnｔ”合格”ＣasｅElsePｒinｔ”不合格"EｎdSelｅcｔＡ)優(yōu)秀B）良好Ｃ)合格D）不合格答案：B5。以下程序段的執(zhí)行結(jié)果是_＿_(dá)__.X=2：y=1Ｉfx*y＜１Theｎy=ｙ-1Eｌsey=—1Ｐriｎty-ｘ>0EndIfa)Ｔu(píng)reb）Fａlsec)—1ｄ）1答案：B6．設(shè)計(jì)兩個(gè)ChｅckBox,一個(gè)顯示粗體，一個(gè)顯示斜體，通過(guò)對(duì)CheｃkBoｘ的選擇，在一個(gè)文本框中顯示相應(yīng)效果的文本，完成下列程序.PｒivateSubFoｒm＿Lｏaｄ（)ption＝"顯示粗體”ptｉoｎ="顯示斜體"Text1。Teｘt="VisｕalＢasic6.０＂EnｄSuｂＰriｖateSubCｈｅcｋ１＿Cｌｉcｋ(）IfChecｋ１．Ｖaｌue=1ThenText1。FontＢolｄ=TrueＥｌseTeｘt1.ＦｏntＢoｌd=FａlseＥndIfEnｄＳｕbPrivaｔeSubCｈeｃk2_Clicｋ()IfChecｋ2。Vaｌｕe=１ThenTｅxｔ1.ＦontItaliｃ=TｒueElseＴeｘt1。FonｔIｔaｌic=FaｌｓeＥｎdIfEｎdSub7。下列程序的作用是將三個(gè)數(shù)按從大到小進(jìn)行排序，請(qǐng)補(bǔ)充完該程序。Ｉfa〈bＴhｅnｄ＝a:a=b:ｂ=ｄEｎdIfＩfａ〈cThｅnd=a：ａ=ｃ:c＝ｄEndＩfIf___＿_(dá)Thｅｎd＝b：b=c：ｃ=dEｎdＩｆPrinｔa，ｂ,c答案：b〈c8。在下列關(guān)于SelectCａse的敘述中，錯(cuò)誤的是(

）

選擇一個(gè)答案a。Casｅ10To１０0表示判斷Is是否介于10與10０之間b。Ｃasｅ〝ａbｃ〞,〝ＡＢC〞表示判斷Is是否和〝abc〞、〝ABC〞兩個(gè)字符串中的一個(gè)相同c．Casｅ－7，0，100表示判斷Is是否等于字符串〝—７,0，１0０〞d.Case〝X〞表示判斷Iｓ是否為大寫字母Ｘ9。下列程序的執(zhí)行結(jié)果是（

）Ｘ＝５Ｙ=－20IfNｏｔX〉０TｈenＸ＝Y(jié)-3ＥlseY=Ｘ+3PrｉntX－Ｙ;Y-X選擇一個(gè)答案a.3-3b.-３3c。5－8d.２5-２51０。下列說(shuō)法正確與否:Ｉf語(yǔ)句中的條件表達(dá)式中只能使用關(guān)系或邏輯表達(dá)式選擇一個(gè)答案ａ.正確b．錯(cuò)誤1１.以下說(shuō)法正確與否：在情況語(yǔ)句中，各分支(即Ｃasｅ表達(dá)式)的先后順序無(wú)關(guān)。選擇一個(gè)答案a。錯(cuò)誤b。正確12．以下說(shuō)法正確與否：有If則必有與之對(duì)應(yīng)的Endｉf。選擇一個(gè)答案a．錯(cuò)誤ｂ．正確實(shí)驗(yàn)6循環(huán)結(jié)構(gòu)程序設(shè)計(jì)1。下列程序的執(zhí)行結(jié)果為_____。DimSＡsIntegｅｒ,nAsＩｎtｅｇerS=0:n=1DoWhileｎ〈=100S=Ｓ+nn=n+1LoopＰriｎtSa）505０ｂ)2500ｃ)3000d)4０00答案：A２.以下程序計(jì)算2到5０間所有偶數(shù)的和,請(qǐng)補(bǔ)充完該程序Submult（）DimSｕmＡsＩnｔegerSuｍ=0ＤimIaｓintegerＦoｒ___tｏ５0IfIＭOD2=_＿_(dá)Tｈｅn__＿ＮｅｘtＩＰrinｔsｕmＥnｄＳub答案：I＝２＃0#ＳUM＝SUM+I3．下列程序段的執(zhí)行時(shí)，共循環(huán)____次。Ｆora=０To1Ｆｏrb＝1Ｔｏ２Fｏrｃ=1Ｔo3I=I+１NexｔcNｅｘtbnexta答案：1２４。下列程序的執(zhí)行結(jié)果是__＿_(dá)。K=0FｏrI=１To3a=Ｉ^Ｉ^Ｋprinｔa；NeｘtIa)111ｂ）１2３c)00０d）1４9答案:A５。下列程序運(yùn)行后,輸出的結(jié)果為＿_(dá)＿_(dá)__。Ｂ=1Dowhiｌe(b<40)b=b＊(b+1)LooｐPｒiｎtba）４2b）39c）6d)１答案：A6。下列程序執(zhí)行后,變量s的值為__＿＿＿＿.DimsAsloｎg,xＡsIntｅgerｓ=0：x＝１DoＷhｉｌe（x<１０）s=s+xx=ｘ＋２LooｐＰｒintsａ)1０ｂ）2５c)50d）100答案：Ｂ7。當(dāng)變量ｘ=2，y=５時(shí),以下程序的輸出結(jié)果為＿＿_(dá)＿.Dountilｙ>5x=x＊ｙy=ｙ+1lｏｏpｐrintxａ）2b)５ｃ）１０d）2０答案:C8。執(zhí)行下面的程序,在窗體上顯示的輸出結(jié)果的第一行是(1５）,第二行是（16)。PriｖateSｕbＦorm_Cｌiｃk()DiｍaＡsＩnｔeｇer，bAsＩnteｇｅr,cＡｓＩntegerc=-2Foｒa=６To1Stepcａ=a+1?c＝ｃ－ab＝b+1ＮextaPｒｉｎtbＰrｉｎtcＥndSub答案:6－29９.要實(shí)現(xiàn)同樣的循環(huán)控制，在DoWhｉlｅ…Lｏop和Do…LoopＷhile循環(huán)結(jié)構(gòu)中給定的循環(huán)條件一樣的。該結(jié)論是否正確:選擇一個(gè)答案a。正確b.錯(cuò)誤10．Do…LooｐＷhiｌe語(yǔ)句實(shí)現(xiàn)循環(huán)時(shí)，不管條件真假，首先無(wú)條件地執(zhí)行一次循環(huán).該結(jié)論是否正確:選擇一個(gè)答案a。錯(cuò)誤ｂ。正確11．Ｄｏ…LoｏpUntil語(yǔ)句實(shí)現(xiàn)循環(huán)時(shí),只要條件是假,循環(huán)將一直進(jìn)行下去.該結(jié)論是否正確：選擇一個(gè)答案ａ。錯(cuò)誤b.正確1２.For循環(huán)語(yǔ)句正常結(jié)束(即不是通過(guò)ExitFor語(yǔ)句退出循環(huán)或強(qiáng)制中斷)其循環(huán)控制變量的值一定大于“終值”，并等于“終值"+“步長(zhǎng)”。該結(jié)論是否正確：選擇一個(gè)答案a.正確ｂ．錯(cuò)誤13．如果有多重Ｄo循環(huán)嵌套，位于最里層循環(huán)體語(yǔ)句中的EｘitDo語(yǔ)句可以退出所有的循環(huán)。該結(jié)論是否正確：

選擇一個(gè)答案a.正確ｂ．錯(cuò)誤實(shí)驗(yàn)７數(shù)組1。在窗體上畫一個(gè)命令按鈕(其Ｎame屬性為Commanｄ１),然后編寫如下代碼：PrivateＳubCoｍmand1_Clｉck(）Ｄima（５）Fｏri=0Tｏ4A（i)=i+1t=i+1Ｉｆt=３ＴhenPrinta(i）A（t－1)=a（i－2)ＥlseA(t）=a（i）EnｄｉfIｆi=3Thｅｎa（ｉ+１)=a(t-４）Ａ(4)=1Ｐrｉnｔa(i)ＮextiEｎdＳub程序運(yùn)行后，單擊命令按鈕,輸出結(jié)果是１2３１４1.2。設(shè)執(zhí)行以下程序段時(shí)依次輸入1、3、５，執(zhí)行結(jié)果為_＿_(dá)_＿。Ｄｉmａ（4)AｓIntｅgｅrDimb(４)AsInteｇerFoｒK＝0To2ａ（Ｋ+1）＝Ｖal（InputBoｘ(“請(qǐng)輸入數(shù)據(jù)：”)）b(3—Ｋ)=a（Ｋ＋1)NeｘtKPｒｉｎtb(K)a）1b）3 c）5d）0答案：A3。如果有數(shù)組聲明Dima（1０）AｓIntegｅr，則該數(shù)組共有_＿＿＿_(dá)_個(gè)元素.a）10b）11c)9d）不確定答案：B4．?dāng)?shù)組的下標(biāo)可取的變量類型是_____。a）日期型ｂ）字符型c)數(shù)值型d)可變型答案:Ｃ5．用以下語(yǔ)句Ｄｉmb(—2to4)assｔrinｇ所定義的數(shù)組的元素個(gè)數(shù)是__＿＿＿_(dá)_個(gè)。ａ）2b)4c）6d）7答案:Ｄ６.下列程序是將數(shù)組a的元素倒序交換,即第1個(gè)變?yōu)樽詈笠粋€(gè),第2個(gè)變?yōu)榈箶?shù)第２個(gè)，設(shè)數(shù)組中有10個(gè)元素完成下列程序.ＰrｉvatｅSubBaｃkwａrd(a()）DimiAｓIｎteger,TmpAsInteｇerForｉ=1To５Tｍp=a（i)ＮｅxtiEndＳub7．如下數(shù)組聲明語(yǔ)句,正確的是___＿_(dá)_。a）diｍａ[３，4］asintｉgｅrb）dima(3,4)aｓｓtrｉngc）dｉma（n,n）ａssiｎｇleｄ)diｍa(34)aｓinteger答案：Ｂ8.下列關(guān)于數(shù)組的說(shuō)法正確的是（

）選擇一個(gè)答案a。在VB中,數(shù)組只能在模塊中定義，不能在過(guò)程中定義ｂ.在VB中，一個(gè)數(shù)組中所包含的元素只能是相同類型的數(shù)據(jù)ｃ.在定義數(shù)組時(shí),數(shù)組的每一維元素的個(gè)數(shù)必須是常數(shù)，不能是變量或表達(dá)式d.同普通變量一樣，數(shù)組也可以不定義,先使用9.使用Ｄiｍ定義數(shù)組時(shí),其數(shù)組的上界或下界,可使用已賦值的變量。該結(jié)論是否正確：選擇一個(gè)答案a。正確ｂ.錯(cuò)誤10.數(shù)組的下界一定是大于0的整數(shù)。該結(jié)論是否正確:選擇一個(gè)答案a。錯(cuò)誤b。正確１1.可以在程序中多次使用ReDｉm語(yǔ)句來(lái)改變動(dòng)態(tài)數(shù)組的大小、維數(shù)和類型.該結(jié)論是否正確：選擇一個(gè)答案a。錯(cuò)誤b。正確1２.可以使用OptionBａse2語(yǔ)句把數(shù)組下標(biāo)下界的默認(rèn)值設(shè)置為2。該結(jié)論是否正確:選擇一個(gè)答案ａ．正確b。錯(cuò)誤實(shí)驗(yàn)９常用控件1。所有控件都有的屬性是_______，在程序中作為對(duì)象的標(biāo)識(shí)引用.a）Cａptｉonb）Valuec)Tｅxｔd)naｍe答案：Ｄ２.下列＿_(dá)_＿_(dá)＿_(dá)屬性用于設(shè)置或返回文本框中的文本.a）Ｃaｐｔｉｏnb）Texｔc)Ｎamｅｄ)DrａgIcｏｎ答案：B3?？梢杂米髌渌丶萜鞯目丶?？？)a）窗體控件，列表控件，圖像控件b）窗體控件，文本框控件,框架控件c)窗體控件,框架控件,圖片框控件d)窗體控件,標(biāo)簽控件，圖片控件答案：C4.以下不屬控件的一項(xiàng)是_____。a)文本框ｂ）標(biāo)簽框ｃ)列表框d）消息框答案：Ｄ５。改變控件在窗體中的上下位置應(yīng)修改控件的__＿_(dá)_屬性。a）Tｏpｂ)Lｅｆtc)Ｗidtｈd）Heigｈt答案:Ａ6。復(fù)選框控件其Vａlｕe屬性的可取值是_______。a）Trut和Falseb）0和1c)1、２、3ｄ）0、1、２答案：D7．如果有三個(gè)單選按鈕直接畫在窗體上，另有四個(gè)單選按鈕畫在框架中，則運(yùn)行時(shí),可以同時(shí)選中_＿_(dá)＿_(dá)_個(gè)選項(xiàng)按鈕（提示