可視化程序設(shè)計(jì)試題

1、可視化程序設(shè)計(jì)試卷三班級(jí)_ 姓名_ 學(xué)號(hào)_ 得分 _一、選擇題（每題 2 分，共 40 分）1以下能在窗體 Form1 的標(biāo)題欄中顯示“ VisualBasic 窗體 的語句是（A =VisualBasic 窗體 B =VisualBasic 窗體 C =VisualBasic 窗體 ?D =VisualBasic 窗體”2每當(dāng)窗體失去焦點(diǎn)時(shí)會(huì)觸發(fā)的事件是（ ? ）AActive?B Load? C LostFocus?D GetFocus3以下關(guān)于多窗體的敘述中，錯(cuò)誤的是（）A.對(duì)于多重窗體程序，需要單獨(dú)保存每個(gè)窗體B.在多重窗體程序中，各窗體的菜單是彼此獨(dú)立的C.在多重窗體程序中，可以根據(jù)

2、需要指定啟動(dòng)窗體D.用 Hide 方法不但可以隱藏窗體，而且能清除內(nèi)存中的窗體4下列可作為 Visual Basic 變量名的是（ ）A）A#AB）4AC）xyD） constA5執(zhí)行如下兩條語句，窗體上顯示的是（）a=.8596Print Format（a,00,）A0,B C D 0,6一只紅色的籃球被投進(jìn)籃，則紅色、籃球、投、進(jìn)籃分別是（）A.屬性、對(duì)象、方法、事件B .屬性、對(duì)象、事件、方法C.對(duì)象、屬性、方法、事件D .對(duì)象、屬性、事件、方法7. 控件的 （） 確定當(dāng)一個(gè)事件發(fā)生時(shí)執(zhí)行的代碼。A.函數(shù)B.通用過程C.子程序D.事件過程8.引用列表框 （list1） 最后 一個(gè)數(shù)據(jù)項(xiàng)應(yīng)

3、使用（）A.B.C. (listcount)D. (listcount-1)9.用菜單編輯器設(shè)計(jì)菜單時(shí)，必須輸入的項(xiàng)有 （）A.快捷鍵B標(biāo)題C 索引D.名稱10.建立一個(gè)新的標(biāo)準(zhǔn) EXE 工程后，默認(rèn)情況下，不在工具箱中出現(xiàn)的控件是（ A.單選按鈕B圖片框C 通用對(duì)話框 D文本框11 .假定有一個(gè)菜單項(xiàng)，名為 MenuItem ，為了在運(yùn)行時(shí)使該菜單項(xiàng)失效（變灰） 語句為（ ）。A） MenuItem. Enabled=False B . MenuItem. Enabled=TrueC. MenuItem. Visible=True D . Menultem. Visible=False12.

4、表示滾動(dòng)條控件取值范圍最大值的屬性是（ ）A. MaxB. LargeChangeC. ValueD. Max-Min13.確定一個(gè)控件在窗體上的位置的屬性是（）A. Width 和 HeightB. Width 或 HeightC. Top 和 LeftD. Top 或 Left），應(yīng)使用的A. ABCAbCB. thethey14.以下關(guān)系表達(dá)式中，其值為False 的是（ ）A. ABCAbCB. thetheyC. VISUAL=UCase(Visual)D. Integerlnt15.若磁盤文件不存在， 下列打開文件語句中，會(huì)產(chǎn)生錯(cuò)誤的是()A.Ope n“ C:”For Outpu

5、t As #1B . Ope n “ C:”For In put As #1C.Open “C: ” For Append As #1D . Open“ C:” For Binary As #116名為 Sort 的 Sub 子過程的形式參數(shù)為一數(shù)組，以下定義語句中正確的是()3.求表達(dá)式的運(yùn)算結(jié)果：_ 5/4*65 Mod 2 的輸出結(jié)果是。4._如果要時(shí)鐘控制每 1 分鐘發(fā)生一個(gè) Timer 事件，則 Interval 屬性應(yīng)設(shè)置為 _。5. 為了使窗體 form1 隱藏但不從內(nèi)存中釋放，應(yīng)使用 _ 語句。6. 通過數(shù)據(jù)控件 Data1 連接數(shù)據(jù)庫內(nèi)的表 class，產(chǎn)生動(dòng)態(tài)集類型的記錄集

