【正文】 tu 其中“ 1”為文件號，“ currentrecord”對應(yīng)于記錄的位置，“ gstu”用于存放讀出的數(shù)據(jù)。 ?單擊“新增成績”按鈕，則向文件“ d:\成績 \ ?”中新增一個學(xué)生的成績信息。 ? FreeFile函數(shù) FreeFile函數(shù)返回下一個可供 Open語句所使用的文件號，其語法結(jié)構(gòu)如下： FreeFile[(rangenumber)] 其中參數(shù) rangenumber為可選參數(shù)，用于指定文件號的取值范圍，以便 FreeFile函數(shù)返回在該范圍內(nèi)的下一個可用的文件號。例如，在本案例中，我們通過代碼 Print 1, ，將文本框中的文字寫入到文件號為 1的文件中。使用Input語句來讀取文件數(shù)據(jù)的語法結(jié)構(gòu)為 Input ＃ filenumber,varlist 其中參數(shù) filenumber為必選參數(shù)，對應(yīng)于用 Open語句打開文件時所指定的文件號；參數(shù) varlist為必選參數(shù)，用來保存從文件中讀出的數(shù)據(jù)，變量之間以逗號相間。 圖 65 文本編輯器 圖 66 【 打開 】 對話框 圖 67 【 另存為 】 對話框 順序文件中的數(shù)據(jù)通常是以行為單位的，對于順序類文件，Visual ，在本案例中，我們將學(xué)習(xí)如何使用這些函數(shù)或語句來讀寫順序文件。 文件讀寫操作 字符是構(gòu)成文件的最基本單位，一個漢字或一個英文字母都可看成是一個字符。 【 知識擴展 】 （ 2） Change事件是文件夾列表控件最常用事件，但只有在文件夾列表框中雙擊某一列表項后才會激發(fā) Change事件；Click事件是文件名列表框控件最常用事件，在文件名列表框中單擊某個文件名便會激發(fā)該事件。 說明：在用文件名列表控件顯示文件時，必須先為所顯示的文件指定詳細的路徑，但只能通過在代碼中改變【 Path】 屬性值來指定文件的路徑。 3．顯示文件夾列表 （ 1）操作步驟見教材 （ 2）操作步驟見教材 （ 3）操作步驟見教材 （ 4）操作步驟見教材 （ 5）操作步驟見教材 （ 1）由于驅(qū)動器列表框是 1個下拉式的組合框，因此和組合框控件一樣， Change事件是驅(qū)動器列表框控件最常用的事件，但它不能響應(yīng)任何鼠標(biāo)事件。 在文件列表框中雙擊某個可執(zhí)行文件，便可以直接運行該程序。 一個完整的文件名包括主文件名和擴展名兩部分 ， 主文件名和擴展名以圓點相間 ， 主文件名是文件的 “ 名字 ” ， 擴展名決定著文件的類型 ， 如 ， “ ”， 其中“ Form1”為主文件名 ， “ .frm”為擴展名 ， 表示該文件為窗體文件 。驅(qū)動器列表控件除了一些常用共有屬性之外，還有 1個特殊的屬性： 【 Drive】 屬性。當(dāng)前被選中的文件夾，被文件夾列表控件的 【 Path】 屬性記錄下來。設(shè)置 【 Pattern】 屬性時，必須按文件命名的形式為其賦值，既要給出文件的主文件名，還要給出文件的擴展名，但可以含有通配符“ *”或“？”。 【 知識擴展 】 【 FileName】 屬性除了可以返回文件列表控件中被選中的文件之外，還可以用來設(shè)置所要顯示的文件的類型，但【 FileName】 屬性只能通過代碼來設(shè)置。例如，在如下所示的學(xué)生的信息管理文件中，每一行便是一條記錄，每個記錄由學(xué)號、姓名、班級和專業(yè) 4個相關(guān)的字段組成，而每個字段，又是由若干個字符所組成。例如，將 【 Filter】 屬性設(shè)為“文本文件 (*.txt)|*.txt|窗體文件 (*.frm)|*.frm”，則文件列表框中除了顯示擴展名為 .txt的文本文件，還顯示擴展名為 .frm的窗體文件。在對文件進行讀寫操作之后，必須使用 Close語句關(guān)閉已打開的文件，具體語法結(jié)構(gòu)如下： Close [filenumberlist] 其中參數(shù) filenumberlist為可選參數(shù)，其值為一個或多個有效的文件號。 （ 4）在 Visual Basic ，除了在本案例中已用到的文件操作語句外（如 Open， Close等語句），還有以下常用文件操作語句或函數(shù)。使用 FileLen函數(shù)來獲取文件大小時，可以不必先打開相應(yīng)的文件。 圖 69 學(xué)生成績管理系統(tǒng) 圖 610 【 錯誤 】 提示框 ?單擊“下一記錄”按鈕，則在相應(yīng)的文本框 ?中顯示下一個學(xué)生的成績信息。聲明記錄的語法結(jié)構(gòu)如下： Private Type 記錄名 字段 1名 As 數(shù)據(jù)類型 *長度 字段 2名 As 數(shù)據(jù)類型 *長度 … 【 知識擴展 】 字段 n名 As 數(shù)據(jù)類型 *長度 End Type 在本案例中，程序的開始便聲明了一個名為“ stu”的記錄類型，它包含 3個字段，一個字段名為“ sNum”，數(shù)據(jù)類型為字符型，長度為 10個字節(jié)，用于存放學(xué)生的學(xué)號；一個字段名為“ sName”，數(shù)據(jù)類型為字符型，長度為 20個字節(jié)，用于存放學(xué)生的姓名；一個字段名為“ Score”，數(shù)據(jù)類型為字符型，長度為 4個字節(jié)，用于存放學(xué)生的成績。 Get語句既可以讀取隨機文件中的數(shù)據(jù)，還可以讀取二進制文件中的數(shù)據(jù)，相應(yīng)地向隨機文件、二進制文件中寫入數(shù)據(jù)，可以使用 Put 語句來完成。在 Visual Basic ，文件的重命名是用 Name語句來實現(xiàn)的，具體語法結(jié)構(gòu)如下： Name 原文件名 As 新文件名 功能：將“原文件名”改名為“新文件名”。 綜合案例 在第 4章最后的綜合案例中 ， 設(shè)計了一個簡單記事本 ，該記事本只能編輯文本 ， 不能保存和打開文本