VB考試基礎(chǔ)試題

PAGEPAGE1一、選擇題：1、VisualBasic是一種面向()的程序設(shè)計(jì)語(yǔ)言A、用戶B、事件C、程序D、對(duì)象2、VisualBasic主要用于開(kāi)發(fā)哪種環(huán)境下的程序（）A、DOSB、DOS和WindowsC、WindowsD、UNIX3、一個(gè)邏輯型變量在內(nèi)存當(dāng)中占的存儲(chǔ)空間是（）A、一個(gè)字節(jié)B、兩個(gè)字節(jié)C、四個(gè)字節(jié)D、八個(gè)字節(jié)4、在VisualBasic6.0中規(guī)定窗體文件的擴(kuò)展名是：A、frmB、forC、vbpD、bas5、一輛黑色汽車駛進(jìn)車站，則駕駛、黑色、汽車、進(jìn)站依次對(duì)應(yīng)__________A、對(duì)象，屬性，事件，方法B、屬性，對(duì)象，事件，方法 C、方法，屬性，對(duì)象，事件D、事件，屬性，對(duì)象，方法6、在VisualBasic代碼窗口中，將某一條語(yǔ)句加以注釋和說(shuō)明時(shí)，應(yīng)在語(yǔ)句前加()A、逗號(hào)（，）B、冒號(hào)（：）C、單引號(hào)（’）D、問(wèn)號(hào)（?）7、下列控件中可用于接受用戶輸入文本，又可用于顯示文本的是（）A、Label控件B、TextBox控件C、Timer控件D、CommandButton控件8、如果要改變窗體的標(biāo)題,需要設(shè)置窗體對(duì)象的_____屬性。A、CaptionB、NameC、BackColorD、BorderStyle9、要在C盤當(dāng)前文件夾下建立一個(gè)名為Stu1.txt的順序文件，應(yīng)先使用()語(yǔ)句：A、Open"Stu1.txt"ForOutputAs#2B、Open"C：Stu1.txt"ForlnputAs#2C.、Open"C：Stu1.txt"ForOutputAs#2D、Open"Stu1.txt"ForlnputAs#210、PrivateSubCommand1_Click()StaticXAsIntegerDimYAsIntegerY=Y+5:X=X+5PrintX,YEndSub程序運(yùn)行時(shí)，第三次單擊命令按鈕Commandl后，窗體上顯示的結(jié)果為()A．55B．155C.1515D．511、在VisualBasic中，以下選項(xiàng)中表示窗體的裝入事件的是：A、KeyUpB、ClickC、ActivateD、Load12、如果每一秒激發(fā)一次計(jì)時(shí)器事件，則設(shè)置計(jì)時(shí)器（Timer）控件的Interval屬性為（）：A、1000B、100C、10D、13、下列標(biāo)識(shí)符書寫正確的是（）A、9x B、X1+X2 14、表達(dá)式運(yùn)算結(jié)果Int(-5.2)是（）A、-5B、5C、-6D、615、下列（）屬性是每個(gè)控件都有的。A、NameB、CaptionC、FontD、Interval16、保存一個(gè)VB程序時(shí)需要保存兩個(gè)文件：A、.vbp文件和.frm文件B、窗體文件和.frm文件C、工程文件和.vbpD、模塊文件和.bas文件17、當(dāng)程序運(yùn)行時(shí)，需要給用戶一些提示信息或警告信息時(shí)，應(yīng)使用（）：A、MsgBoxB、InputBoxC、A和B都可以D、A和B都不可以18、按照變量的作用域可將變量劃分為（）A、公有、私有、系統(tǒng)B、全局變量、模塊級(jí)變量、過(guò)程級(jí)變量C、動(dòng)態(tài)、常數(shù)、靜態(tài)D、Public、Private、Protected19、以下能判斷是否到達(dá)文件尾的函數(shù)是（）A.BOFB.LOCC.LOFD.EOF20、表達(dá)式3^2+10mod3-2的值是（）A.9B.7C.8D.421、如果要在菜單中添加一個(gè)分隔線，則應(yīng)將其Caption屬性設(shè)置為（）A、=B、*C、&D、-22、用于清除窗體或圖片框上的圖形和文本，應(yīng)用下列哪個(gè)方法（）A．ClsB．MoveC．RefreshD．show23、如果x是一個(gè)已聲明的整型變量，則執(zhí)行賦值語(yǔ)句x=”6”A.35B.8C.11D.出錯(cuò)24、表達(dá)式PrintVal("20efgh")的值為（）：A、1B、20C、20efghD、efgh25、Fori=1To19.8Step4i=i+2NextiPrintiA、21B、20C、25D、22＊＊請(qǐng)將選擇題答案填在下表內(nèi)＊＊12345678910111213141516171819202122232425二、填空題：1、結(jié)構(gòu)化程序中的三種基本結(jié)構(gòu)是：、和2、VB參數(shù)傳遞有2種方式，分別是：和3、VB中，提供了三種訪問(wèn)文件的類型，分為是、和4、Left(“student”,6)=5、用戶自定義過(guò)程分Sub開(kāi)頭的和Function開(kāi)頭的6、因?yàn)榻M合框是文本框和列表框的組合，所以其大多數(shù)屬性都和這兩個(gè)控件相同。其中只有一個(gè)特殊的_________屬性為其獨(dú)有。7、用DimA(3，1to4)AsInteger定義數(shù)組，則該數(shù)組A有______個(gè)元素8、使用______聲明一個(gè)符號(hào)常量。9、如果不能事先確定變量的數(shù)據(jù)類型，則可以把它聲明為_(kāi)___________類型。三、完成程序：1、編程獲取800以內(nèi)所有能被18整除的數(shù)Dimi%Fori=1to800IfthenEndifNexti2、輸出兩個(gè)數(shù)中較大的一個(gè)數(shù)PrivateSubCommand1_Click()DimAAsSingle,BAsSingle,MAXAsSingleA=‘從輸入對(duì)話框中接收第1個(gè)數(shù)B=‘從輸入對(duì)話框中接收第2個(gè)數(shù)IFA>BTHENELSEPRINT“MAX=“;MAXEndSub3、求分段函數(shù)：例如：2X＋5(當(dāng)X≥5時(shí))Y=5X－2(當(dāng)X<5時(shí))用InputBox輸入自變量X的值，輸出Y的值按右圖說(shuō)明完成：PrivateSubForm_Click()DimX,YAsSingleX=IFThenPrint"y=";YElsePrint"y=";YEndIfEndSub4、對(duì)隨機(jī)產(chǎn)生5個(gè)兩位數(shù)進(jìn)行排序（升序）PrivateSubCommand1_Click()Dima(1To5)AsIntegerDimiAsInteger,jAsIntegerDimminAsIntegerRandomizePrint"排序前："Fori=1To5a(i)=printa(i)；NextiprintFori=1To5-1Forj=1To5-iIfThenmin=a(j)a(j)=a(j+1)a(j+1)=minEndIfNextjNextiPrint"排序后的結(jié)果："Fori=1To5Printa(i);NextiPrintEndSub四、讀程序?qū)懡Y(jié)果下列程序段的運(yùn)行結(jié)果是：1.PrivateSubCommand1_Click()S=0ForI=9To42Step11S=S+INextIIfI>50ThenS=S+IElseS=S-IPrintSEndSub結(jié)果：_______2.PrivateSubCommand1_Click()DimI%,sum%sum=0I=0DoWhileI<=100sum=sum+II=I+20LoopPrintI,sumEndSub結(jié)果：_______3.當(dāng)X的輸入值為5,-7,0時(shí),讀程序段,計(jì)算出結(jié)果.PrivateSubCommand1_Click()DimxAsIntegerx=InputBox("請(qǐng)輸入X的值:")SelectCaseSgn(x)+2Case1Print"x=";x,"y=";x^2Case2Print"x=";x,"y=";xCase3Print"x="