vba 读写文件（VBA read and write files）.docVIP

vba 读写文件（VBA read and write files） VBA read and write files.Txt Processing text files 1, Open statement Syntax: Open, pathname, For, mode, [Access, access], [lock],, As, [#]filenumber, [Len=reclength] Among them, access, lock, reclength are optional parameters, generally do not use. Mode specifies the way to open a file. There are 5 kinds: Input: open as input, ie read mode. Output: open in output mode, that is, write mode. Append: open by appending, that is, adding content to the end of the file. Binary: Opens in binary mode. Random: open in a random way, and if not specified, open the file in Random mode. Filenumber is a valid file number ranging from 1 to 511. You can specify or use the FreeFile function to get the next available file number. Explanation: if the file specified by pathname does not exist, you can build this file when you open the file in Append, Binary, Output, or Random mode. Example: Open F:\TEST.txt For Input As #1 is opened as input The Open F:\TEST.xls For Binary As #1 is opened in binary mode 2, Close statement Syntax: Close [filenumberlist] The filenumberlist parameter is one or more file numbers. If filenumberlist is omitted, all active files open by the Open statement will be closed. Explanation: after you open the file, you must close the file after use. Example: Dim, I, FileName For I = 1, To 3 FileName = TEST I creates the file name. Open FileName, For, Output, As, #I open the file. Print #I, This is a test., writes the string to the file. Next I Close closes all three open files. 3, Reset statement Syntax: Reset Function: close all disk files opened with Open statements. Explanation: the Reset statement closes all active files open by the Open statement and writes all of the contents of the file buffer to disk. Example: Dim FileNumber For FileNumber = 1, To 5 Open TEST FileNumber, For, Output, As, #FileNumber Write #FileNumber, Hello World, writes data to the file. Next FileNumber Reset closes the file and writes the data in the buf