二、簡單應用題
(1)在考生文件夾中有工程文件vbsj3.vbp及窗體文件vbsj3.frm。在名為Form1的窗體 上有一個名為Lab1的標簽數組,該數組有4個控件元素,它們的標題分別是Wait、Edit、 Aix和Move,如圖56-3所示。
在程序運行后,將鼠標指針移動到各控件元素上,則鼠標指針的形狀將變成各控件元 素的標題所代表的鼠標指針形狀;離開控件元素,則鼠標指針又變成正常情況下的箭頭形 狀。本程序不完整,請補充完整,并能正確運行。
要求:去掉程序中的注釋符“’”,把程序中的問號“?”改為正確的內容,使其實現上述功能,但不得修改程序的其他部分。最后,按原文件名并在原文件夾中保存修改后的文件。
(2)在考生文件夾中有一個工程文件 vbsj4.vbp 及其窗體文件 vbsj4.frm。請在名為 Form1 的窗體上繪制兩個名稱分別為 Txt1 和 Txt2 的文本框,文本框的內容分別設置為“計 算機考試”、“Visual Basic”;然后繪制一個名稱為 Labl 的標簽,其高度為 300,寬度為 2500; 再繪制兩個名稱分別為 Opt1 和 Opt2 的單選按鈕,它們的標題分別為“交換”和“連接”; 最后再繪制一個名稱為 Cmd1 的命令按鈕,其標題為“確定”。
編寫適當的事件程序。使得程序運行后,如果選中“交換”單選按鈕并單擊“確定”按鈕,則 Txt1 文本框中內容與 Txt2 文本框中內容進行交換,并在標簽處顯示“交換完成”;如果選中“連接”單選按鈕并單擊“確定”按鈕后,則把交換后的 Txt1 和 Txt2 的內容連接起來,并在標簽處顯示連接的內容,如圖 56-4 所示。保存時,工程文件名為 vbsj4.vbp,窗體文件名為 vbsj4.frm。
注意:不得修改已經給出的程序。在結束程序運行之前,必須選中一個單選按鈕,并單擊“確定”按鈕。退出程序時必須通過單擊窗體右上角的關閉按鈕,否則可能無成績。
三、綜合應用題
在名為 Form1 的窗體上建立一個名為 Txt1 的文本框(其 MultiLine 屬性為 True, ScrollBars 屬性為 2)和兩個名稱分別為 Cmd1 和 Cmd2 的命令按鈕(其標題分別為“讀取” 和“保存”),如圖 56-5 所示。
要求程序運行后,如果單擊“讀取”按鈕,則讀入 dr1.dat 文件中的 100 個整數,放 入一個數組中(數組下界為 1),同時在文本框 Txt1 中顯示出來;如果單擊“保存”按鈕,則計算其中前 50 個數之和,并把求和結果在文本框 Txt1 中顯示出來,同時把結果存入考 生文件夾中的文件 dw2.dat 中。
在考生的文件夾下有標準模塊 model.bas,其中的 writedata 過程可以把結果存入指定的文件,考生可以把該模塊文件添加到自己的工程中,直接調用此過程。
注意:文件必須存放在考生文件夾中,窗體文件名為 vbsj5.frm ,工程文件名為vbsj5.vbp,計算結果存入 dw2.dat 文件,否則沒有成績。
編輯推薦:
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內蒙古 |