二、簡單應(yīng)用題

　　(1)在考生文件夾中有工程文件vbsj3.vbp及窗體文件vbsj3.frm。在名為Form1的窗體 上有一個(gè)名為Lab1的標(biāo)簽數(shù)組，該數(shù)組有4個(gè)控件元素，它們的標(biāo)題分別是Wait、Edit、 Aix和Move，如圖56-3所示。

　　在程序運(yùn)行后，將鼠標(biāo)指針移動(dòng)到各控件元素上，則鼠標(biāo)指針的形狀將變成各控件元 素的標(biāo)題所代表的鼠標(biāo)指針形狀;離開控件元素，則鼠標(biāo)指針又變成正常情況下的箭頭形 狀。本程序不完整，請(qǐng)補(bǔ)充完整，并能正確運(yùn)行。

　　要求：去掉程序中的注釋符“’”，把程序中的問號(hào)“?”改為正確的內(nèi)容，使其實(shí)現(xiàn)上述功能，但不得修改程序的其他部分。最后，按原文件名并在原文件夾中保存修改后的文件。

　　(2)在考生文件夾中有一個(gè)工程文件 vbsj4.vbp 及其窗體文件 vbsj4.frm。請(qǐng)?jiān)诿麨?Form1 的窗體上繪制兩個(gè)名稱分別為 Txt1 和 Txt2 的文本框，文本框的內(nèi)容分別設(shè)置為“計(jì) 算機(jī)考試”、“Visual Basic”;然后繪制一個(gè)名稱為 Labl 的標(biāo)簽，其高度為 300，寬度為 2500; 再繪制兩個(gè)名稱分別為 Opt1 和 Opt2 的單選按鈕，它們的標(biāo)題分別為“交換”和“連接”; 最后再繪制一個(gè)名稱為 Cmd1 的命令按鈕，其標(biāo)題為“確定”。

　　編寫適當(dāng)?shù)氖录�程序。使得程序運(yùn)行后，如果選中“交換”單選按鈕并單擊“確定”按鈕，則 Txt1 文本框中內(nèi)容與 Txt2 文本框中內(nèi)容進(jìn)行交換，并在標(biāo)簽處顯示“交換完成”;如果選中“連接”單選按鈕并單擊“確定”按鈕后，則把交換后的 Txt1 和 Txt2 的內(nèi)容連接起來，并在標(biāo)簽處顯示連接的內(nèi)容，如圖 56-4 所示。保存時(shí)，工程文件名為 vbsj4.vbp，窗體文件名為 vbsj4.frm。

　　注意：不得修改已經(jīng)給出的程序。在結(jié)束程序運(yùn)行之前，必須選中一個(gè)單選按鈕，并單擊“確定”按鈕。退出程序時(shí)必須通過單擊窗體右上角的關(guān)閉按鈕，否則可能無成績。

　　三、綜合應(yīng)用題

　　在名為 Form1 的窗體上建立一個(gè)名為 Txt1 的文本框(其 MultiLine 屬性為 True， ScrollBars 屬性為 2)和兩個(gè)名稱分別為 Cmd1 和 Cmd2 的命令按鈕(其標(biāo)題分別為“讀取” 和“保存”)，如圖 56-5 所示。

　　要求程序運(yùn)行后，如果單擊“讀取”按鈕，則讀入 dr1.dat 文件中的 100 個(gè)整數(shù)，放 入一個(gè)數(shù)組中(數(shù)組下界為 1)，同時(shí)在文本框 Txt1 中顯示出來;如果單擊“保存”按鈕，則計(jì)算其中前 50 個(gè)數(shù)之和，并把求和結(jié)果在文本框 Txt1 中顯示出來，同時(shí)把結(jié)果存入考 生文件夾中的文件 dw2.dat 中。

　　在考生的文件夾下有標(biāo)準(zhǔn)模塊 model.bas，其中的 writedata 過程可以把結(jié)果存入指定的文件，考生可以把該模塊文件添加到自己的工程中，直接調(diào)用此過程。

　　注意：文件必須存放在考生文件夾中，窗體文件名為 vbsj5.frm ，工程文件名為vbsj5.vbp，計(jì)算結(jié)果存入 dw2.dat 文件，否則沒有成績。

　　編輯推薦：

　　2014年上半年計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間及入口專題

　　各地2014年計(jì)算機(jī)等級(jí)考試費(fèi)用匯總

　　2014年計(jì)算機(jī)等級(jí)考試時(shí)間