vb試卷及答案內(nèi)容

vb資料試卷編號(hào)：8951所屬語(yǔ)言：VisualBasic試卷方案：09-10-2《程序設(shè)計(jì)基礎(chǔ)—VB》模擬試卷總分：100分共有題型：6種一、判斷共5題（共計(jì)10分）第1題（2.0分）VisualBasic提供的單選按鈕的Value屬性True表示選中,False表示未選中答案：Y第2題（2.0分）在命令按鈕的Click事件過(guò)程中,exit與end等效.答案：N第3題（2.0分）事件過(guò)程與Sub過(guò)程,它們相同點(diǎn)都是事件驅(qū)動(dòng),而不同的只是事件過(guò)程由控件屬性決定,而Sub過(guò)程是由戶自定義.答案：Y第4題（2.0分）VB通過(guò)窗體管理構(gòu)成應(yīng)用程序的各類文件的集合.答案：N第5題（2.0分）如果一個(gè)列表框一共有5個(gè)選項(xiàng),而當(dāng)選中第三項(xiàng)時(shí),這時(shí)列表框的ListIndex屬性為2.答案：Y二、單項(xiàng)選擇共20題（共計(jì)40分）第1題（2.0分）數(shù)學(xué)關(guān)系3≤x<10表示成正確的VB表達(dá)式為A:3<=x<10B:3<=xANDx<10答案：B第6題（2.0分）下列可以把當(dāng)前目錄下的圖形文件"p1.jpg"裝入圖片框picture1中,正確的語(yǔ)句是:A:Picture1="p1.jpg"B:Picture1.Picture="p1.jpg"C:Picture1.Picture=LoadPicture("p1.jpg")D:Picture=LoadPicture("p1.jpg")答案：C第7題（2.0分）為使文本框顯示滾動(dòng)條,必須首先設(shè)置的屬性是().A:MulitilineB:AutosizeC:AlignmentD:Scrollbars答案：A第8題（2.0分）"對(duì)象"是計(jì)算機(jī)系統(tǒng)運(yùn)行的().A:程序單位B:邏輯單位C:物理實(shí)體D:基本實(shí)體答案：D第9題（2.0分）當(dāng)運(yùn)行程序時(shí),系統(tǒng)自動(dòng)執(zhí)行啟動(dòng)窗體的()事件過(guò)程.A:LoadB:ClickC:UnLoadD:GotFocus答案：A第10題（2.0分）按文件的組織方式分有A:順序文件和隨機(jī)文件B:ASCII文件和二進(jìn)制文件C:程序文件和數(shù)據(jù)文件D:磁盤(pán)文件和打印文件答案：A第11題（2.0分）如果要在命令按鈕上顯示圖形文件,應(yīng)設(shè)置命令按鈕的().A:Style屬性和Graphics屬性B:Style屬性和Picture屬性C:Picture屬性D:Graphics屬性答案：B第12題（2.0分）激活主菜單的按鍵是().A:F1或Ctrl鍵B:Ctrl鍵或Atl鍵C:F10或Ctrl鍵D:F10或Atl鍵答案：B第13題（2.0分）Sub過(guò)程與Function過(guò)程最根本的區(qū)別是A:Sub過(guò)程可以有參數(shù),Function過(guò)程不可以B:Function過(guò)程可以有參數(shù),Sub過(guò)程不可以C:兩種過(guò)程參數(shù)的傳遞方式不同D:Sub過(guò)程的過(guò)程名不能返回值,而Function過(guò)程能通過(guò)過(guò)程名返回值答案：D第14題（2.0分）在下列關(guān)于菜單的說(shuō)法中,錯(cuò)誤的是().A:每個(gè)菜單項(xiàng)是一個(gè)控件,與其他控件一樣也有自己的屬性和事件B:除了Click事件之外,菜單項(xiàng)還能響應(yīng)其他的事件,如DblClick事件C:在程序執(zhí)行時(shí),如果菜單項(xiàng)的Visible屬性為False,則該菜單項(xiàng)不可見(jiàn)D:在程序執(zhí)行時(shí),如果菜單項(xiàng)的Enabled屬性為False,則該菜單項(xiàng)變成灰色,不能被用戶選擇答案：B第15題（2.0分）記錄長(zhǎng)度最大可取的值是______字節(jié).A:32767B:32768C:65535D:65536答案：A第16題（2.0分）若有一菜單項(xiàng)(名為MenuItem),為了在運(yùn)行時(shí)使該菜單項(xiàng)失效(變灰),應(yīng)使用的語(yǔ)句是A:MenuItem.Enabled=TrueB:MenuItem.Visible=FalseC:MenuItem.Checked=TrueD:MenuItem.Enabled=False答案：D第17題（2.0分）在VB中，（）被稱為對(duì)象.A:窗體B:控件C:窗體和控件D:窗體、控件、屬性答案：C第18題（2.0分）執(zhí)行了下面的程序：SubForm_Click()Fori=1To6List1.AddItemiNextFori=1To3List1.RemoveItemiNextEndSub列表框中的數(shù)據(jù)項(xiàng)為A:1,5,6B:2,4,6C:4,5,6D:1,3,5答案：D第19題（2.0分）以下關(guān)于過(guò)程及過(guò)程參數(shù)的描述,錯(cuò)誤的是:A:過(guò)程的參數(shù)可以是控件的名稱B:用數(shù)組作為過(guò)程的參數(shù)時(shí),使用的傳地址的方式C:只有函數(shù)過(guò)程能夠?qū)⑦^(guò)程中矗立的信息傳回到調(diào)用的程序中D:窗體可以作為過(guò)程的參數(shù)答案：C第20題（2.0分）函數(shù)Ucase(Mid("visualbasic",8,8))的值為().A:visualB:basicC:VISUALD:BASIC答案：D三、程序填空共1題（共計(jì)10分）第1題（10.0分）'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能：完成程序，使程序輸出值為15'-------------------------------------------------------PrivateSubCommand1_Click()'**********SPACE**********Dimi,j,x,【?】AsIntegerFori=1To4x=4Forj=1To3x=3'**********SPACE**********For【?】=1To2'**********SPACE**********x=x+【?】NextkNextjNextiPrintxEndSub答案：=======(答案1)=======k=======(答案2)=======k=======(答案3)=======6四、程序改錯(cuò)共1題（共計(jì)10分）第1題（10.0分）'------------------------------------------------'【程序改錯(cuò)】'------------------------------------------------'題目：已知C的公式表示如下:'n!'C=------------------'(n-m)!*m!'函數(shù)過(guò)程fac()求k！函數(shù),在Fomr_Click事件中完成運(yùn)算，'請(qǐng)修正程序中錯(cuò)誤。'------------------------------------------------OptionExplicitPrivateFunctionfac(kAsInteger)AsSingleDimxAsSingle,jAsInteger'**********FOUND**********x=0Forj=1Tok'**********FOUND**********x=x^jNextjfac=xEndFunctionPrivateSubForm_Click()DimCAsSingleDimmAsInteger,nAsIntegerm=Val(InputBox("請(qǐng)輸入一個(gè)整數(shù)(m)："))n=Val(InputBox("請(qǐng)輸入一個(gè)整數(shù)(n)："))'**********FOUND**********C=fac(n)/fac(n-m)*fac(m)Print"C=";CEndSub答案：=======(答案1)=======x=1=======(答案2)=======x=x*j=========或=========x=j*x=======(答案3)=======C=fac(n)/fac(n-m)/fac(m)=========或=========C=fac(n)/(fac(n-m)*fac(m))=========或=========C=fac(n)/(fac(n-m)*fac(m))五、程序設(shè)計(jì)共1題（共計(jì)20分）第1題（20.0分）'-------------------------------------------------'【程序設(shè)計(jì)】'-------------------------------------------------'題目：編寫(xiě)函數(shù)fun其功能是能計(jì)算如圖1所示的表達(dá)式'的結(jié)果值，m由鍵盤(pán)輸入，使用dowhile...loop'語(yǔ)句完成'-------------------------------------------------答案：----------------------DimiAsIntegerDimsumAsSinglei=1DoWhilei<=msum=sum+1/(2*i*(-1)^(i-1))i=i+1Loopfun=sum----------------------六、VB窗體設(shè)計(jì)共1題（共計(jì)10分）第1題（10.0分）------------------------------------------------【窗體設(shè)計(jì)】------------------------------------------------題目：用復(fù)選框?qū)崿F(xiàn)在文本框中顯示是否“加下劃線”或“斜體顯示”。在窗體上放置一個(gè)文本框，兩個(gè)復(fù)選框，程序運(yùn)行界面如圖所示各控件屬性設(shè)置如下表：對(duì)象名稱Name屬性Caption屬性text屬性窗體默認(rèn)默認(rèn)文本框Display人民警察為人民復(fù)選框Check1斜體顯示Check2加下劃線------------------------------------------------試卷編號(hào)：8947所屬語(yǔ)言：VisualBasic試卷方案：09-10-2《程序設(shè)計(jì)基礎(chǔ)—VB》模擬試卷總分：100分共有題型：6種一、判斷共5題（共計(jì)10分）第1題（2.0分）Single和Double型用于保存浮點(diǎn)數(shù),在VB中定義單精度浮點(diǎn)8位,雙浮點(diǎn)16位.答案：N第2題（2.0分）當(dāng)窗體的ScaleTop=0,ScaleLeft=0時(shí),這個(gè)窗體Top和Left值也是0.答案：N第3題（2.0分）Frame控件是一種容器控件,因此它可有它自己的坐標(biāo)系.答案：N第4題（2.0分）同一Form窗體中的各控件可以相互重疊,其顯示的上下層次的次序不可以調(diào)整.答案：N第5題（2.0分）move方法的一般形式是:對(duì)象名.moveA,B[,C,D],其中A指Left,C指width.答案：N二、單項(xiàng)選擇共20題（共計(jì)40分）第1題（2.0分）下面4項(xiàng)中不屬于面向?qū)ο笙到y(tǒng)三要素的是().A:變量B:事件C:屬性D:方法答案：A第2題（2.0分）選中復(fù)選框控件時(shí),value屬性的值,可以是().A:TrueB:falseC:0D:1答案：D第3題（2.0分）當(dāng)輸入4時(shí),以下程序的輸出結(jié)果是______.PrivateSubCommand1_Click()x=InputBox(x)Ifx^2<15Theny=1/xIfx^2>15Theny=x^2+1PrintyEndSubA:4B:17C:18D:25答案：B第4題（2.0分）保存新建的工程時(shí),默認(rèn)的路徑是().A:MyDocumentsB:VB98C:\D:Windows答案：B第5題（2.0分）Cls方法可清除窗體或圖片框中的信息是.A:Picture屬性設(shè)置的背景圖案B:在設(shè)計(jì)時(shí)放置的控件C:程序設(shè)計(jì)時(shí)產(chǎn)生的圖形和文字D:以上方法都對(duì)答案：C第6題（2.0分）以下程序OptionBase1PrivateSubCommand1_Click()Dima%(3,3)Fori=1To3Forj=1To3Ifj＞1Andi＞1Thena(i,j)=a(a(i-1,j-1),a(i,j-1))+1Elsea(i,j)=i*jEndIfPrinta(I,j);"";NextjPrintNextiEndSub輸出結(jié)果是A:123231323B:123123123C:123246369D:111222333答案：A第7題（2.0分）語(yǔ)句PRINT"SGN(-26)=";SGN(-26)的輸出結(jié)果為().A:SGN(-26)=26B:SGN(-26)=-26C:SGN(-26)=+1D:SGN(-26)=-1答案：D第8題（2.0分）運(yùn)行下面的程序:CLSLINE(100,100)-(200,50)LINE-(150,150)LINE-(100,100)屏幕上顯示的是().A:三條放射形直線B:四條放射形直線C:矩形D:三角形答案：D第9題（2.0分）執(zhí)行下面程序段后,變量a的值為_(kāi)_____.ForI=1To3Forj=1ToIFork=jTo3a=a+1NextkNextjNextIA:3B:9C:14D:21答案：C第10題（2.0分）設(shè)x=8,y=14,z=15,以下表達(dá)式的值是x<yAnd(Noty>z)Orz<xA:1B:-1C:TrueD:False答案：C第11題（2.0分）要想不使用Shift和Ctrl鍵就能在列表框中同時(shí)選擇多個(gè)項(xiàng)目,則應(yīng)把該列表框的MultiSelect屬性設(shè)置為:A:0B:1C:2D:其他答案：B第12題（2.0分）如果要在菜單中添加一個(gè)分隔線,則應(yīng)將其Caption屬性設(shè)置為().A:=B:*C:&D:-答案：D第13題（2.0分）以下可以作為VB變量名的是().A:SINB:CO1C:COS(X)D:X(-1)答案：B第14題（2.0分）在一個(gè)語(yǔ)句內(nèi)寫(xiě)多條語(yǔ)句時(shí),用來(lái)分隔每條語(yǔ)句的符號(hào)是().A:,B::C:、D:;答案：B第15題（2.0分）以下正確的For…Next結(jié)構(gòu)是A:Forx=5Step10…NextxB:Forx=3To-3Step-3…NextxC:Forx=1To10start:…NextxIfi=10ThenGoTostartD:Forx=3To10Step3…Nextm答案：B第16題（2.0分）要使得窗體在出現(xiàn)之前就完成相關(guān)的程序設(shè)置可在()事件中進(jìn)行編程.A:linkopenB:KeyPressC:loadD:click答案：C第17題（2.0分）如果從數(shù)據(jù)文件INPUT.DAT中讀取數(shù)據(jù)時(shí),以下打開(kāi)文件方式中,正確的是().A:OPENINPUT.DATFORINPUTAS#1B:OPENINPUT.DATFOROUTPUTAS#1C:OPEN"INPUT.DAT"FORINPUTAS#1D:OPEN"I",#1INPUT.DAT答案：C第18題（2.0分）當(dāng)使用Line方法畫(huà)直線后,當(dāng)前坐標(biāo)在A:(0,0)B:直線起點(diǎn)C:直線終點(diǎn)D:容器的中心答案：C第19題（2.0分）下面是()合法的單精度型變量.A:num!B:sum%C:xinte$D:mm#答案：A第20題（2.0分）如下數(shù)組聲明語(yǔ)句:Dima(3,-2To2,5),則數(shù)組a包含的元素的個(gè)數(shù)為A:120B:75C:60D:13答案：A三、程序填空共1題（共計(jì)10分）第1題（10.0分）OptionExplicit'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能：本程序?qū)崿F(xiàn)功能：將順序文本文件“MYFILE.TXT”的'內(nèi)容一個(gè)字符一個(gè)字符地讀入文本框txtTest中'-------------------------------------------------------PrivateSubForm_Click()DimInputDataAsString*1txtTest.Text=""'**********SPACE**********OpenApp.Path&"\MYFILE.TXT"For【?】As#1'**********SPACE**********DoWhile【?】EOF(1)Input#1,InputData'**********SPACE**********txtTest.Text=txtTest.Text+【?】LoopClose#1EndSub答案：=======(答案1)=======Input=======(答案2)=======Not=======(答案3)=======InputData四、程序改錯(cuò)共1題（共計(jì)10分）第1題（10.0分）'------------------------------------------------'【程序改錯(cuò)】'------------------------------------------------'題目：隨機(jī)產(chǎn)生并輸出100以內(nèi)大于50的20個(gè)整數(shù)，輸'出時(shí)每5個(gè)數(shù)一行。'------------------------------------------------OptionExplicitPrivateSubForm_Click()RandomizeTimerDimiAsInteger,maAsInteger'**********FOUND**********i=1'**********FOUND**********DoUntili<20ma=Rnd()*100\1Ifma>50ThenPrintma;i=i+1'**********FOUND**********Ifi\5=0ThenPrintEndIfEndIfLoopEndSub答案：=======(答案1)=======i=0=======(答案2)=======Dowhilei<20=========或=========Dowhile20>i=========或=========Dowhilei<=19=========或=========Dowhile19>=i=======(答案3)=======Ifimod5=0Then五、程序設(shè)計(jì)共1題（共計(jì)20分）第1題（20.0分）'-------------------------------------------------'【程序設(shè)計(jì)】'-------------------------------------------------'題目：(事件)雙擊窗體。'(響應(yīng))求3+6+9+12+15+18+……+300的和，并將結(jié)'果輸出到窗體上。將結(jié)果存入變量SUM中。'-------------------------------------------------答案：----------------------DimiAsIntegerFori=3To300IfiMod3=0Thensum=sum+iEndIfNextPrintsum----------------------六、VB窗體設(shè)計(jì)共1題（共計(jì)10分）第1題（10.0分）---------------------------------------------------------------------【窗體設(shè)計(jì)】---------------------------------------------------------------------要求：當(dāng)用戶單擊窗體時(shí)，彈出對(duì)話框由用戶輸入任意整，提示框顯示所輸入整數(shù)的奇、偶性，界面提示信息如圖所示。試卷編號(hào)：8948所屬語(yǔ)言：VisualBasic試卷方案：09-10-2《程序設(shè)計(jì)基礎(chǔ)—VB》模擬試卷總分：100分共有題型：6種一、判斷共5題（共計(jì)10分）第1題（2.0分）在窗體模塊的聲明部分中用Private聲明的變量的有效范圍是其所在的工程.答案：N第2題（2.0分）清除combo1對(duì)象的內(nèi)容是combo1.clear.答案：Y第3題（2.0分）移動(dòng)框架內(nèi)的控件時(shí)框架內(nèi)的控件也跟隨移動(dòng),所以框架內(nèi)各控件的Left和Top屬性值也將分別隨之改變.答案：N第4題（2.0分）在標(biāo)準(zhǔn)模塊的聲明部分中用Publice聲明的變量的有效范圍是其所在的工程.答案：Y第5題（2.0分）VB通過(guò)窗體管理構(gòu)成應(yīng)用程序的各類文件的集合.答案：N二、單項(xiàng)選擇共20題（共計(jì)40分）第1題（2.0分）以下______不能作為VB中的變量名.A:Abx45B:P1234C:89TasFFD:xy答案：C第2題（2.0分）InputBox函數(shù)的返回值的類型為_(kāi)_____.A:數(shù)值B:字符串C:邏輯值D:日期值答案：B第3題（2.0分）指令"Circle(1000,1000),500,8,-6,-3"將繪制A:畫(huà)圓B:橢圓C:圓弧D:扇形答案：D第4題（2.0分）將調(diào)試通過(guò)的工程經(jīng)"文件"菜單的"生成.exe文件"編譯成.exe后,將該可執(zhí)行文件轉(zhuǎn)到其他機(jī)器上不能運(yùn)行的主要原因是().A:運(yùn)行的機(jī)器上無(wú)VB系統(tǒng)所需的動(dòng)態(tài)連接庫(kù)B:缺少.frm窗體文件C:該可執(zhí)行文件有病毒D:以上原因都不對(duì)答案：A第5題（2.0分）數(shù)學(xué)關(guān)系3≤x<10表示成正確的VB表達(dá)式為A:3<=x<10B:3<=xANDx<10C:x>=3ORx<10D:3<=xAND<10答案：B第6題（2.0分）下列不能打開(kāi)菜單編輯器的操作是______.A:按Ctrl+EB:單擊工具欄中的"菜單編輯器"按鈕C:執(zhí)行"工具"菜單中的"菜單編輯器"命令D:按Shift+Alt+M答案：D第7題（2.0分）在下面關(guān)于窗體的敘述中,錯(cuò)誤的是().A:在窗體的整個(gè)生命周期中,Initialize事件只觸發(fā)一次B:在用Show顯示窗體時(shí),不一定發(fā)生Load事件C:每當(dāng)窗體需要重畫(huà)時(shí),肯定會(huì)觸發(fā)Paint事件D:Resize事件是在窗體的大小有所改變時(shí)被觸發(fā)答案：C第8題（2.0分）在窗體上畫(huà)一個(gè)名稱為Command1的命令按鈕,然后編寫(xiě)如下事件過(guò)程:PrivateSubCommand1_Click()StaticxAsIntegerClsy=y+2x=x+2Printx,yEndSub程序運(yùn)行后,連續(xù)四次單擊Command1按鈕后,窗體上顯示的是A:88B:82C:28D:22答案：B第9題（2.0分）將CommandDialog1通用對(duì)話框以打開(kāi)對(duì)話框打開(kāi),可選以下()方法.A:showopenB:showcolorC:showsaveD:showfont答案：A第10題（2.0分）Cls方法可以清除窗體或圖片框中的()內(nèi)容.A:在設(shè)計(jì)階段使用Picture設(shè)置的背景位圖B:在設(shè)計(jì)階段放置的控件C:在運(yùn)行階段產(chǎn)生的圖形和文字D:以上全部?jī)?nèi)容答案：C第11題（2.0分）以下語(yǔ)句正確的是A:CommonDialogl.Filter=AllFiles|*.*|Pictures(*.Bmp)|*.BmpB:CommonDialogl.Filter="AllFiles"|"*.*"|"Pictures(*.Bmp)"|"*.Bmp"C:CommonDialogl.Filter="AllFiles|*.*|Pictures(*.Bmp)|*.Bmp"D:CommonDialogl.Filter={AllFiles|*.*|Pictures(*.Bmp)|*.Bmp|答案：C第12題（2.0分）在VisualBasic中,最簡(jiǎn)單的數(shù)據(jù)類型包括______.A:整型、實(shí)型、布爾型、字符型B:整型、實(shí)型、字符型C:整型、實(shí)型、邏輯型D:實(shí)型、邏輯型、字符型答案：A第13題（2.0分）以下屬于合法的數(shù)組元素是().A:x8B:x[A]C:x(3)D:x{6}答案：C第14題（2.0分）為了使列表框中的項(xiàng)目按字母順序排列,應(yīng)設(shè)置哪個(gè)屬性?A:ListB:SortedC:StyleD:Text答案：B第15題（2.0分）以下敘述中錯(cuò)誤的是A:在KeyPress事件過(guò)程中能識(shí)別鍵盤(pán)的按下與釋放B:在KeyPress事件過(guò)程中可以通過(guò)KeyAscii值來(lái)識(shí)別回車鍵C:在KeyDown和KeyUp事件過(guò)程中,將鍵盤(pán)輸入的"A"和"a"視作相同的字母D:在KeyPress事件過(guò)程中,將鍵盤(pán)輸入的"A"和"a"視作不同的字母答案：A第16題（2.0分）下面關(guān)于隨機(jī)文件的描述不正確的是A:每條記錄的長(zhǎng)度必須相同B:一個(gè)文件中記錄號(hào)不必惟一C:可通過(guò)編程對(duì)文件中的某條記錄方便地修改D:文件的組織結(jié)構(gòu)比順序文件復(fù)雜答案：B第17題（2.0分）窗體的Caption屬性的作用是().A:確定窗體的名稱B:確定窗體的標(biāo)題C:確定窗體的邊界類型D:確定窗體的字體答案：B第18題（2.0分）下面程序段：ForI=3To1Step-1PrintSpc(5-i)；Forj=1To2*I-1Print"*"；NextjPrintNexti的運(yùn)行結(jié)果為A:圖1B:圖2C:圖3D:圖4答案：D第19題（2.0分）為了給x,y,z這3個(gè)變量賦初值3,下面正確的賦值語(yǔ)句是A:x=3:y=3:z=3B:x=3,y=3,z=3C:x=y=z=3D:xyz=3答案：A第20題（2.0分）以下()方式打開(kāi)的文件只能讀不能寫(xiě).A:InputB:OutputC:RandomD:Append答案：A三、程序填空共1題（共計(jì)10分）第1題（10.0分）'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能：窗體中有若干控件，單擊其中的一個(gè)按扭cmdput時(shí)，'執(zhí)行如下的事件過(guò)程，該過(guò)程的功能是把數(shù)據(jù)輸出到指定的文件中.'-------------------------------------------------------'**********SPACE**********PrivateType【?】NumberAsStringNameAsStringEndTypePrivateSubcmdput_click()DimTitleAsStringDimStr1AsStringDimstr2AsStringDimstuAsStudentDimiAsIntegerOpenApp.Path&"\student.dat"ForRandomAs#1Len=Len(stu)Title="寫(xiě)記錄到隨機(jī)文件"Str1$="請(qǐng)輸入學(xué)生號(hào)"str2$="請(qǐng)輸入學(xué)生名"Fori=1To5'**********SPACE**********【?】.Number=InputBox(Str1$,Title$)stu.Name=InputBox$(str2$,Title$)Put#1,i,stuNexti'**********SPACE**********Close【?】EndSub答案：=======(答案1)=======Student=======(答案2)=======stu=======(答案3)=======#1四、程序改錯(cuò)共1題（共計(jì)10分）第1題（10.0分）'------------------------------------------------'【程序改錯(cuò)】'------------------------------------------------'題目:編程求一個(gè)m*n矩陣中最大元素及其所在的行列號(hào)。'------------------------------------------------OptionExplicitPrivateSubForm_Click()DimA()AsInteger,maxAsIntegerDimMAsInteger,NAsIntegerDimiAsInteger,jAsIntegerDimcolAsInteger,rowAsIntegerM=InputBox("輸入矩陣的行數(shù)：")N=InputBox("輸入矩陣的列數(shù)：")ReDimA(1ToM,1ToN)AsIntegerFori=1ToMForj=1ToNA(M,N)=InputBox("輸入數(shù)組元素:")NextjNexti'**********FOUND**********max=A(0,0)Fori=1ToMForj=1ToNIfmax<A(i,j)Thenmax=A(i,j)'**********FOUND**********row=jEndIf'**********FOUND**********col=iNextjNextiPrintPrint"該矩陣元素的最大值:";maxPrint"最大值所在的行:";row;"所在的列:";colEndSub答案：=======(答案1)=======max=A(1,1)=======(答案2)=======col=j=======(答案3)=======row=i五、程序設(shè)計(jì)共1題（共計(jì)20分）第1題（20.0分）'-------------------------------------------------'【程序設(shè)計(jì)】'-------------------------------------------------'題目：(事件)單擊窗體。'(響應(yīng))編寫(xiě)程序求10×11×12+11×12×13+…+15×16×17的結(jié)果，'并將結(jié)果輸出到窗體上。'將結(jié)果存入變量M中'-------------------------------------------------答案：----------------------Dimi,jAsIntegerDimsAsLongFori=10To15s=1Forj=iToi+2s=s*jNextm=m+sNextPrint(CStr(m))----------------------六、VB窗體設(shè)計(jì)共1題（共計(jì)10分）第1題（10.0分）------------------------------------------------【窗體設(shè)計(jì)】------------------------------------------------題目：如圖所示，啟動(dòng)VB后，新建工程，界面上放三個(gè)命令按鈕，大小位置體調(diào)整好。程序運(yùn)行后，單擊“窗體變大”按鈕，窗體隨之變大，單擊“窗體變小”按鈕，窗體即隨之變小，單擊“關(guān)閉窗體”按鈕，窗體被關(guān)閉，請(qǐng)編寫(xiě)程序。（窗口變大變小幅度用戶自定）各控件屬性設(shè)置如下表：對(duì)象名稱Name屬性Caption屬性窗體默認(rèn)默認(rèn)命令按鈕Command1窗體變大Command2窗體變小Command3關(guān)閉窗體------------------------------------------------試卷編號(hào)：8949所屬語(yǔ)言：VisualBasic試卷方案：09-10-2《程序設(shè)計(jì)基礎(chǔ)—VB》模擬試卷總分：100分共有題型：6種一、判斷共5題（共計(jì)10分）第1題（2.0分）用For循環(huán)寫(xiě)的程序不能用While循環(huán)來(lái)寫(xiě).答案：N第2題（2.0分）對(duì)象的可見(jiàn)性用enabled屬性設(shè)置,可用性用visible屬性設(shè)置.答案：N第3題（2.0分）數(shù)組作為過(guò)程參數(shù)時(shí),使用的是地址傳送方式.答案：Y第4題（2.0分）控件是對(duì)象,而窗體不是對(duì)象,它只是控件對(duì)象的窗口.答案：N第5題（2.0分）在窗體模塊的聲明部分中用Private聲明的變量的有效范圍是其所在的工程.答案：N二、單項(xiàng)選擇共20題（共計(jì)40分）第1題（2.0分）若有數(shù)組說(shuō)明語(yǔ)句為:Dima(10),則數(shù)組a包含元素的個(gè)數(shù)是().A:10B:22C:8D:12答案：B第2題（2.0分）若要清除列表框的所有內(nèi)容,可用什么方法實(shí)現(xiàn)A:RemoveItemB:ClsC:ClearD:以上均不可以答案：C第3題（2.0分）在一個(gè)語(yǔ)句內(nèi)寫(xiě)多條語(yǔ)句時(shí),用來(lái)分隔每條語(yǔ)句的符號(hào)是().A:,B::C:、D:;答案：B第4題（2.0分）Cls方法可清除窗體或圖片框中的信息是.A:Picture屬性設(shè)置的背景圖案B:在設(shè)計(jì)時(shí)放置的控件C:程序設(shè)計(jì)時(shí)產(chǎn)生的圖形和文字D:以上方法都對(duì)答案：C第5題（2.0分）VB窗體文件的擴(kuò)展名是().A:VBWB:VBPC:FRMD:BAS答案：C第6題（2.0分）下面關(guān)于隨機(jī)文件的描述正確的是A:文件中的內(nèi)容是通過(guò)隨機(jī)數(shù)產(chǎn)生的B:文件中的記錄號(hào)通過(guò)隨機(jī)數(shù)產(chǎn)生C:可對(duì)文件中的記錄根據(jù)記錄號(hào)隨機(jī)地讀寫(xiě)D:文件的每條記錄的長(zhǎng)度是隨機(jī)的答案：C第7題（2.0分）下列數(shù)據(jù)類型中,占用內(nèi)存最大的是().A:BooleanB:ByteC:IntegerD:Single答案：D第8題（2.0分）下面是()合法的字符常數(shù).A:ABC$B:"ABC"C:'ABC'D:ABC答案：B第9題（2.0分）能夠改變窗體邊框線類型的屬性是().A:FontStyleB:BorderStyleC:BackStyleD:Border答案：B第10題（2.0分）下列字符串常量中,最大的是().A:"北京"B:"上海"C:"天津"D:"廣州"答案：C第11題（2.0分）聲明符號(hào)常量應(yīng)該用關(guān)鍵字().A:StaticB:ConstC:PrivateD:V26/ariant答案：B第12題（2.0分）OPTIONEXPLICIT語(yǔ)句不可以放在().A:窗體模塊的聲明段中B:標(biāo)準(zhǔn)模塊的聲明段中C:類模塊的聲明段中D:任何事件過(guò)程中答案：D第13題（2.0分）"字體"對(duì)話框是調(diào)用_______方法來(lái)實(shí)現(xiàn)的.A:ShowOpenB:ShowColorC:ShowCloseD:ShowFont答案：D第14題（2.0分）在窗體上添加一個(gè)命令按鈕，編寫(xiě)如下代碼：OptionBase1PrivateSubCommand1_ClickDima(10)AsInteger,p(3)AsIntegerk=5Fori=1To10a(i)=iNextiFori=1To3p(i)=a(i*i)NextiFori=1To3k=k+p(i)*2NextiPrintkEndSub程序運(yùn)行后，單擊命令按鈕，輸出結(jié)果是A:35B:28C:33D:37答案：C第15題（2.0分）如果一個(gè)工程含有多個(gè)窗體及標(biāo)準(zhǔn)模塊,則以下敘述中錯(cuò)誤的是().A:如果工程中含有SubMain過(guò)程,則程序一定首先執(zhí)行該過(guò)程B:不能把標(biāo)準(zhǔn)模塊設(shè)置為啟動(dòng)模塊C:用Hide方法只是隱藏一個(gè)窗體,不能從內(nèi)存中清除該窗體D:任何時(shí)刻最多只有一個(gè)窗體是活動(dòng)窗體答案：A第16題（2.0分）為了把焦點(diǎn)移到某個(gè)指定的控件,所使用的方法是().A:SetFocusB:VisibleC:RefreshD:GetFocus答案：A第17題（2.0分）在逐行運(yùn)行程序的語(yǔ)句時(shí),可用調(diào)試窗口監(jiān)視表達(dá)式和變量的值,其中()窗口是用來(lái)顯示代碼中正在調(diào)試的語(yǔ)句所產(chǎn)生的信息,或顯示直接在該窗口中鍵入的命令所請(qǐng)求的信息.A:立即B:監(jiān)視C:本地D:中斷答案：A第18題（2.0分）下面關(guān)于順序文件的描述正確的是A:每條記錄的長(zhǎng)度必須相同B:可通過(guò)編程對(duì)文件中的某條記錄方便地修改C:數(shù)據(jù)只能以ASCII碼形式存放在文件中,所以可通過(guò)文本編輯軟件顯示D:文件的組織結(jié)構(gòu)復(fù)雜答案：C第19題（2.0分）在下列說(shuō)法中,正確的是___.A:通過(guò)適當(dāng)?shù)脑O(shè)置,可以在程序運(yùn)行期間,讓時(shí)鐘控件顯示在窗體上B:在列表框中不能進(jìn)行多項(xiàng)選擇C:在列表框中能夠?qū)㈨?xiàng)目按字母順序從大到小排列D:框架也有Click和DblClick事件答案：D第20題（2.0分）窗體的Enable屬性的屬性值是()類型的數(shù)據(jù).A:整型B:字符型C:邏輯型D:實(shí)型答案：C三、程序填空共1題（共計(jì)10分）第1題（10.0分）'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能：用戶界面如圖所示，實(shí)現(xiàn)左右兩個(gè)組合框中數(shù)據(jù)的左移和右移功能。'程序開(kāi)始運(yùn)行時(shí)，在左邊組合框中生成10個(gè)由小到大排列的隨機(jī)三位'正整數(shù)(在設(shè)計(jì)階段該組合框的Sorted屬性值已設(shè)置為True),'現(xiàn)要求完成:'（1）單擊"＞＞"鈕，左邊組合框中的10個(gè)數(shù)全部移動(dòng)到右邊組合框，'，同時(shí)使"＜＜"鈕能響應(yīng)，"＞＞"鈕不能響應(yīng)。'（2）單擊"＜＜"鈕，右邊組合框中的10個(gè)數(shù)全部移到左邊的組合框，，同時(shí)使"＞＞"鈕能響應(yīng)，"＜＜"鈕不能響應(yīng)；'（3）單擊"結(jié)束"按鈕，結(jié)束程序運(yùn)行。'-------------------------------------------------------PrivateSubcmdLeft_Click()DimiAsIntegerFori=0TocomboRight.ListCount-1comboLeft.AddItemcomboRight.List(i)NexticomboRight.Clear'**********SPACE**********【?】=False'**********SPACE**********【?】=TrueEndSubPrivateSubcmdRight_Click()DimiAsInteger'**********SPACE**********Fori=0To【?】-1comboRight.AddItemcomboLeft.List(i)Nexti'**********SPACE**********【?】.ClearcmdRight.Enabled=FalsecmdLeft.Enabled=TrueEndSubPrivateSubCommand3_Click()EndEndSubPrivateSubForm_Load()DimiAsIntegerLabel1.Caption="組合框1"Label2.Caption="組合框2"cmdRight.Caption=">>"cmdRight.Enabled=TruecmdLeft.Caption="<<"cmdLeft.Enabled=FalsecmdExit.Caption="結(jié)束"comboLeft.Text=""Fori=1To10comboLeft.AddItemInt(Rnd*900)+100NexticomboRight.Text=""EndSub答案：=======(答案1)=======cmdLeft.Enabled=======(答案2)=======cmdRight.Enabled=======(答案3)=======comboLeft.ListCount=======(答案4)=======comboLeft四、程序改錯(cuò)共1題（共計(jì)10分）第1題（10.0分）'------------------------------------------------'【程序改錯(cuò)】'------------------------------------------------'題目:編程求一個(gè)十進(jìn)制整數(shù)n的各位數(shù)字之和，設(shè)n為小于或等于5位的數(shù)。'------------------------------------------------OptionExplicitPrivateSubForm_Click()DimNAsInteger,SumAsInteger,S1AsString,S2AsStringDimiAsInteger,ChAsStringSum=0N=InputBox("輸入整數(shù)n")S1=Str(N)'**********FOUND**********S1=RTrim(S1)Fori=1ToLen(S1)'**********FOUND**********Ch=Mid(N,i,1)'**********FOUND**********Sum=Val(Ch)NextiPrint"該整數(shù)的各位數(shù)之和是：";SumEndSub答案：=======(答案1)=======S1=Trim(S1)=========或=========S1=lTrim(S1)=======(答案2)=======Ch=Mid(S1,i,1)=======(答案3)=======Sum=Sum+Val(Ch)=========或=========Sum=Sum+Val(Ch)五、程序設(shè)計(jì)共1題（共計(jì)20分）第1題（20.0分）'-------------------------------------------------'【程序設(shè)計(jì)】'-------------------------------------------------'題目：(事件)雙擊窗體。'(響應(yīng))把一元鈔票換成一分、二分和五分的硬幣'（每種至少有一枚），求出其所有的換法，'把結(jié)果輸出在窗體上。'將所有的換法的數(shù)目存入變量N中'-------------------------------------------------答案：----------------------Dimi,j,kAsIntegerFori=1To100Forj=1To50Fork=1To20If((i+2*j+k*5)=100)ThenPrint(CStr(i))Print(CStr(j))Print(CStr(k))n=n+1EndIfNextNextNext----------------------六、VB窗體設(shè)計(jì)共1題（共計(jì)10分）第1題（10.0分）------------------------------------------------【窗體設(shè)計(jì)】------------------------------------------------題目：建立如圖所示的窗體，完成各按鈕的功能。界面上放置5個(gè)按鈕調(diào)整好位置和大小。各控件屬性設(shè)置如下表，當(dāng)分別單擊下方四個(gè)按鈕時(shí)，＇實(shí)驗(yàn)按鈕＇作相應(yīng)的變化，請(qǐng)?jiān)O(shè)計(jì)程序。各控件屬性設(shè)置如下表：對(duì)象名稱Name屬性Caption屬性窗體默認(rèn)默認(rèn)cmd1按鈕可見(jiàn)cmd2按鈕不可見(jiàn)命令按鈕cmd3按鈕可用cmd4按鈕不可用cmdsy實(shí)驗(yàn)按鈕------------------------------------------------試卷編號(hào)：8950所屬語(yǔ)言：VisualBasic試卷方案：09-10-2《程序設(shè)計(jì)基礎(chǔ)—VB》模擬試卷總分：100分共有題型：6種一、判斷共5題（共計(jì)10分）第1題（2.0分）在Sub過(guò)程中,可以用Return語(yǔ)句退出Sub過(guò)程.答案：Y第2題（2.0分）命令Picture1.Circle(500,800),800能夠在圖片框Picture1中畫(huà)出的圖形是圓心在(500,800)的一個(gè)圓.答案：Y第3題（2.0分）VisualBasic程序的運(yùn)行,僅能從某一窗體啟動(dòng),如Form1窗體.答案：N第4題（2.0分）用For循環(huán)寫(xiě)的程序不能用While循環(huán)來(lái)寫(xiě).答案：N第5題（2.0分）VisualBasic的工程文件的擴(kuò)展名為frm答案：N二、單項(xiàng)選擇共20題（共計(jì)40分）第1題（2.0分）下列多分支選擇結(jié)構(gòu)的Case語(yǔ)句,寫(xiě)法錯(cuò)誤的是().A:Case1,5,7,9B:Case8To12C:CaseIs<"Man"D:Case5To2答案：D第2題（2.0分）如果Form1是啟動(dòng)窗體,并且Form1的Load事件過(guò)程中有語(yǔ)句Form2.Show,則程序啟動(dòng)后().A:發(fā)生一個(gè)運(yùn)行時(shí)錯(cuò)誤B:發(fā)生一個(gè)編譯錯(cuò)誤C:在所有的初始化代碼運(yùn)行后Form1是活動(dòng)窗體D:在所有的初始化代碼運(yùn)行后Form2是活動(dòng)窗體答案：C第3題（2.0分）語(yǔ)句Ifx=1Theny=1,下列說(shuō)法正確的是A:x=1和y=1均為賦值語(yǔ)句B:x=1和y=1均為關(guān)系表達(dá)式C:x=1為關(guān)系表達(dá)式,y=1為賦值語(yǔ)句D:x=1為賦值語(yǔ)句,y=1為關(guān)系表達(dá)式答案：C第4題（2.0分）下面程序段輸出的結(jié)果是PrivateSubCommand1_Click()Dima(1To3,4)AsIntegerPrintLBound(a,1),UBound(a,1),LBound(a,2),UBound(a,2)EndSubA:1304B:0314C:1314D:0304答案：A第5題（2.0分）要使時(shí)鐘控件Timer1的Timer事件不起作用,以下正確的語(yǔ)句是A:Timer1.Visible=FalseB:Timer1.Enabled=FalseC:Timer1.Interval=1000D:Timer1.Index=0答案：B第6題（2.0分）形狀控件所顯示的圖形不可能是().A:圓B:橢圓C:圓角正方形D:等邊三角形答案：D第7題（2.0分）可用來(lái)改變坐標(biāo)度量單位的是A:Drawstyle屬性B:DrawWidth屬性C:Scale方法D:ScaleMode屬性答案：D第8題（2.0分）以下程序的輸出結(jié)果是______.PrivateSubCommand1_Click()a=100Dos=s+aa=a+1LoopUntila>100printaEndSubA:100B:120C:201D:101答案：D第9題（2.0分）文件號(hào)最大可取的值為A:255B:511C:512D:256答案：B第10題（2.0分）決定控件上文字的字體、字形、大小、效果的屬性是().A:FontB:CaptionC:NameD:Text答案：A第11題（2.0分）下面是()合法的字符常數(shù).A:ABC$B:"ABC"C:'ABC'D:ABC答案：B第12題（2.0分）在下面關(guān)于窗體事件的敘述中,錯(cuò)誤的是A:用Hide方法不但可以隱藏窗體,而且可以清除內(nèi)存中的窗體B:在多重窗體的程序中,各窗體的德菜單是彼此獨(dú)立的C:對(duì)于多重窗體,需要單獨(dú)保存每個(gè)窗體D:Resize事件在窗體的大小有所改變時(shí)被觸發(fā)答案：C第13題（2.0分）下列敘述正確的是().A:對(duì)象是包含數(shù)據(jù)又包含對(duì)象數(shù)據(jù)進(jìn)行操作的方法的物理實(shí)體B:對(duì)象的屬性只能在屬性窗口中設(shè)置C:不同的對(duì)象能識(shí)別不同的事件D:事件過(guò)程都要由用戶點(diǎn)擊對(duì)象來(lái)觸發(fā)答案：C第14題（2.0分）下面關(guān)于隨機(jī)文件的描述正確的是A:文件中的內(nèi)容是通過(guò)隨機(jī)數(shù)產(chǎn)生的B:文件中的記錄號(hào)通過(guò)隨機(jī)數(shù)產(chǎn)生C:可對(duì)文件中的記錄根據(jù)記錄號(hào)隨機(jī)地讀寫(xiě)D:文件的每條記錄的長(zhǎng)度是隨機(jī)的答案：C第15題（2.0分）用鍵盤(pán)的光標(biāo)鍵選中某一菜單項(xiàng),并按回車將觸發(fā)菜單的()的事件.A:KeyPressB:KeyDownC:ClickD:KeyUp答案：C第16題（2.0分）工程資源管理器窗口中包含的文件類型有()種.A:2B:3C:4D:5答案：C第17題（2.0分）表達(dá)式(-1)*Sgn(-100+Int(Rnd*100))的值是().A:0B:1C:-1D:隨機(jī)數(shù)答案：B第18題（2.0分）CLS可清除窗體或圖形框中的內(nèi)容是A:Picture屬性設(shè)置的背景圖案B:在設(shè)計(jì)時(shí)放置的控件C:程序運(yùn)行時(shí)產(chǎn)生的圖形和文字D:以上A~C全部答案：C第19題（2.0分）為了在按下回車鍵時(shí)執(zhí)行某個(gè)命令按鈕的事件過(guò)程,需要把該命令按鈕的一個(gè)屬性設(shè)置為True,這個(gè)屬性是().A:ValueB:DefaultC:CancelD:Enabled答案：B第20題（2.0分）窗體設(shè)計(jì)器是用來(lái)設(shè)計(jì)().A:應(yīng)用程序的代碼段B:應(yīng)用程序的界面C:對(duì)象的屬性D:對(duì)象的事件答案：B三、程序填空共1題（共計(jì)10分）第1題（10.0分）'-------------------------------------------------------'【程序填空】'-------------------------------------------------------'功能：以下程序段采用選擇法對(duì)數(shù)組元素進(jìn)行從大到小排序。'-------------------------------------------------------OptionBase1PrivateSubCommand1_Click()DimiA(1To10)n=6iA(1)=8:iA(2)=6:iA(3)=9:iA(4)=3:iA(5)=2:iA(6)=7Fori=1Ton-1'**********SPACE**********【?】=i'**********SPACE**********Forj=【?】TonIfiA(j)>iA(k)Then'**********SPACE**********【?】EndIfNextjt=iA(i)iA(i)=iA(k)iA(k)=tForm=1TonPrintiA(m);NextmPrintNextiEndSub答案：=======(答案1)=======k=========或=========k%=======(答案2)=======i+1=========或=========1+i=======(答案3)=======k=j=========或=========k%=j四、程序改錯(cuò)共1題（共計(jì)10分）第1題（10.0分）'------------------------------------------------'【程序改錯(cuò)】'------------------------------------------------'題目：以下程序用于建立一個(gè)三行三列的矩陣，使其兩'條對(duì)角線上數(shù)字為1，其余位置為0'------------------------------------------------OptionExplicitPrivateSubForm_Click()Dimx(3,3),nAsInteger,mAsIntegerForn=1To3Form=1To3'**********FOUND**********Ifn=mThenx(n,m)=1Elsex(n,m)=0'**********FOUND**********Nextn,mForn=1To3Form=1To3'**********FOUND**********Printx(m,n)NextmPrintNextnEndSub答案：=======(答案1)=======Ifn=mOrm=3+1-nThenx(n,m)=1Elsex(n,m)=0=========或=========Ifn=mOrm=1-n+3Thenx(n,m)=1Elsex(n,m)=0=========或=========Ifn=mOrm=1+3-nThenx(n,m)=1Elsex(n,m)=0=========或=========Ifn=mOrm=-n+1+3Thenx(n,m)=1Elsex(n,m)=0=========或=========Ifn=mOrm=-n+3+1Thenx(n,m)=1Elsex(n,m)=0=========或=========Ifn=mOrm=3-n+1Thenx(n,m)=1Elsex(n,m)=0=========或=========ifn=morm=3-n+1thenx(n,m)=1elsex(n,m)=0=========或=========ifn=morm=4-nthenx(n,m)=1elsex(n,m)=0=========或=========Ifn=mOrm+n=4Thenx(n,m)=1Elsex(n,m)=0=========或=========Ifm=norm+n=4thenx(n,m)=1elsex(n,m)=0=======(答案2)=======Nextm,n=======(答案3)=======Printx(n,m);=========或=========Printx(m,n);五、程序設(shè)計(jì)共1題（共計(jì)20分）第1題（20.0分）'-------------------------------------------------'【程序設(shè)計(jì)】'-------------------------------------------------'題目：求兩個(gè)數(shù)m,n的最大公約數(shù)p和最小公倍數(shù)q'-------------------------------------------------答案：----------------------nm=n*mIfm<nThent=m:m=n:n=tr=mModnDoWhile(r<>0)m=nn=rr=mModnLoopp=nq=nm/n----------------------六、VB窗體設(shè)計(jì)共1題（共計(jì)10分）第1題（10.0分）---------------------------------------------------------------------【窗體設(shè)計(jì)】---------------------------------------------------------------------題目：請(qǐng)按照題目要求設(shè)計(jì)指定的窗體。建立如圖所示界面：---------------------------------------------------------------------設(shè)計(jì)一個(gè)由3個(gè)窗體組成的＇古詩(shī)欣賞＇應(yīng)用程序。1)Form1窗體中添加Label標(biāo)簽填入“請(qǐng)選擇要閱讀的古詩(shī)詞”字體為：宋體，大小：三號(hào)字。添加3個(gè)按鈕分別為：Command1，Command2，Command3。Command1標(biāo)題內(nèi)容為：豐樂(lè)庭游春。Command2標(biāo)題內(nèi)容為：山行。Command3標(biāo)題內(nèi)容為：結(jié)束。2）Form2窗體中輸出：“豐樂(lè)庭游春（宋）歐陽(yáng)修”輸出：“紅樹(shù)青山日欲斜，長(zhǎng)郊草色綠無(wú)涯。游人不管春江老。來(lái)往庭前踏落花。”添加1個(gè)按鈕為：Command1標(biāo)題的內(nèi)容為：返回3）Form3窗體中輸出：“山行（唐）杜牧”輸出：“遠(yuǎn)上寒山石徑斜，白云深處有人家。停車坐愛(ài)楓林晚，霜葉紅于二月花。”添加1個(gè)按鈕為：Command1標(biāo)題的內(nèi)容為：返回4）編寫(xiě)事件單擊Form1窗體中的“豐樂(lè)庭游春”按鈕打開(kāi)Form2窗體單擊Form1窗體中的“山行”按鈕打開(kāi)Form3窗體單擊Form1窗體中的“結(jié)束”按鈕退出試卷編號(hào)：8956所屬語(yǔ)言：VisualBasic試卷方案：09-10-2《程序設(shè)計(jì)基礎(chǔ)—VB》模擬試卷總分：100分共有題型：6種一、判斷共5題（共計(jì)10分）第1題（2.0分）三種基本控制結(jié)構(gòu)是:順序結(jié)構(gòu)、選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu).答案：Y第2題（2.0分）欲在PictureBox控件上設(shè)置其它控件,