VisualBasic程序設(shè)計期末綜合練習(xí)題一_百度文庫解析

1、Visual Basic程序設(shè)計期末綜合練習(xí)題一一、單項選擇題1. Visual Basic是一種面向?qū)ο蟮目梢暬幊陶Z言,采取了（的編程機制。A. 從主程序開始執(zhí)行B. 按過程順序執(zhí)行C. 事件驅(qū)動D. 按模塊順序執(zhí)行2. 在Visual Basic中,窗體文件的擴展名為（。A. .vbpB. .frmC. .clsD. .bas3. Visual Basic6.0集成開發(fā)環(huán)境有三種工作模式，下列不屬于三種工作模式之一 的是（。A. 設(shè)計模式B. 編寫代碼模式C. 中斷模式D.執(zhí)行模式4. 如果對象的名稱為Mytext,而且對象有一個屬性Text，那么在代碼中引用該屬 性的正確格式是（。A.

2、 Text.MytextB. Mytext*TextC. Mytext.（TextD. Mytext.Text5. 下列關(guān)于變量的說法不正確的是（。A. 局部變量在聲明它的過程執(zhí)行完畢后就被釋放了B. 局部變量的作用域僅限于聲明它的過程C. 靜態(tài)局部變量是在過程中用Static語句聲明的D. 局部變量是指那些在過程中用Dim語句或Static語句聲明的變量6. 關(guān)于對象的屬性不正確的是（。A. 對象的屬性一般有屬性名和屬性值B. 可通過屬性窗口設(shè)置屬性的值C. 可通過程序代碼設(shè)置屬性的值D. 對象的所有屬性值均可在設(shè)計時設(shè)計7. 在設(shè)計階段,雙擊窗體上的某個控件時，打開的窗體是（。A. 工程資

3、源管理器窗口B. 工具箱窗口C. 代碼編輯器窗口D. 屬性窗口8. 要在窗體的標題內(nèi)顯示“myfrm使用的語句是（。A. Form.captio n=myfrmB. Forml.captio n=myfrmC. Forml.Pri ntmyfrmD. Form.Pri ntmyfrm9. 在VB中，下列變量名不合法的是（。A. file_1B. fileC. file-1D. file_1_210. 在設(shè)計動畫時，用時鐘控件來控制動畫速度的屬性是（A. E nabledB. MoveC. I ntervalD. Timer11. 要從ForNext循環(huán)中退出循環(huán)，應(yīng)使用（語句。A. ExitB

4、. Exit ForC. Co nti nueD. Stop Loop12. 文本框ScrollBars屬性設(shè)置了非零值，卻沒有效果，原因是（。A. 文本框中沒有內(nèi)容B. 文本框的Locked屬性為TrueC. 文本框的 MultiLine屬性為TrueD. 文本框的MultiLine屬性為False13. 要利用公用對話框控件來顯示打開文件”對話框，需要調(diào)用控件的（方法。A. ShowPri nterB. ShowOpe nC. ShowSaveD. ShowColor14. 下列賦值語句正確的是（。A. x = y +zB. y + z = xC. -y= xD. 4 = x +y15.

5、確定一個控件在窗體上位置的屬性是（A. Width 和 HeightB. Width 或 HeightC. Top 和 LeftD. Top 或 Left16. VB程序中設(shè)置斷點的按鍵是（。A. F5 鍵B. F6 鍵C. F9 鍵D. F10 鍵17. 如果希望以模態(tài)方式顯示窗體 Forml,下列正確的語句是（。A. Forml.Show 0B. Form1.ShowC. Form1.Show 1D. 以下都不正確18用語句Dim A（-2To 3As Integer所定義的數(shù)組的元素的個數(shù)是（A. 3B. 4C. 519. 如果創(chuàng)建了命令按鈕的控件數(shù)組，那么Click事件的參數(shù)是（。A.

