学习课件文件.pptxVIP

文件 lyz_eyes@163.com Introduction 文本文件（*.txt，*.log） 小说、文本数据、记录说明 数据文件（*.mdb） 存放数据库数据 文档（*.doc, *.docx, *.ppt, *.pdf, etc） 存放文档等等 存放在介质上（硬盘、优盘等），以便需要的时候处理 文件的基本概念 引例 按“生成文件”按钮，将1至1000间的素数顺序输出到磁盘文件su.txt；按“输入/判断”按钮，输入1个小于1000的正整数，用在文件su.txt中查找的方式判断其是否素数 Private Sub cmdFile_Click() Dim n As Integer, i As Integer Open su.txt For Output As #1 For n = 2 To 1000 For i = 2 To Sqr(n) If n Mod i = 0 Then Exit For Next i If i Sqr(n) Then Write #1, n Next n Close #1 cmdFile.Enabled = False cmdIC.Enabled = True End Sub Private Sub cmdIC_Click() Dim n As Integer, m As Integer n = Val(InputBox(n=, 判断是不是素数)) If n 2 Or n 1000 Then MsgBox (输入超出范围): Exit Sub End If Open su.txt For Input As #1 Do While Not EOF(1) Input #1, m If m = n Then Exit Do Loop If Not EOF(1) Then MsgBox (是素数) : else MsgBox (不是素数) Close #1 End Sub 文件路径 绝对路径 “C:\Program Files\Microsoft Visual Studio\VB98\su.txt” 存储路径 + 文件名 + 扩展名 相对路径 “su.txt” “data\su.txt” 存在某文件夹决定默认盘符、路径等等 文件分类 文件分类 按存储格式分类 文本（ASCII、正文）文件 每个字符占1个字节（一个汉字占两个字节），为该汉字字模在字库中的地址信息 二进制文件 按数据的机内码存储，每个数据所占存储空间为该类型数据的字节数 文件分类 按存取（写读）方式分类 顺序型：加载全部数据，适用于连续块中的文本文件，例如文本文件 随机型：可以直接存取文件中的任何1个数据，适用于读写有固定长度记录结构的文本文件或者二进制文件 二进制型：适用于读写任意结构的文件 文本文件的顺序存取比随机存取简单和方便，这里只介绍文本文件的顺序存取 文本文件的顺序存取 打开文件 文件的读/写 关闭文件 Note：Close语句关闭已打开的文件，应用程序终止运行时也会自动关闭文件 打开文件 Open 文件路径和名称 for Mode As #文件号 Mode: Input: 打开文件、只读 Output: 打开文件 、只写 Append: 打开文件、在文件末尾追加数据 文件号选项为打开文件后使用的信道号，为正整数值，应从小到大使用 如果打开多个文件会如何取文件号？ 文件的读/写 Print #语句 格式：Print #File_numb,[表达式列表] 例：用Print #语句写若干数据到文本文件bbb.txt。例12-2 例：保存文本框Text1到文件TEST.TXT Write #语句 Write #语句 格式：Write #File_numb,[表达式列表] ⑴ 与Print #语句相同的是，表达式列表末尾无分隔符则输出回车、换行符到文件。 ⑵ 与Print #语句不同的是：表达式列表中，无论用逗号或分号作间隔符，都在写入文件的数据间加入逗号；为字符串两端自动加双引号，为其他非数值类型数据两端加“#”号 关闭文件 Close [[#]文件号][, [#]文件号]... 例如， Close #1 Close #1, #2, #3 Close 关闭文件 例12-4 顺序访问模式-读文件 Line Input #语句 格式：Line Input #file_numb,字符串变量名 功能：将文件或文件结束符前的所有字符，读入到字符串变