- 1、本文档共35页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
教学要求 1.掌握文件读写的基本方法; 2、掌握与文件处理相关的语句和函数的用法; 3、理解文件系统控件的基本功能; 4、了解文件管理器应用程序开发过程。 5.1 文件管理器程序任务 5.1 文件管理器程序任务 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.2 文件系统控件及相关语句 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 5.3 标准文件输入/输出 实验 更改密码登录程序 5.3.2 随机文件 说明:1)文件名应包含完整路径 2)纪录长度用于制定随机文件每条纪录的长度。默认为128Byte,可取0~32k,也可在程序中用Len函数获得纪录长度。 3)随机文件打开后,既可从文件中读取数据,也可向文件中写入数据。如: Open “A:\D3.txt” For Random As #1 Len=Len(Student) (2)关闭随机文件用Close语句。 5.3.2 随机文件 2、随机文件的写操作 格式:Put [#] 文件号,[纪录号],变量名 功能:把变量中的数据写入指定文件中纪录号指定的位置。 说明: 1)纪录号为大于1的整数 2)省略纪录号时,新纪录插入到当前纪录之后 5.3.2 随机文件 3、随机文件的读操作 格式:Get [#] 文件号,[纪录号],变量名 功能:从指定文件中读取纪录号指定的纪录,并赋值给变量。 说明: Get语句依次读取一条纪录后,文件纪录指针自动指向下一条纪录,纪录号加1。 * * 第5讲 文件处理应用程序设计 5.1.1 任务概述 文件是指存储在外部介质上的数据的集合,是一种可以永久性存储数据的形式。操作系统以文件为单位管理数据,文件名是文件访问的标示。把数据写入文件或从文件中读取数据,计算机需要先根据文件名找到指定的文件,然后再执行读写操作。 采用VB中提供的驱动器列表框、目录列表框和文件列表框三种控件可实现上述功能。在本章中我们将建立一个简单的文件管理器。 5.1.2 界面设计 1、创建工程 2、创建窗体 5.1.3 代码设计 1、编写ClearAttr过程 2、编写ShowAttr过程 3、驱动器列表框控件的Change事件 4、目录列表框控件的Change事件 5、文件列表框控件的Change事件 5.2.1 改变当前驱动器 语法:ChDrive 驱动器名 说明:驱动器名是一个字符串表达式,指定一个存在的驱动器。使用空字符串,驱动器不变;使用多个字符,则使用首字母。 例:ChDrive “D” 5.2.2 改变当前目录 语法:ChDir 路径名 说明:语句改变缺省目录位置,但不会改变缺省驱动器位置。 例:ChDir “D:\Temp” 5.2.3 删除文件 语法:Kill 文件名 说明:Kill支持统配符(*和?) 例:Kill D:\Data\Test.txt Kill C:\TEMP\*.tmp 5.2.4 拷贝文件 语法:FileCopy 源文件,目标文件 说明:源文件和目标文件名是字符串表达式,可以包含驱动器、文件夹。不能对打开的文件执行复制操作。 5.2.5 文件重命名 语法: Name 旧文件名 As 新文件名 说明:Name语句重新命名文件并将其移动到不同的目录或文件夹中。可跨驱动器移动文件,且只能重命名文件,不能创建新文件。 Dim OldName,NewName As String OldName=“C:\mydir\oldfile” NewName=“C:\youdir\Newfile” Name OldName As NewName 5.2.6 创建新目录 语法:MkDir 目录名 说明:若没有指定驱动器,则在当前驱动器上创建目录。例:Mkdir “成绩单 5.2.7 删除目录 语法:RmDir 目录名 说明:在使用此命令前,应先使用Kill命令删除所
文档评论(0)