6、 Captio nB. TagC. I ndexD. 沒有參數(shù)20. 要向圖片框Picturel中加載“d:zhiwu.bmp 圖像文件，應(yīng)使用語句（。A. P1.Picture=LoadPicture（d:hai nan zhiwu.bmpB. P1.Picture=LoadPicture（d:hai nan zhiwu.bmp C. Picture1.Picture= d:ha inan zhiwu.bmp D. Picture1.Picture=LoadPicture（d:hai nan zhiwu.bmp 21. 如果要在窗體代碼編輯器的”通用”部分定義私有Sub過程,則正確的語句是（

7、。A. Public SubB. Private SubC. Public Fun ctionD. Private Function22. 在代碼編輯器中，如果一條語句太長，無法在一行內(nèi)寫下（不包括注釋,要折行書寫，可以在行末使用續(xù)行字符（，表示下一行是當(dāng)前行的繼續(xù)。A. 直接回車B. 個下劃字符”C. 一個空格加一個下劃字符”D. 個空格加一個連字符（-23. 下列敘述不正確的是（。A. 注釋語句是非執(zhí)行語句，僅對程序的有關(guān)內(nèi)容起注釋作用，客觀存在不被解釋 和編譯B. 注釋語句可以放在代碼中的任何位置C. 注釋語句不能放在代碼中的任何位置D. 代碼中加入注釋語句的目的是提高程序的可讀性24.

8、 VB程序中通常不會產(chǎn)生錯誤提示的是（。A. 編譯錯誤B. 實時錯誤C. 運行時錯誤D. 邏輯錯誤25. ADO對象模型含有七種對象，其中代表數(shù)據(jù)庫表中的一整套記錄或執(zhí)行一條 命令而得到的結(jié)果的對象是（。A. Comma ndB. Co nn ectio nC. RecordsetD. Field26使用ADO模型時，建立Recordset和 Conn ection對象的連接的屬性是（。A. ExecuteB. Comma ndTypeC. Ope nD. ActiveC onnection27. 要發(fā)送數(shù)據(jù)，通常使用Win sock控件的（。A. Se ndData 方法B. Listen

9、方法CA ccept 方法D. GetDate 方法28. 下列只能用程序代碼設(shè)置，不能通過屬性窗口設(shè)置的屬性是（。A. Drive 屬性B. Pattern 屬性C. Visible 屬性D. I ndex 屬性二、填空題1. 每個應(yīng)用程序必須有一個惟一的文件2. 欲設(shè)置定時器的時間間隔為1秒,則屬性Interval的值為。3. 表達式5 + 21 2 * 3 Mod 2的值是。4. 表達式5 + 9 Mod 2八3 + 2的值是。5. 列表框中項目的序號是從開始的。6. 計時器控件響應(yīng)的事件是。7. 為了在運行時把當(dāng)前路徑下的圖形文件pictureflower.jpg裝入圖片框Pictur

10、el, 所使用的語句為。8. 執(zhí)行賦值語句a = abc + def,變量a的值是。9. VB中的程序錯誤類型主要有編譯錯誤、等三種。10. 在VB中，將Foxpro稱為外部數(shù)據(jù)庫，Access稱為,SQL Server稱為。11. 數(shù)據(jù)庫應(yīng)用程序?qū)儆谝环N非常典型的前后臺軟件結(jié)構(gòu)，而前后臺之間進行通信的主要機制稱為。12. 若窗體Form1左上角坐標為（0,600右下角的坐標為（800,-200。則X軸的正 向向，丫軸的正向向。13. 用Dim A（3,3語句聲明二維數(shù)組后，數(shù)組A的元素共有個。14. 設(shè)某個程序中要用到一個二維數(shù)組，要求數(shù)組名為A,類型為字符串類型，第一 維下標從1到3,第二

