技术专题之五.ppt

Visual Basic 程序设计 文件操作的一般步骤： 打开文件： 　　 使文件与内存中的某个缓冲区关联； 存 / 取操作 　　 向文件写入数据或从文件读取数据； 关闭文件 　　 释放文件所占用的文件缓冲区。 文件访问语句与函数 打开文件语句 — OPEN语句 　　语法格式： 　　Open 文件名[FOR模式][Access存取类型][锁定] As[#]文件号[Len=记录长度] 关闭文件语句 — CLOSE语句 　　语法格式：Close [[#]文件号][，[#]文件号 尾部确认函数 — EOF函数 　格式：EOF（文件号） 打开文件 　　　语法格式: 　　　Open 文件名 FOR [Output|Append] As [#] 文件号 Print # 语句 　　　语法格式: 　　　Print #文件号,[输出列表] 　　　其中：输出列表的形式为 [{SPC(n)|Tab(n)}][表达式][分隔符]　 1.顺序文件的写操作 (1) 标准格式输出(用“ , ”) 例如: Open Test.Dat For Output As # 10 Print # 10, 1,2,3 Print # 10,we,study,VB6.0 Close 10 Print#语句的输出格式: 紧凑格式输出(用 ; ) 例: Open Test.Dat For Output As # 10 Print # 10, 1;2;3 Print # 10,we;study;VB6.0 Close 10 1 2 3we study VB6.0 1 2 3westudyVB6.0 (3) 字符串数据的输出 　　为使输出字符串有明显地区分，在字串间插入, ，作为分隔符。 　　例: 　 　　Print # 10,we; , ;study; , ;VB6.0　　 we,study,VB6.0 Write # 语句 　　语法格式： 　　Write # 文件号,[输出列表] 　　说明： 用Write # 语句写到文件中的数据以紧凑格式存放,各数据之间插有逗号作为分隔符， 用Write # 语句写到文件中的字符串,系统自动地在其首尾加上双引号作为字符串数据的定界符,对于正数,在其前面不再留有空格。 例如: Open Test.Dat For Output As # 12 Write # 12,1,-2,3,ABC Write # 12, Write # 12,5,6,7,DEF, Write # 12, Close 12 Write #语句的输入格式 2顺序文件的读操作 Input #语句 语法格式: Input #文件号,变量表 Line Input #语句　 语法格式：Line Input #文件号,变量表 Input # 函数 语法格式： Input(n,[#]文件号) 说明： 　　n是任意合法的数值表达式,指从文件中一次读出字符的个数 　　与Input＃语句不同，Input函数返回所读的所有字符，包括前导空格、逗号、双引号以及回车换行符。 Input # 语句 格式： Input #文件号, 变量列表 功能： 　　从已打开的顺序文件中读入一项或多项数据，并将数据赋给用逗号分隔的变量列表中的变量。 说明： ① 读入的数据项的类型应与变量列表中的变量的类型相对应； ② Input # 语句在读入数据时，是按文件中的分隔符（空格、回车、换行、逗号）来区分数据项的，所以应用Input # 语句来读Write #语句产生的数据； Line Input # 语句 （也可用于随机文件） 格式： Line Input #文件号, 字符串变量 功能： 　　从已打开的顺序文件中读入一行（直到遇到回车符为止），并将它赋给字符串变量。（回车换行被跳过） Input 函数 　格式：Input(读取的字符数, [#]文件号) 　功能：读取以 Input 方式打开的文件中的指定数目的字符。 Open d:\sxw.txt For Input As #1 Do While Not EOF(1) inputdate = Input(1, #1) Text1.Text = Text1.Text + inputdate Loop Close #1 Visual B