6、，則需要設(shè)置 Connect 為_ , DatabaseName 為_ , RecordSource 為7._下列語句的輸出結(jié)果Str= “ WEAreFR*e ndS= ”For i= 1 to len( str)t= mid(str,i,1)A.Private Sub SortB. Private Sub SortC. Private Sub SortD. Private Sub Sort17.在以下描述中正確的是(A () As Integer)(A (10) As Integer )(Byval A () As Integer )(A (, ) As Integer)A.“機(jī)械系”,t

7、vwchild, ” qc” , ”汽車 10021”B.“機(jī)械系”,tvwlast, ” qc” , ”汽車 10021”C.tvwchild,” qc”，“機(jī)械系”，”汽車10021”D.qc ,汽車 10021 ”，“機(jī)械系”,tvwchild19.AVI 動(dòng)畫類似于電影，由若干幀位圖組成,Ani mation畫 （AVI 文件）。）的音頻視頻動(dòng)1.A.單個(gè) B .一個(gè)用戶C填空題（每空 1 分，共 15 分）DIM a （4,-3 to 1 ） as String語句定義的數(shù)組元素有2. 與數(shù)學(xué)表達(dá)式3x2| y |對(duì)應(yīng)的D .立體聲 應(yīng)用程序所使用。.固定的Visual Basic

8、表達(dá)式是個(gè)。A. 標(biāo)準(zhǔn)模塊中的任何過程都可以在整個(gè)工程范圍內(nèi)被調(diào)用B.在一個(gè)窗體模塊中可以調(diào)用在其他窗體中被定義為Public 的通用過程C. 如果工程中包含 Sub Main 過程，則程序?qū)⑹紫葓?zhí)行該過程D.如果工程中不包含 Sub Main 過程，則程序一定首先執(zhí)行第一個(gè)建立的窗體控件可以顯示（A.無聲B .有聲 C.無聲和有聲均可20.數(shù)據(jù)庫文A. ABCAbCB. thetheyIf t=” a” and t= ” z” thens=s & ten difn ext iprint s&在VB中有三種文件訪問類型：順序、 _ 和_。9.VB 中參數(shù)傳遞有兩種方式，傳值和傳

9、地址，默認(rèn)情況下是 _10. 根據(jù)下圖寫出 MsgBox 函數(shù)的參數(shù)。1匸的佰 1.5 大于 DMsgBox ?_, vbokonly+vbExclamation ,_11._已知一個(gè)報(bào)表 datareport， 程序執(zhí)行時(shí)，用 _語句可以預(yù)覽報(bào)表。三、程序設(shè)計(jì)題。（40 分）已知學(xué)生檔案數(shù)據(jù)庫（）中有以下表。學(xué)生班級(jí)編碼表 TB03,表結(jié)構(gòu)序號(hào)字段名含義類型寬度小數(shù)索引引用字段/顯示字段1TB0301班級(jí)編碼TEXT10K2TB0302班級(jí)名稱TEXT203TB0303入學(xué)年份TEXT44TB0304專業(yè)編碼TEXT10TB0401/TB04025TB0305學(xué)制TEXT16TB0306班級(jí)

10、數(shù)INTEGER307TB0307班主任TEXT108TB0308畢業(yè)標(biāo)志TEXT1TC0401/TC04029TB0309系部編碼TEXT10TB0601/TB0602系部編碼表 TB06,表結(jié)構(gòu)序號(hào)字段名含義類型寬度小數(shù)1TB0601系部編碼CHAR102TB0602系部名稱CHAR203TB0603教學(xué)管理用戶CHAR104TB0604系主任CHAR10學(xué)生檔案表 xa01，表結(jié)構(gòu)序號(hào)字段名含義類型寬度小數(shù)索引引用字段/顯示字段1XA0101學(xué)生編碼TEXT10K2XA0102學(xué)生學(xué)號(hào)TEXT103XA0103班內(nèi)序號(hào)TEXT24XA0104姓名TEXT85XA0105入學(xué)年月TEXT7

