2014年全國(guó)計(jì)算機(jī)二級(jí)VB上機(jī)考試試題二

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

　　【知識(shí)點(diǎn)播】LOF 函數(shù)可返回一個(gè)用 Open 語(yǔ)句打開(kāi)的文件的大小，該大小以字節(jié)為單位，返回值為 Long 數(shù)據(jù)類型。

　　【審題分析】本題源程序設(shè)計(jì)思路：在"文件寫(xiě)入"命令按鈕的單擊事件過(guò)程中，先用 Open 語(yǔ)句打開(kāi)考生文件夾下的隨機(jī)文件 dw1.dat，并通過(guò)計(jì)算得到隨機(jī)文件現(xiàn)有記錄數(shù)，存入變 RecNum;然后在 Do 循環(huán)中，為自定義數(shù)據(jù)類型變 Pers 的各元素賦值， 用 Put 語(yǔ)句將該變 的值寫(xiě)入打開(kāi)的隨機(jī)文件中(記錄號(hào)為 RecNum+1)，并通過(guò)輸入對(duì) 話框詢問(wèn)是否要再輸入新記錄，Do 循環(huán)以輸入對(duì)話框中返回值為"Y"(或"y")作為循環(huán)條件。

　　在 "文件讀出"命令按鈕的單擊事件過(guò)程中，先用 Open 語(yǔ)句打開(kāi)考生文件夾下的隨機(jī) 文件 dw1.dat，并通過(guò)計(jì)算得到隨機(jī)文件現(xiàn)有記錄數(shù)，存入變 RecNum;然后利用 For 循環(huán)語(yǔ)句(初值為 1，終值為 RecNum 的值)，用 Get 語(yǔ)句讀入隨機(jī)文件中相應(yīng)記錄號(hào)的記錄，賦值給變 Pers，并將變 Pers 各元素的值用 Print 方法顯示在窗體上。

　　【操作步驟】

　　步驟 1：打開(kāi)考生文件中的本題工程文件 vbsj5.vbp，在代碼編輯窗口，去掉程序中的注釋符"’"，將問(wèn)號(hào)"?"改為正確的內(nèi)容。

　　步驟 2：按要求將文件保存至考生文件夾中。

　　編輯推薦：

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

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

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