計(jì)算機(jī)可視化編程(專升本)

1、i（本題4.0分）平頂山學(xué)院補(bǔ)考課程：計(jì)算機(jī)可視化編程（專升本）總時(shí)長(zhǎng)：120分鐘1.（單選題）下列運(yùn)算符中，運(yùn)算級(jí)別最高的是（）（本題4.0分）A.+B.*C.D. Mod答案：B解析：無2.（單選題）下列選擇項(xiàng)中（）不能獲得焦點(diǎn)。（本題4.0分）A.使用Tab鍵B.用鼠標(biāo)選擇對(duì)象C.設(shè)置GetFocus的值為TrueD.使用SetFocus方法答案：C解析：無i（本題4.0分）3. （單選題）執(zhí)行下面的程序段后，x的值為（）2x=5Fori=1To20Step2x=x+i5NextA.21B.22C.23D. 24答案：A解析：無4.（單選題）有如下程序，執(zhí)行程序后單擊Buttonl按鈕,

2、窗體上顯示的是什么（）PrivateSubCommand1_Click（）DimaDimbAsIntegera=5/2b=5/2Printa,bEndSub（本題4.0分）A.22B.22.5C.2.52D. 2.52.5答案：C解析：無5.（單選題）如果希望用變量X存放數(shù)據(jù)12345.67890123,應(yīng)將X定義為什么類型？（）（本題4.0分）A.數(shù)值B.字符串C.變體D.數(shù)值或字符串（視輸入的數(shù)據(jù)而定）答案：A解析：無6.（單選題）以下說法正確的是（）（本題4.0分）A.通用過程可以出現(xiàn)在窗體模塊和標(biāo)準(zhǔn)模塊中B.不同模塊中的通用過程可以重名C.同一標(biāo)準(zhǔn)模塊中的通用過程可以同D.不同標(biāo)準(zhǔn)模塊

3、中的通用過程不能同名答案：D解析：無7.（單選題）下列哪組語句可以將變量A、B的值互換（）。（本題4.0分）A.A=B:B=AB.A=C:C=B:B=AC.A=A+B:B=A-B:A=A-BD. A=（A+B）/2:B=（A-B）/2答案：C解析：無8.（單選題）將文本框的（）屬性設(shè)置為True時(shí)，文本框可以輸入或顯示多行文本，且會(huì)在輸入的內(nèi)容超出文本框的寬度時(shí)自動(dòng)換行。（本題4.0分）A.MultiLineB.ScrollBarsC.TextD. Enabled答案：A解析：無9.（單選題）在表達(dá)式y(tǒng)=InputBox（a,b,c）中,b為輸入函數(shù)對(duì)話框的（）。（本題4.0分）A.標(biāo)題B.提

4、示C.預(yù)設(shè)值D.幫助文件名答案：A解析：無10.（單選題）如果要退出Do,Loop循環(huán)，可使用語句（）。（本題4.0分）A.ExitB.ExitDoC.ExitForD. ExitSub答案：B解析：無11.（單選題）VB中，將命令按鈕控件在窗體中失效（不可用）的屬性語句是（4.0分）A.defaultB.CancelC.EnabledD. Visible答案：C解析：無12.（單選題）在VB中，稱對(duì)象的數(shù)據(jù)為（）。（本題4.0分）A.屬性B.方法C.事件D.封裝答案：A解析：無13. （單選題）下面的哪一項(xiàng)不能用來在模塊之間傳遞數(shù)據(jù)（）。（本題4.0分）A.全局變量B.對(duì)象屬性C.全局?jǐn)?shù)組D

5、.模塊級(jí)變量）。（本題答案：D解析：無14. (單選題)令A(yù)、B、C都是整型變量，A=3,B=4,C=5,下列表達(dá)式結(jié)果為TRUE的是()(本題4.0分)A.(A+B)C-10B.B+C*AB*B=B+C*AB*BC.(A-C)*Sqr(B)+B=0D. AA2+BA2-CA20答案：C解析：無15. (單選題)下列哪個(gè)語句定義了包含8個(gè)元素的單精度數(shù)組()(本題4.0分)A.Dima(2,4)AsSingle3CB.Dima(1to8)!C.Dima!(7)D. Dima(1to2,3to6)AsLong答案：C解析：無16. (填空題)下面的程序段的運(yùn)行結(jié)果為。charstr=job,*p

6、=str;cout*(p+2)endl;(本題2.0分)答案：b;得分點(diǎn)：未設(shè)置解析：無17.(填空題)已知宏定義：#defineN3#defineY(n)(N+1)*n)執(zhí)行語句z=2*(N+Y(5+1);后，變量z的值是(本題2.0分)答案：48;得分點(diǎn)：未設(shè)置解析：無18.(填空題)下列函數(shù)功能是將數(shù)字a中的n個(gè)元素逆序存放，填空使程序完整。voidinvert(inta,intn)inti=0,j=n-1;while(ij)intt;ai=aj;aj=t;i+;j-;(本題2.0分)答案:(1)t=ai;得分點(diǎn)：未設(shè)置解析：無19.(填空題)下列函數(shù)是判斷S所指的字符申是否是“回文”(

7、即順讀和逆讀都是相同的字符申),若是“回文”，函數(shù)返回1,否則返回0,填空，使程序完整。voidfun(chars)(int1=0,j;j=strlen(s);while(ij)i+;j-;(本題2.0分)答案：(1)if(si=sj-1)return0;得分點(diǎn)：未設(shè)置解析：無20.(填空題)下面程序輸出兩個(gè)字符申中相同的字符，請(qǐng)?zhí)羁昭a(bǔ)充程序中的語句。#includevoidmain()char*p=KSEiemP5R,*q=KsEnbMP8Q;whileifcout*p;p+;q+;coutendl;(本題6.0分)答案：*p!=0&*q!=0;(2)或(*p&*q),*p=

8、*q;解析：無21.(填空題)編一程序，求滿足如下條件的最大的n：12+22+32-+n2100Q#includevoidmain()(intsum,n;sum=0;for(n=1;n+)(sum+=n*n;if(sum1000);cout1*1+2*2+3*3+.1000的最大的n值為：,0)s=aMod10a=a/10n=n+func(s)LoopPrintnEndSubPrivateFunctionfunc(x%)AsIntegerfunc=x*xEndFunction(本題5.0分)答案：DoWhile(a0)a=a/10n=n+func(s)LoopEndSubPrivateFunc

9、tionfunc(x%)AsIntegerfunc=x*x答:求一個(gè)數(shù)各位上的數(shù)的平方和。得分點(diǎn)：未設(shè)置解析：無23.(問答題)下面程序的功能是什么？PrivateSubCommand1_Click()Dims%,n%DimaAsStringn=0a=InputBox(Pleaseinputanumber:)Fors=1ToLen(a)If(func(Val(Mid(a,s,1)Thenn=n+1NextPrintnEndSubPrivateFunctionfunc(x%)AsBooleanIf(xMod2=0)Thenfunc=TrueElsefunc=FalseEndIfEndFunction(本題5.0分)答案：判斷一個(gè)數(shù)各位上的偶數(shù)個(gè)數(shù)得分點(diǎn)：未設(shè)置解析：無24.(問答題)寫出下列事件過程的執(zhí)行結(jié)果。PrivateSubCommand1_Click()Dims%s=f(5)Prints=;sEndSubPrivateFunctionf(ByValnAsInteger)Ifn=1Thenf=1Elsef=n+f(n-1)EndIfEndFunction(本題5.0分)25.(問答題)寫出下列事件過程的執(zhí)行結(jié)果。PublicxAsIntege