11、6XA0106性別TEXT1GC0101/GC01021 表示男,2 表示女7XA0107岀生日期TEXT108XA0108民族TEXT2GC0301/GC03029XA0109籍貫TEXT6GC0201/GC0202呈序示例10XA0110政治面貌TEXT2GC0401/GC040211XA0111健康狀況TEXT1012XA0112特長TEXT4013XA0113身份證號(hào)TEXT2014XA0114現(xiàn)所在班級(jí)TEXT10TB0301/TB03021. SQ 語句(10 分)(1)查詢 tb03 表，顯示 2001 年入學(xué)的班級(jí)信息。(2)統(tǒng)計(jì)全校男生人數(shù)。提示：性別為 1 表示男生。(3

12、)顯示機(jī)械系的所有班級(jí)信息。(4)顯示 2000 年入學(xué)的全校所有姓王的學(xué)生的學(xué)生學(xué)號(hào)、姓名、班級(jí)名稱。(5 )將系部編碼表中，信管系更新為計(jì)算機(jī)系。2. 設(shè)計(jì)題(30 分)(1)如圖所示系部編碼維護(hù)程序。可以用第一個(gè)、下一個(gè)等瀏覽表中數(shù)據(jù)，亦可用添加、刪 除等修改表中數(shù)據(jù)。完善以下程序。(12 分)1窗體上有 data1 數(shù)據(jù)控件；命令按鈕控件數(shù)組 cmd1，數(shù)組中有 5 個(gè)按鈕；工具欄 toobar1，工具欄 上有 5 個(gè)按鈕；文本框數(shù)組 txtxb。2設(shè)置 data1 的屬性，使它與數(shù)據(jù)庫連接，數(shù)據(jù)源為 tb06(系部編碼表)3設(shè)置文本 框的數(shù)據(jù) 源屬性，分別 與 tb06 表中tb06

13、01、tb0602、tb0603、tb0604 字段綁定。4實(shí)現(xiàn)添加、刪除等操作Private Sub Cmd1_Click(l ndex As In teger)Select Case_Case 0添加Case 1_刪除Case 2 _ 刷新Case 3更新=Case 4_ 關(guān)閉End SelectEnd Sub5實(shí)現(xiàn)第一個(gè)、下一個(gè)等操作Private Sub Toolbar1_ButtonClick( ByVal SelectCaseCase firstCase prev前一個(gè). MovePreviousCase next下一個(gè)Case last _最后一個(gè)End SelectEnd Su

14、b(2)如圖所示學(xué)生檔案查詢程序。當(dāng)用戶選擇系部名稱、班級(jí)名稱等時(shí)，查詢需要的數(shù)據(jù)，并在表格顯示查詢結(jié)果， 在狀態(tài)欄上顯示此時(shí)的總?cè)藬?shù)， 當(dāng)用戶單擊表格中某一行時(shí)， 將當(dāng) 前信息在文本框中顯示。 (18 分)實(shí)現(xiàn)步驟：1 窗體上有表格 mshfgrid ，文本框數(shù)組 txtxa01 ，狀態(tài)欄 statusbar1 ，工具欄 toolbar1 2 在窗體的 load 事件中定義公共變量。Private Sub Form_Load ( )Public con As New 定義全局變量Public rs As New= Provider= Source=e:vbdata;Persist Secur

15、ity Info=False= 30 創(chuàng)建到數(shù)據(jù)庫 xsda 的連接 打開到數(shù)據(jù)源的連接打開記錄集select * from xa01 , _ ， adOpenKeyset, adLockBatchOptimisticSet = rs 設(shè)置表格數(shù)據(jù)源在狀態(tài)欄面板上顯示當(dāng)前學(xué)生人數(shù)(2).Text = _在狀態(tài)欄面板上顯示當(dāng)前時(shí)間(3)_ .Text =End Sub3.在窗體的 unload 事件中關(guān)閉與數(shù)據(jù)庫的連接， 關(guān)閉與數(shù)據(jù)源的連接 Private Sub Form_Unload(CancelAs Integer)End Sub4代碼中有如下一段程序，作用是 _Dim sum1 as integer, sum2 as integerSum1=0 ： sum2=0Button As第一個(gè)Do While Not If = 1 The n