2023年Basic程序設計期末綜合練習題二

VisualBasic程序設計期末綜合練習題二一、單項選擇題1．在下列有關(guān)VisualBasic的敘述中，錯誤的是（）。A．采用了事件驅(qū)動的編程機制B．是面向?qū)ο蟮木幊陶Z言C．是可視化的程序設計語言D是面向過程的程序設計語言．2．應用程序打包后，其包文獻的后綴為（）。A．.exeB．.txtC．.cabD．.ocx3．在新建一個“標準EXE”工程后，不在工具箱中出現(xiàn)的控件是（）。A．列表框B．通用對話框C．驅(qū)動器列表框D．圖片框4．設窗體的名稱為Form1，則在程序運營過程中，單擊窗體時，被執(zhí)行的事件過程的名稱是（）。A．Form1_Click()B. Form1_DbClick() C．Form_Click()D．Form_DbClick() 5．對于定期器（Timer）控件,設立其定期是否啟動的屬性是（）。A．IndexB．TagC．EnabledD．Interval6．在VisualBasic中，工程文獻的擴展名為（）。A．.frmB．.vbpC．.clsD．.bas7．有程序代碼如下：Text1.Text="歡迎走進VB世界！"則Text1，Text，和"歡迎走進VB世界！"分別代表（）。A．對象，值，屬性B．對象，屬性，值C．對象，方法，屬性D．屬性，對象，值8．以下敘述中對的的是（）。A．窗體的Name屬性指定窗體的名稱，用來標記一個窗體B．窗體的Name屬性的值是顯示在窗體標題欄中的文本C．可以在運營期間改變對象的Name屬性的值D．對象的Name屬性值可認為空9.VB提供了結(jié)構(gòu)化程序設計的三種基本結(jié)構(gòu)是（）。A．選擇結(jié)構(gòu)、過程結(jié)構(gòu)、順序結(jié)構(gòu)B．選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)、順序結(jié)構(gòu)C．過程結(jié)構(gòu)、轉(zhuǎn)向結(jié)構(gòu)、遞歸結(jié)構(gòu)D．遞歸結(jié)構(gòu)、選擇結(jié)構(gòu)、循環(huán)結(jié)構(gòu)10．在VB中，下列變量名不合法的是（）。A．take_1B．takeC．take_1_2D．take-111．下列說法中對的的是（）。為了保存一個VisuaBasic應用程序，應當A．只保存窗體文獻B．只保存工程文獻C．分別保存工程文獻和標準模塊文獻D．分別保存工程文獻、窗體文獻和標準模塊文獻12．擬定一個控件在窗體上的位置的屬性是（）。A．Width或HeightB．Width和HeightC．Top和LeftD．Top或Left13．擬定一個窗體或控件的大小的屬性是（）A．Width或HeightB．Width和HeightC．Top或LeftD．Top和Left14．當一個工程具有多個窗體時，其中的啟動窗體是（）。A．第一個添加的窗體B．最后一個添加的窗體C．包含控件最多的窗體D．在“工程屬性”對話框中指定的窗體15．在一個語句行內(nèi)寫多條語句時，語句之間應當用（）分隔。A．逗號B．冒號C．頓號D．分號16．要設立命令按鈕的背景圖形，必須設立的兩個屬性是（）。A．Style和PictureB．Style和IconC．Caption和PictureD．Value和Icon17．目錄列表框的Path屬性的作用是（）。A．顯示當前驅(qū)動器或指定驅(qū)動器上的某目錄下的文獻名B．只顯示當前程徑下的文獻C．顯示根目錄下的文獻名D．顯示當前驅(qū)動器或指定驅(qū)動器上的途徑18．將數(shù)據(jù)"China"項添加到列表框（List1）中成為第一項應使用的語句是（）。A．List1.AddItem0,"China"B．List1.AddItem1,"China"C．List1.AddItem"China",0D．List1.AddItem"China",119．要繪制多種形狀的圖形，需要設立Shape控件的（）屬性。A、StyleB、BorderstyleC、FillStyleD、Shape20．下列可以把當前目錄下的圖形文獻pic1.jpg裝入圖片框Picture1中的語句為（）。A．Picture1="pic1.jpg"B．Picture1=LoadPicture("pic1.jpg")C．Picture1.Picture=LoadPicture(("pic1.jpg")D．Picture1.Picture=LoadPicture(("pic1")21．假如要在窗體代碼編輯器的”通用”部分定義私有Sub過程，則對的的語句是（）。A．PublicSubB．PrivateSubC．PublicFunctionD．PrivateFunction22．不屬于VB數(shù)據(jù)庫引擎的是（）。A．ODBCB．BDEC．Jet引擎D．OLEDB23.在VB應用程序中，進行斷點設立的按鍵是（）。A．Ctrl+F9鍵B．F9鍵C．Ctrl+F8鍵D．F8鍵24．假如準備讀文獻，打開順序文獻”text.dat”的對的語句是（）。A．open"text.dat"ForwrireAs#1B．open"text.dat"ForBinaryAs#1C．open"text.dat"ForInputAs#1D．open"text.dat"ForRandomAs#125．使用ADO對象模型時，使Recordset和Connection對象建立連接的屬性是（）。A．OpenB．ExecuteC．CommandTypeD．ActiveConnection26.使用ADO對象模型時，使Recordset和Connection對象建立連接的屬性是（）。A．OpenB．ExecuteC．CommandTypeD．ActiveConnection27．在VB中，一旦數(shù)據(jù)到達，將一方面觸發(fā)Winsock控件的（）。A．DataArrival事件B．ConnectionRequest事件C．DataSend事件D．GetGet事件28．Winsock控件的LocalPort屬性的作用是（）A．僅返回所用斷口B．僅設立所用端口C．返回或設立所用端口D．返回或設立IP地址二、填空題1．每個應用程序必須有一個惟一的文獻。2．窗體文獻和類模塊文獻的擴展名分別是和。3．表達式6+15\2*2Mod2的值是。4．表達式17\2-2^3*5MOD6的值是。5．計時器控件響應的事件是。6．在VisualBasic中，變量的默認類型是。7．為了在運營時把當前程徑下的圖形文獻show.jpg裝入圖片框P1，所使用的語句為。8．設某個程序中要用到一個二維數(shù)組，規(guī)定數(shù)組名為A，類型為整型，第一維下標從0到2，第二維下標從1到3，則相應數(shù)組聲明語句為。9．用DimA(-2to3)語句聲明二維數(shù)組后，數(shù)組A的元素共有個。10.VB中參數(shù)傳遞的機制有兩種，一種是參數(shù)，另一種是參數(shù)。11.控件數(shù)組的名字由屬性指定，而數(shù)組中的每個元素由屬性決定。12．若窗體的左上角坐標為（-200，250），右下角坐標為（300，-150），則X軸的正向向，Y軸的正向向。13．窗體、圖片框或圖像框中的圖形通過對象屬性。14．在VB中，將Foxpro稱為外部數(shù)據(jù)庫，Access稱為，SQLServer稱為。15．vb應用程序與數(shù)據(jù)庫進行通信的重要機制稱為。16．全局變量必須在模塊中定義，所使用的關(guān)鍵字為。17．全局變量是指那些在中有效的變量，一般在模塊代碼編輯器的頂部使用聲明。18．Winsock控件重要用來編制或協(xié)議的網(wǎng)絡應用程序。三、閱讀程序題（共25分）閱讀下列程序并寫出程序運營結(jié)果1．PrivateSubCommand1_Click()DimxAsIntegerStaticsAsIntegerx=Val(InputBox("請輸入一個正整數(shù)="))Ifx<5Thens=s*xElses=s+xEndIfText1.Text="s="&Str(s)EndSub程序運營時連續(xù)3次單擊Command1，且設輸入的數(shù)據(jù)為6、5、4時，分別寫出文本框Text1的值。2.PrivateSubForm_Click()StaticaAsIntegerDimbAsIntegera=a+3b=b+4Text1=aText2=bEndSub寫出程序運營時連續(xù)單擊三次窗體后，文本框Text1和Text2顯示結(jié)果。3.PrivateSubForm_Click()DimA(1To3)AsStringDimcAsInteger,jAsIntegerA(1)="2"A(2)="4"A(3)="6"c=2Forj=1To3c=c+Val(A(j))NextjPrintcEndSub寫出程序運營時單擊窗體后，F(xiàn)orm1上的輸出結(jié)果。4.PrivateSubForm_Click()n=0Fori=1To2Forj=2To4IfjMod2<>0Thenn=n+1EndIfn=n+2NextjNextiPrintnEndSub寫出程序運營時單擊窗體后，窗體Form1上的輸出結(jié)果。5.PrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=2:b=3Fori=1To3Forj=1Toib=b+jNextja=a+bNextiPrintaEndSub寫出程序運營時單擊命令按鈕后，窗體Form1上的輸出結(jié)果。6.PrivateSubForm_Click()DimA(1To4)AsStringDimcAsIntegerDimjAsIntegerA(1)="4"A(2)="6"A(3)="8"A(4)="10"c=1Forj=1To4c=c+Val(A(j))NextjPrintcEndSub寫出程序運營時單擊窗體后，窗體Form1上的結(jié)果。7.SubChange(ByValxAsInteger,ByValyAsInteger)DimtAsIntegert=xx=yy=tPrintx,yEndSubPrivateSubForm_Click()DimaAsInteger,bAsIntegera=10:b=20Changea,bPrinta,bEndSub寫出程序運營時單擊窗體后，F(xiàn)orm1上的輸出結(jié)果。8.FunctionF(nAsInteger)AsLongDimiAsInteger,TempAsLongTemp=1Fori=1TonTemp=Temp*iNextiF=TempEndFunctionPrivateSubForm_Click()DimkAsInteger,njAsIntegerk=5nj=F(k)Printk;"！=";njEndSub寫出程序運營時，單擊窗體Form1上的輸出結(jié)果。四、完善程序題（共10分）1．已知存在一名為“學生”的SQLServer數(shù)據(jù)庫，其中的“students”數(shù)據(jù)表用來存儲學生的基本情況信息，涉及學號、姓名、籍貫、性別。請編寫一個簡樸的應用程序，向students表中添加學生記錄。程序的基本邏輯是：當窗體被加載時，程序聯(lián)接SQLServer數(shù)據(jù)庫；當點擊“增長”按鈕時，一方面查詢學號是否反復，假如不反復則向students表中添加學生記錄。其運營界面如圖1所示。圖1程序如下，請補充完整。'聲明對象變量ADOcn，用于創(chuàng)建與數(shù)據(jù)庫的連接PrivateADOcnAsConnectionPrivateSubForm_Load()'連接SQLServer數(shù)據(jù)庫DimstrDBAsStringstrDB="Provider=SQLOLEDB;LSF;UserID=sa;Password=;Database=[1]"IfADOcnIsNothingThen[2][3]EndIfEndSubPrivateSubCommand1_Click()'增長學生記錄DimstrSQLAsStringDimADOrsAs[4][5]=ADOcnADOrs.Open“Select學號FromStudentsWhere學號=”+”‘“+Text1+”‘“[6]ThenMsgBox“你輸入的學號已存在，不能新增長！”ElseStrSQL=”InsertIntostudents(學號,姓名,,籍貫,性別)StrSQL=strSQL+Values(”+”‘“+text1+”‘,‘“+text2+”‘,’“+text3+”‘,’“+text4+”‘)”ADOrs.Execute[7]MsgBox“添加成功，請繼續(xù)！”EndIfPrivateSubCommand2_Click()UnloadMeEndSub2．在窗體上建立一個驅(qū)動器列表框、目錄列表框、文獻列表框、圖片框、文本框。規(guī)定程序運營后，驅(qū)動器列表框Drive1的默認驅(qū)動器設立為E盤，選擇File1中所列的圖片文獻（*.bmp,*.gif和*.jpg）,則相應的圖片顯示在圖片框Picture1中，文獻的途徑顯示在文本框中。程序運營結(jié)果如圖2所示。圖2程序如下，請補充完整。PrivateSubForm_Load()Drive1.Drive=[1][2]="*.bmp;*.gif;*.jpg"EndSubPrivateSubDrive1_change()[3]=Drive1.DriveText1.Text=Drive1.DriveEndSubPrivateSubDir1_Change()[4]Text1.Text=Dir1.PathEndSubPrivateSubFile1_click()Picture1.[5]=LoadPicture(File1.Path+"\"+File1.FileName)FileName=File1.Path+"\"+File1.FileNameText1.Text=[6]EndSub五、編寫程序題1.按下述規(guī)定，編寫一征收所得稅程序。（1）收入在1000元以內(nèi)，不納稅；（2）收入超過1000元以上的部分，納稅20%（3）當收入達成5000元或超過時，5000元以上的部分，納稅22%。程序運營界面如圖3所示：圖3答案一、單項選擇題1.D2.C3.B4.C5.C6.B7.B8.A9.B10.D11.D12.C13.B14.D15.B16.A17.D18.C19.D20.C21．B22．B23．B24．C25.D26.D27.A28.C二、填空題（每小題2分，共20分