武漢理工大學(xué)《計(jì)算機(jī)技術(shù)基礎(chǔ)(VB)(專科)(新)》期末在線考試答案

武漢理工大學(xué)《計(jì)算機(jī)技術(shù)基礎(chǔ)（VB）（專科）（新）》

期末在線考試答案一、問答（每題參考分值5分）1、編寫打印下列圖案的程序。*************************正確答案：PrivateSubI;orm_Click()Fori=1To5PrintTab(i);Forj=1To5Print〃*〃;NextjPrintNextiEndSubEndSub2、輸入x,計(jì)算y的值。l+3x(x>0)y=<Isin(2x-3)(x<0)正確答案：PrivateSubForm_Click()x=Val(InputBoxCX="))Ifx>=0Then26、數(shù)學(xué)關(guān)系3WxV10表示成正確的VB表達(dá)式為（）。3<=x<103<=xandx<10x>3orx<103<=xand<10答案：【B】27、下列聲明語句中錯(cuò)誤的是（）。A.Constvarl=123B.Dimvar2=,abc'Dima,basstringDimvar3asinteger答案：【B】28、下面正確的賦值語句是（）。y=nr23y二xx+y=30y=x+30答案：[D]29、下列（）對(duì)象具有編輯功能，即運(yùn)行時(shí)可以進(jìn)行輸入或修改。A.下拉式列表框B.下拉式組合框C.復(fù)選框D.標(biāo)簽答案：【B】30、如果整型變量c、d的值分別為8和6,則下列語句中ForI=ctod:PrintI：NextI循環(huán)體的執(zhí)行次數(shù)是（）。321D.O答案：【D】31、Dimbl,b2asboolean語句顯式聲明變量()。bl和b2都為布爾型變量bl是整型，b2是布爾型變量C.bl和b2都為是可變型變量D.bl是可變型，b2是布爾型變量答案：【D】32、下列程序段If(2*2=5)<(2*2=4)Then:Print“Trueisgreaterthanfalse”:Else:Print"Falseisgreaterthantrue”的運(yùn)行結(jié)果是().TrueisgreaterthanfalseFalseisgreaterthantrueFalseTrue答案：【B】33、()是由VisualBasic提供的一種專門的子程序，由對(duì)象本身所具有,反映該對(duì)象功能的內(nèi)部函數(shù)或過程。A.文件B.屬性C.方法D.窗體答案：【口34、用DimS(20)AsInteger語句定義的數(shù)組的元素個(gè)數(shù)是()。19202122答案：【C】35、下列關(guān)于For...Next語句的說法正確的是()。A.循環(huán)變量、初值、終值和步長都必須為數(shù)值型Step后的步長只能為正數(shù)C.初值必須小于終值D.初值必須大于終值答案：【A】36、改變控件在窗體中的上下位置應(yīng)修改該控件的（）屬性。TopLeftWidthRight答案：【A】37、當(dāng)文本框ScrollBars屬性值設(shè)置為1（水平滾動(dòng)條），卻沒有效果，原因是（）。A.文本框的MultiLine屬性為FalseB.文本框中沒有內(nèi)容C.文本框的MultiLine屬性為TrueD.文本框的Locked屬性為True答案：[A]38、通過文本框的（）屬性可以獲得當(dāng)前插入點(diǎn)所在的位置。PositionSelStartC.SelLengthD.Left答案：【B】39、若要向列表框新增列表項(xiàng)，則可使用的方法是（）。AddRemoveClearAdditem答案：【D】40、下列各項(xiàng)不是VisualBasic的基本數(shù)據(jù)類型的是（CharStringIntegerDouble答案：【A】41、下面的變量名合法的是（）。k%namenamek-name答案：【C】42、表達(dá)式16/4-2-3*8/4Mod5\2的值為（）。21420D.4答案：【D】43、（）對(duì)象能使用print方法。A.文本框B.命令按鈕C.圖片框D.標(biāo)簽答案：【口44、若i的初值為8,則下列循環(huán)語句的循環(huán)次數(shù)為（）次。DoWhilei<=17i=i+2LoopA3次B.4次C.5次6次答案：【口45、在下列四個(gè)式子中，非法的VisualBasic表達(dá)式是()。xyz=absx>3+3x+y=51000101答案：【口46^假設(shè)有以下程序段For1=1to3:Forj=5to1Step-1:PrintI+j:Nextj：NextI則語句PrintI+j的執(zhí)行次數(shù)以及I、j的值分別是()。1530154014301440答案：【B】47、在VisualBasic中下面的四個(gè)數(shù)組聲明語句，正確的是()。A.Dima[10]Deffn(10)Dima(10)Dimensiona(10)答案：【口48、下列程序段s=0:fori=9to42step11:s=s+i:next:ifi>50thens=s+ielses=s-i運(yùn)行后s的結(jié)果為()。167139144155答案：【D】49、已知A$="l2345678”,則表達(dá)式Vai(Left(A$,4)+Mid(A$,4,2))的值為()。68答案：[A]50、用于從字符串右邊截取字符的函數(shù)是()。Right()Trim()Left()Ltrim()答案：【A】y=1+3*xElsey=Sin(2*x-3)/5EnclIfPrintyEndSub3、用InputBox函數(shù)輸入三個(gè)數(shù)，選出其中的最大數(shù)和最小數(shù)，顯示于窗體上。正確答案：PrivateSubForm_Click()a=Vai(InputBox(〃a="))b=Vai(InputBox(，，b=z，))c=Vai(InputBox("c="))Max=a:Min=aIfbIfb>MaxIfb>MaxThenMax=bIfb>MaxThenMax=bIfc>MaxThenMax=cIfb<MinThenMin=bIfc<MinThenMin=cPrint"Max=〃；MaxPrint〃Min=";MinEndSub4、輸入x,計(jì)算y的值。5+8x(x>0)9sin(3x+7)(x<0)正確答案：PrivateSubForm_Click()x=Vai(InputBox(ZZX=//))Ifx>=0Theny=5+8*xElsey=9*Sin(3*x+7)EndIfPrintyEndSub5、勾股定理中三個(gè)數(shù)的關(guān)系是：a2+b2=c2,編寫程序，輸出1到30以內(nèi)滿足上述關(guān)系的整數(shù)組合，打印在窗體上，例如3,4,5就是這樣一個(gè)整數(shù)組合。正確答案：PrivateSubFormClick()Fora=1To30Forb=1To30Forc=1To30Ifa"2+b2=c"2ThenPrinta;b;cEndIfNextc,b,aEndSub6、編寫打印下列圖案的程序。*******************正確答案：PrivateSubCommandlClick()Fori=1To5PrintTab(5-i+1);Forj=1To2*i-1Print〃*〃；NextjPrintNextiEndSub7、輸入x,計(jì)算y的值(l+4x)/5(x>0)y=vIsin(2x-3)/7(x<0)正確答案：PrivateSubFormClick()x=Vai(InputBox(〃X=〃))Ifx>=0Theny=(l+4*x)/5elsey=Sin(2*x-3)/7EndIfPrintyEndSub8、求下面數(shù)列前40項(xiàng)的和，結(jié)果保留4位小數(shù)。界面自定。1]]11+21+2+31+2+3+4...正確答案：PrivateSubForm_Click()S二0T二0Fori=lto40T=T+iS=S+l/TNextiPrint“S="；Format(S,0.0000v)EndSub或者s=oFori=lto40T二0Forj=ltoiT=T+jNextjS=S+l/TNextiPrint“S="；Format(S,v0.0000")9、單擊某個(gè)命令按鈕輸出3?100之間的所有奇數(shù)、奇數(shù)之和。將奇數(shù)顯示于文本框Textl中，奇數(shù)之和顯示于文本框Text2中。正確答案：PrivateSubCommandlClickOs=0Fori=3To100Step2Textl.Text=Textl.Text&i&〃〃s=s+iNextiText2,Text=sEndSub10、編寫程序，由用戶輸入x,計(jì)算y的值。界面自定。-(Wx)/5(x>5)y=-x〃2(0Wx<5)、sin(x+3)/5(x<0)正確答案：PrivateSubForm_Click()x=Val(lnputBoxCX=z，))Ifx>=5ThenElseifx>=0y=x*x+2elsey=Sin（x+3）/5EndIfPrintyEndSub二、單選（每題參考分值2.5分）11>關(guān)于語句Ifx=lTheny=l下列正確的說法是（）。x=l和y=l均為賦值語句x=l和y=l均為關(guān)系表達(dá)式x=l為關(guān)系表達(dá)式,尸1為賦值語句D.尸1為關(guān)系表達(dá)式，x=l為賦值語句答案：【C】12、下列哪一個(gè)是VisualBasic合法變量名（）。IF7ABA[B]7AB7答案：【D】13、函數(shù)String（n,"str"）的功能是（）。A.把數(shù)值型數(shù)據(jù)轉(zhuǎn)換為字符串B.返回由n個(gè)字符組成的字符串C.從字符串中取出n個(gè)字符D.從字符串中第n個(gè)字符的位置開始取子字符串答案：【B】14、以下程序段的執(zhí)行結(jié)果是（）。DimA(5)For1=1To5A(l)=l*lNextIPrintA(I4)025516答案：【B】15、可以實(shí)現(xiàn)從字符串任意截取字符的函數(shù)是()。Instr()Left()Right()Mid()答案：[D]16、對(duì)變量名說法不確的是()。A.必須是字母開頭，不能是數(shù)字或其他字符B.不能是VisualBasic的保留字C.可以包含字母、數(shù)字、下劃線和標(biāo)點(diǎn)符號(hào)D.不能超過255個(gè)字符答案：【C】)屬性。)屬性。)屬性。17、將命令按鈕Conunandl設(shè)置為不可見，應(yīng)修改該命令按鈕的(Caption)屬性。ValueVisibleEnabled答案：【C】18、在下列四個(gè)式子中，非法的VisualBasic表達(dá)式是()。A.a=b+c6>3+3a=sin303答案：【口19、列程序執(zhí)行后，變量s的值為（）。s=0:x=lDoWhile（x<10）s=s+xx=x+2LoopPrints102550100答案：（B]20、下列關(guān)于SelectCase測(cè)試表達(dá)式的敘述中，錯(cuò)誤的是（）。A.只能是變量名B.可以是整型C.可以是字符型D.可以是浮點(diǎn)類型答案：【A】21、VisualBasic是一種面向?qū)ο蟮某绦蛟O(shè)計(jì)語言，構(gòu)成對(duì)象的三要素是（）。A.屬性、事件、方法B.控件、屬性、事件C.窗體、控件、過程D.窗體、控件、模塊答案：【A】）公式的。）公式的。）公式的。22、在VisualBasic中程序段是計(jì)算（）公式的。s=0:t=lFori=lTo10t=t*is=s+tNextiPrintsA.s=l+2+3+4+5+6+7+8+9+10B.s=l*2*3*4*5*6