11、維下標從0到3,則相應(yīng)的數(shù)組聲明語句為。15. 果不適先確定變量的數(shù)據(jù)類型，則可以把它聲明為變量。16. tretch屬性設(shè)置為時，圖像框可自動改變大小以適應(yīng)其中的圖形。17.i nsock1丄isten語句的含義是。三、閱讀程序題閱讀下列程序并寫出程序運行結(jié)果1.Private Sub Form_Click(Static a As Stri ngDim b As Stri nga = a + Ab = b + BText1 = aText2 = bEnd Sub寫出程序運行時連續(xù)單擊三次窗體后，文本框Text1和Text2顯示結(jié)果2.Private Sub Form_Click(Static

12、 Sum As In tegerFor i = 1 To 4Sum = Sum + iNext iPrint SumEnd Sub，變量Sum的值。寫出程序運行時點擊窗體兩次后3.Private Sub Comma nd1_Click(Dim A(1 To 5 As In tegerDim x As In tegerFor i = 1 To 5A(i = iNext ii = 1Do While x 3 Thenc = c + 5Exit ForElsek = k + 5End IfNext jPrint c, kEnd Sub寫出程序運行時單擊窗體后，F(xiàn)orm1上的輸出結(jié)果5.Private

13、 Sub Comma nd1_Click(Dim X As In teger, Y As In tegerFor i = 1 To 4Forj = 1 To iY = Y + jNext jX = X + YNext iPrint XEnd Sub寫出程序運行時單擊命令按鈕后，窗體Form1上的輸出結(jié)果6.Private Sub Comma nd1_Click(Dim A(1 To 5 As In tegerDim b As In tegerFor b = 1 To 5A(b = bNext bText1.Text = A(b - 2End Sub寫出程序運行時單擊Command1后,文件框T

14、extl中的輸出結(jié)果7.Function F(a As In teger, b As In teger As In tegerF = a + bEnd FunctionPrivate Sub Form_Click(Dim a As In teger, b As In teger, z As In tegera = 4:b =5z = F(a, bPrint zEnd Sub寫出程序運行時單擊窗體后，F(xiàn)orm1上的輸出結(jié)果8.Function F(a As In tegerDim b As In tegerStatic c As In tegerb = b + 2End FunctionPriv

15、ate Sub Comma nd1_Click(Dim a As In tegera = 4Fori = 1 To 3Print F(aNext iEnd Sub寫出程序運行時，單擊命令按鈕在窗體上的輸出結(jié)果。四、完善程序題1.假設(shè)用Access創(chuàng)建了一個名為 學(xué)生.MDB的數(shù)據(jù)庫，并在其中創(chuàng)建了一張名 為學(xué)生基本情況”的數(shù)據(jù)表,表中存放了學(xué)生的基本信息，如圖1所示?，F(xiàn)在要求利用VB編寫一個數(shù)據(jù)庫查詢程序，程序的運行界面如圖2所示，基本 邏輯是:首先文本框(Text1中輸入希望查詢的學(xué)生學(xué)號，然后點擊查詢”按鈕 (Command1如果數(shù)據(jù)庫中存在該學(xué)號，則分別在Text2、Text3、Text

16、4中顯示學(xué)號、 姓名、籍貫信息，否則提示用戶 記錄不存在”并使Text1獲得焦點，要求用戶重新輸 入。當(dāng)點擊退出按鈕(Command2時關(guān)閉本窗體。圖1用Access創(chuàng)建的學(xué)生基本情況數(shù)據(jù)表圖2查詢程序運行界面 程序如下，請補充完整。Private ADOc n As Co nn ectionPrivate Sub Form_Load(1學(xué)生.MDB End SubPrivate Sub Comma nd1_Click(Dim strSQL As Stri ngDim ADOrs As 3 RecordsetADOrs.ActiveCo nn ection = 4strSQL = Select

17、 * From 學(xué)生基本情況 Where 學(xué)號=+ If Not ADOrs.EOF The nText2 = ADOrs.Fields(學(xué)號Text3 = ADOrs.Fields(姓名Text4 = ADOrs.Fields(籍貫ElseMsgBox 要查詢的學(xué)號不存在，請重新輸入!, vbOKOnly,Text1 =Text1.SetFocusEnd IfEnd SubPrivate Sub Comma nd2_Click(Un Load MeEnd+ Text1 + 信息提示2列表框應(yīng)用程序要求從文本框中輸入課程名稱，然后按 添加”按鈕,將該課程名程添加到列表框 中;當(dāng)選擇列表框中某一

18、項后，按 刪除”按鈕,則從列表框中刪除該項；當(dāng)選擇列表框中 某一項后，按 修改”按鈕,把列表框中選取的項送往文本框且修改”按鈕變?yōu)?修改確認”在文本框的內(nèi)容修改好后，按修改確認”按鈕，再把文本框中修改后的信息送到 列表框且 修改確認”按鈕變?yōu)?修改”程序運行結(jié)果如圖3所示。TextlListlComma nd1Comma nd2Comma nd3圖3程序如下，請補充完整。Private Sub Form_Load(Listl.Addltem V isual Basic 程序設(shè)計Listl.Addltem SQL SERVER 數(shù)據(jù)庫應(yīng)用Listl.Addltem 信息管理系統(tǒng)Listl.Add

19、ltem ERP 原理與應(yīng)用Listl.Addltem 網(wǎng)絡(luò)實用技術(shù)基礎(chǔ)Listl.Addltem 系統(tǒng)開發(fā)規(guī)范與文檔編寫Listl.Addltem 信息系統(tǒng)測試End SubPrivate Sub Comma nd1_Click(If Textl.Text Then1 Text1.Text 將文本框中的內(nèi)容加到列表框中Text1.Text =2MsgBox 請在文本框中輸入信息！End IfEnd SubPrivate Sub Comma nd2_Click(3 List1.ListIndex 刪除選定的項目End SubPrivate Sub Comma nd3_Click(If Comm

20、a nd3.Captio n = 4 The nText1.Text = 5Text1.SetFocusComma nd1.E nabled = FalseComma nd2.E nabled = FalseCommand3.Caption =修改確認ElseListl. List(List1.List In dex = Textl.TextComma ndl.E nabled = TrueComma nd2.E nabled = TrueTextl.Text =Comma nd3.C aptio n =修改End IfEnd Sub五、編寫程序題編寫一工資調(diào)整程序。若基本工資大于等于2000

21、元，增加工資20%,若小于1800元大于1300元，則增加工資15%;若小于1300元則增加工資10%。要求在文本 框Text1中輸入某職工的基本工資，單擊 計算”按鈕，在標簽框Label1中輸出增加后 的工資。程序運行界面如圖4所示。2. 請根據(jù)下列描述編寫購物優(yōu)惠程序。某商場為了加速促成商品流通，采用購物 打折的優(yōu)惠辦法，每位顧客一次購物（1在200元以上者,按九五折優(yōu)惠;（2在400元以 上者，按九折優(yōu)惠；（3800元以上者，按八折優(yōu)惠。在窗體上添加兩個文本框和一個命 令按鈕，要求在Textl中輸入購物商品總金額,單擊命令按鈕，在Text2中輸出優(yōu)惠 價。程序運行結(jié)果如圖5所示。圖5答案

22、：一、單項選擇題1. C2. B3. B4. D5. A6. D7. C8.B9.C 10.C 11.B 12.D 13.B 14.A 15.C 16.C 17.C 18.D 19.C 20.D 21.B 22.C 23.C 24.D 25.C 26.D 27.A 28.A二、填空題1.vbp2.10003.64.85.06. Timer7. Picture1. Picture = LoadPrctureCpictureflower.jpg8. abcdef9. 實時錯誤邏輯錯誤10. 本地數(shù)據(jù)庫遠程數(shù)據(jù)庫11數(shù)據(jù)庫引擎12右上13.1614. Dim A(1To 3,0To 3 As Stri ng15