【正文】 te： 讀寫鎖 ，不允許讀寫。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 文 件 處 理 函 數(shù) 文件的打開與關(guān)閉 FileOpen （文件號，文件名 [ ，訪問方式 ][ ，訪問類型 ][ ，共享類型 ][ ，記錄長度 ] ） 1．文件的打開 以 順序方式 打開文件，該值用來確定 緩沖區(qū)的大小 ，缺省值為 512B。以 隨機方式 打開文件，該值指示 記錄的長度 。以 二進制方式 打開文件，則 忽略該值 。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 文 件 處 理 函 數(shù) 文件的打開與關(guān)閉 FileOpen （文件號，文件名 [ ，訪問方式 ][ ，訪問類型 ][ ，共享類型 ][ ，記錄長度 ] ） 1．文件的打開 FileOpen (1,”d:\”,) 以 順序方式 打開 d盤中的 。打開成功后，只能按照 順序方式 讀取數(shù)據(jù) 。 FileOpen(2,”d:\”, , ,34) 以 隨機方式 打開 d盤中的 。文件不存在，就建立一個新的文件。文件存在。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 文 件 處 理 函 數(shù) 文件的打開與關(guān)閉 2．文件的關(guān)閉 關(guān)閉文件時，要把文件緩沖區(qū)中的數(shù)據(jù)寫入文件，同時釋放與之關(guān)聯(lián)的文件號。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 文 件 處 理 函 數(shù) 文件的打開與關(guān)閉 2．文件的關(guān)閉 FileClose（ [文件號 ]） FileOpen(1,”d:\”,) …… FileOpen(2,”d:\bb”, , ,34) …… FileClose（ 1）‘關(guān)閉文件” d:\” …… FileClose（）‘關(guān)閉所有已打開的文件 關(guān)閉與文件號對應的文件。文件號缺省時，關(guān)閉所有打開的文件。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Seek函數(shù) 文 件 處 理 函 數(shù) 文件操作函數(shù) Seek（文件號 [，位置 ]） 設(shè)置文件指針的位置 。 順序文件 中文件指針移動的長度與所讀寫的字符串長度相同 。 隨機文件 中文件指針的移動單位是記錄長度。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 文 件 處 理 函 數(shù) 文件操作函數(shù) （ 1） “位置”是一個 Long型 數(shù)值表達式，用于指定下一個要讀寫的位置。 1． Seek函數(shù) Seek（文件號 [，位置 ]） 鄭 州 航 院 計 算 機 科 學 與 應 用 系 文 件 處 理 函 數(shù) 文件操作函數(shù) （ 2）在 FileGet或 FilePut函數(shù)中指定的記錄號優(yōu)先于由Seek函數(shù)確定的位置。 1． Seek函數(shù) Seek（文件號 [，位置 ]） 鄭 州 航 院 計 算 機 科 學 與 應 用 系 2． LOF函數(shù) 文 件 處 理 函 數(shù) 文件操作函數(shù) LOF（文件號） 返回為指定文件分配的字節(jié)數(shù)，空文件返回 0。 如果文件是隨機文件， Length是記錄長度，則 文件的記錄數(shù) =LOF（文件號） / Length。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 3． EOF函數(shù) 文 件 處 理 函 數(shù) 文件操作函數(shù) EOF（文件號） 測試文件指針是否指到文件的結(jié)束位置，其值為 True或 False。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 3． EOF函數(shù) 文 件 處 理 函 數(shù) 文件操作函數(shù) EOF（文件號） Do While Not EOF(1) ?文件未結(jié)束，執(zhí)行循環(huán)體 文件讀寫語句 Loop 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） 把數(shù)據(jù)寫入到與指定的文件中 。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） 如果是多個表達式，各表達式之間用 逗號隔開 。缺省Spc和 Tab函數(shù)時，各數(shù)據(jù)按照標準的分區(qū)格式寫入文件。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） （ 2） Spc(n)函數(shù)產(chǎn)生 n個空格。 如果 n大于輸出行的寬度 ，下一個輸出位置為： 當前位置 +（ n Mod 行寬） 。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） Print(1, 26, SPC(6), VB .NET教程 , SPC(6), 1/2/1996, SPC(6), False) 思 考 該語句完成的功能是什么？ 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） Print(1, 26, SPC(6), VB .NET教程 , SPC(6), 1/2/1996, SPC(6), False) 把 4個表達式的值寫入文件中，兩個相鄰的數(shù)據(jù)之間有 6個空格，形式為： 26 VB .NET教程 199612 False 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） （ 3） Tab函數(shù) 把 文件指針移到當前行的第 n列位置 。 如果 n小于 1時，下一個寫入位置移到當前行第 1列； 如果 n大于輸出行的寬度 ，下一個寫入位置為 = n Mod 行寬； 如果 n小于當前的寫入位置 ，下一個寫入位置在下一行的第 n列。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） Tab函數(shù) 從對象的左端 開始計數(shù)； Spc函數(shù) 表示兩輸出項之間的空格數(shù) 。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） Print(1, 26, VB .NET教程 ,TAB(32), 1/2/1996, TAB(49), False) 寫入結(jié)果為： 26 VB .NET教程 199612 False 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） 輸出行的 最左邊 為第 1列， 一個漢字占兩列 。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） （ 1） Print函數(shù)具有 計算和輸出雙重功能 ，對于表達式，先計算后輸出。 如果表達式中出現(xiàn) “ =”，則代表 邏輯運算符“等于” ，而不是賦值號。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） （ 2）如果想在文件中換行，使用 Print（文件號， Chr(13) amp。 Chr(10)） 語句。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） Print(1, (5 + 4) / 6, Chr(13) amp。 Chr(10)) Print(1, a = (5 + 4) / 6) 寫入結(jié)果為： False 鄭 州 航 院 計 算 機 科 學 與 應 用 系 1． Print函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Print（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） （ 3） Print函數(shù)只是把數(shù)據(jù)送到緩沖區(qū) ，當遇到文件關(guān)閉、緩沖區(qū)已滿或者緩沖區(qū)未滿，但要執(zhí)行下一個 Print函數(shù)時，才把緩沖區(qū)中的數(shù)據(jù)寫入文件中。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 2． PrintLine函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 PrintLine（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） PrintLine函數(shù)與 Print函數(shù) 主要的區(qū)別在于 Print函數(shù)輸出數(shù)據(jù)的行尾不包含換行，而 PrintLine函數(shù)在行尾包含換行符 。 鄭 州 航 院 計 算 機 科 學 與 應 用 系 2． PrintLine函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 PrintLine（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） PrintLine(1, (5 + 4) / 6) Print(1, a = (5 + 4) / 6) 寫入結(jié)果為： False 鄭 州 航 院 計 算 機 科 學 與 應 用 系 3． Write函數(shù)和 WriteLine函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Write（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） Write和 WriteLine函數(shù)與 Print和 PrintLine函數(shù)的主要區(qū)別在于，當把數(shù)據(jù)項寫入文件時， Write和 WriteLine函數(shù)會 自動為字符數(shù)據(jù)加上雙引號，為日期型數(shù)據(jù)和邏輯型數(shù)據(jù)加上“ ”號，兩個寫入項之間添加逗號 。 WriteLine（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） 鄭 州 航 院 計 算 機 科 學 與 應 用 系 3． Write函數(shù)和 WriteLine函數(shù) 文 件 處 理 函 數(shù) 順序文件的讀寫操作 Write（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） WriteLine（文件號 [， [Spc(n)|Tab(n)][，表達式表 ]]） Write(1, 26, VB .NET教程