九江學(xué)院VB期末考試題目及詳細(xì)答案

經(jīng)典word整理文檔，僅參考，雙擊此處可刪除頁眉頁腳。本資料屬于網(wǎng)絡(luò)整理，如有侵權(quán)，請聯(lián)系刪除，謝謝！九江學(xué)院期末考試復(fù)習(xí)題（政法A1111)第一套一、判斷題1、VisualBasic程序開發(fā)的特點(diǎn)是面向?qū)ο蟮氖录?qū)動。2、Print_Text是一個(gè)不合法的變量名。3、窗體的AutoRedraw屬性實(shí)現(xiàn)了屏幕圖像的重建.（√）（√））4、設(shè)置字體大小應(yīng)使用Font屬性5、Sub過程可以實(shí)現(xiàn)嵌套調(diào)用6、IIF函數(shù)中的三個(gè)參數(shù)都不能省略。（）(√）(√）7、塊結(jié)構(gòu)條件語句以EndIf結(jié)束，而單行結(jié)構(gòu)條件語句沒有EndIF。(√)8、當(dāng)終值小于初值時(shí)，步長為負(fù)數(shù)。（√）9、執(zhí)行While-Wend循環(huán)時(shí)，如果一開始條件就不成立，則語句塊一次也不會執(zhí)行.（√)10、關(guān)于數(shù)組的引用，在程序中，凡是簡單變量可以出現(xiàn)的地方都可以出現(xiàn)數(shù)組元素的引用（√）二、單項(xiàng)選擇題1．PrintFormat123，"####”）執(zhí)行之后的結(jié)果為A）#123B)123C）123＃）＃###【答案】B2．下面可以表示注釋語句開頭的為A）ReB）RC）RemD）dim【答案】C3．下列選項(xiàng)中窗體載入事件為A）Load事件B）Click事件）DblClick事件）Unload事件【答案】A4．Timer控件可以使用下列哪種事件A）Click事件B）Timer事件）Dblclick事件）Change事件【答案】B5．在InputBox函數(shù)中哪一個(gè)參數(shù)是必須的A)PromptB）ButtonsC）TitleD）Context【答案】A6．以下敘述中錯誤的是：A)如果過程被定義為Static類型，則該過程中的局部變量都是Static類型B）Sub過程中不能嵌套定義Sub過程）Sub過程可以嵌套調(diào)用Sub過程）事件過程可以像通用過程一樣由用戶定義過程名【答案】C7．要填加一個(gè)標(biāo)準(zhǔn)模塊,可使用“_____"添加模塊命令.A)文件B）視圖）工程工具【答案】C8．在塊結(jié)構(gòu)條件語句IfThen/Endif中（A)必須至少有一個(gè)Elseif語句(B)可以有任意多個(gè)ElseIf-Then語句（C)如果沒有Else語句，運(yùn)行時(shí)將出現(xiàn)錯誤(D)給定的條件只能是關(guān)系表達(dá)式或邏輯表達(dá)式【答案】B9．以下Case語句中錯誤的是(A）Case10To1（B)CaseIs10）CaseIs>10，Is<50（）Case3，5，〉10【答案】A10．對DoUntil…Loop循環(huán)，正確的是(A．如果循環(huán)條件為常數(shù)0，則一次循環(huán)也不執(zhí)行B．如果循環(huán)條件為常數(shù)0，則至少執(zhí)行一次循環(huán)．如果循環(huán)條件是不為0的常數(shù)，則至少執(zhí)行一次循環(huán)．無論循環(huán)條件是否為"True”，則至少執(zhí)行一次循環(huán)【答案】B）。11．語句Dim（—3To5，2To6)AsInteger定義的數(shù)組元素有_______個(gè)。A）45B)40C)11D)54【答案】A12．下列關(guān)于OptionBase語句說法錯誤的是______DA）OptionBase語句只能出現(xiàn)在窗體層或模塊層B)OptionBase語句不能出現(xiàn)在過程中）OptionBase語句必須位于數(shù)組的定義之前）OptionBase語句只對一維數(shù)組有效【答案】D13、VisualBasic的特點(diǎn)不包括下面的(A）A不需編程C可視化程序設(shè)計(jì)B面向豆象的程序設(shè)計(jì)D時(shí)間驅(qū)動的程序設(shè)計(jì)14、從鍵盤上能夠輸入兩個(gè)字符串,分別保存在變量str1、str2中.確定第二個(gè)字符串在第一個(gè)字符串中起始位置的函數(shù)是(D)ALeftBMidCStringDInstr15、如果將布爾常量值True賦值給一個(gè)整型變量，則整型變量的值為(B）A0B-1CTrueDfalse16、下列符號常量的聲明中，（）是不合法的。AConstaAsSingle=1。1CConstaAsDouble=Sin（1)BConstaAsInteger=“12”DConsta=”O(jiān)K"17、四個(gè)字符“E”,“y",“B”，“8”的ASCII碼值最大的是（B）A“E”C“B"B“y”D“8”18、將變量k四舍五入保留2位小數(shù)的表達(dá)式是（）AInt((k+0.5)*100)/100CInt（k＊100+0。5)/100BIntk＊100）/100)+05DInt(k*(100+0.5）)/100”19、30．將數(shù)學(xué)表達(dá)式Cos2（a+b)+5e2寫成VisualBasic的表達(dá)式，其正確的形式是(A）A）Cos(a+b）＊exp（2)B)Cos^2（a+b)+5＊exp(2）C)Cos（a+b)^2+5*ln(2））Cos^2(a+b）+5＊ln（2)20、在順序文件中，當(dāng)使用Write＃語句時(shí)，文件打開的方式必須是（B）AOutput和InputCOutput三、程序分析題BOutput和AppendDAppend1．以下語句的輸出結(jié)果是（注：表示一個(gè)空格）a=123b=456Printa；bA）123■456【答案】DB）■123■456C)■123■456■D）■123■■4562．下列程序執(zhí)行的結(jié)果為x=-6^2PrintSgn(x）+Abs（x)+（）A）－36B1C）－1D）－72【答案】C3．在窗體上畫一個(gè)名稱為Command1,一個(gè)名稱為Label1的標(biāo)簽，然后編寫如下的事件過程：PrivateSubCommand1_Click（)s=0Fori=0To15X=2*i—1IfXMod3=0Thens=s+1NextiLabel1。Caption=sEndSub程序運(yùn)行后,單擊命令按鈕，則標(biāo)簽中顯示的內(nèi)容為A）1B)5C）27D）45【答案】B4Command1Label1Label2、Label3的標(biāo)簽,然后編寫如下的事件過程：PrivatexAsIntegerPrivateSubCommand1_Click(）StaticyAsIntegerDimzAsIntegern=10z=n+zy=y+zx=x+zLabel1.Caption=xLabel2.Caption=yLabel3.Caption=zEndSub運(yùn)行程序后，連續(xù)三次單擊命令按鈕后，則三個(gè)標(biāo)簽中顯示的內(nèi)容分別是A)101010B）303030C）303010D）1030【答案】C5Command1Label1Label2的標(biāo)簽，然后編寫如下的事件過程：PrivatexAsIntegerPrivateSubCommand1_Click()x=：y=3Call，y)Label1.Caption=xLabel2。Caption=yEndSubPrivateSubProc(ByValaAsInteger,ByValbAsInteger）x=a＊ay=b+bEndSub運(yùn)行程序后,則兩個(gè)標(biāo)簽中顯示的內(nèi)容分別是A）5和3【答案】BB)25和3C）25和6D）5和66.下面程序段求兩個(gè)數(shù)中的大數(shù)，不正確的是（A）If＞yThenMax=xElseMax=y（B）Max=IIf(x＞，，y)（C)If＞=xThenMax=yMax=x（）Ify＞xThenMax=yMax=x【答案】D7．如果x的值大于或等于y“OK"，表示這個(gè)條件的單行格式的If語句是A)If〉=y^3Print“OK"B）If＊y*yThen“OK"）Ifx>=y^3ThenPrint“OK"D)If〉＊yThenPrint“OK”EndIf【答案】C8．下列程序段執(zhí)行結(jié)果為x=5y=—6IfNotx<0Thenx=y—3Elsey=x+3Printy-；x—yA)3－3B）－95）－33D)5－6【答案】A9．已知x的值，計(jì)算分段函數(shù)f（下面選項(xiàng)不正確的是當(dāng)＞=1，f（）=當(dāng)＜1，f(x）=x2+3(A）SelectCasexCaseIs〈1；f=x^2+3Caseelsef=sqr(x+1)EndSelect(B)SelectCasexCasex>=1f=sqr(x+1）Casex<1f=x^2+3EndSelect(C)SelectCasexCaseIs〉=1f=sqr(x+1）CaseIs<1f=x^2+3EndSelect）IF〉=1thenf=sqr（x+1）elsef=x^2+3【答案】B10．執(zhí)行完下面的程序段后，循環(huán)執(zhí)行了(）次。Fori=1.7To5.9Step0.9a=a+1PrintaNextIA．3B4C．5D．6【答案】C11．下列程序段的執(zhí)行結(jié)果為（。n=0j=1DoUntiln〉2n=n+1j=j+n*(n+1)LoopPrintn；jA．01B．37C．321D．313【答案】C12．以下正確的For…Next結(jié)構(gòu)是（A）Forx=1To10fory=1to10…Next（B）Forx=1To10fory=1to10…Nexty，x(C)Forx=1To10fory=1to10NextxNexty（）Forx=1To10fory=1to10…Nextx，y【答案】B13．下列程序中，第一個(gè)Do語句共執(zhí)行了(）次循環(huán)。DimiAsInteger,jAsIntegeri=1Doj=1DoSum=Sum+jj=j+2Printj;LoopUntilj>3i=i+2LoopUntili>10PrintSumA．10B．20．5．7【答案】A14．下列語句中,a是一個(gè)數(shù)組，則使用正確的是______A）OptionBase2B)Redima）Erasea）a=Array（）【答案】C15.在窗體上畫一個(gè)名稱為Text1的文本框和一個(gè)名稱為Command1的命令按鈕,然后編寫如下事件過程：PrivateSubCommand1_Click(）Dimarray1(10,10）AsIntegerDimiAsInteger,jAsIntegerFori=1To3forj=2To4array1(i,j)=i+jnextjnextiText1.Text=arrry1(2,3）+（3，4)EndSub程序運(yùn)行后，單擊命令按鈕,在文本框中顯示的值是______A）12B)13C)14D)15【答案】A16。在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程：PrivateSubCommand1_Click(）Dima(10，10）AsIntegerDimiAsInteger，jAsIntegerFori=1To3forj=1To3a（i,j）=（i1)＊3+jPrinta（i,j）;nextjPrintnextiEndSub程序運(yùn)行后，單擊命令按鈕，窗體上顯示的是______A)123246369B）234345456）147258369D)123456789【答案】D17.設(shè)有如下程序:OptionBase0PrivateSubForm_Click()DimaDimiAsIntegera=Array(1,2,3，45，6，7，8,9)Fori=0To3Printa(5–；NextEndSub程序運(yùn)行后，單擊窗體，則在窗體上顯示的是______A)4321B)5432C)6543D）7654【答案】C18．執(zhí)行以下Command1的Click事件過程在窗體上顯示_______。PrivateSubCommand1_Click(）Dimaa=Array(“a”，”b”,”c”,"d”，”e”，”f，，”g”)Printa(1);a(3);a（）EndSubA)abcB)bdfC）aceD）出錯【答案】B19、設(shè)有語句Open"c:\Test。Dat"ForOutputAs#1則以下錯誤的敘述是（B）A）該語句打開C盤根目錄下一個(gè)已存在的文件Test.DatB）該語句在C盤根目錄下建立一個(gè)名為Test.Dat的文件）該語句建立的文件的文件號為1執(zhí)行該語句后,就可以通過Print＃語句向文件Test。Dat中寫入信息20、以下代碼完成對順序文件test1。txt追加打開的是（）A）Opentest1.txtForInputAs＃1B)Opentest1。txtForOutputAs＃1）Opentest1。txtForApp