1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
顺序文件.ppt

单元辅导(八);[学习目标]   掌握:文件控件和文件操作。    理解:文件类型及结构。 [学习要点] 利用文件控件处理文件的方法、文件处理函数、文件系统对象(FileSystemObject)编程。 在计算机系统中,文件是指存放在外部存储介质上的数据和程序等。为了方便用户存取,在现代的计算机系统中,都包含有文件管理系统,用户可以对文件进行各种各样的处理和操作,如选择、打开和删除等。 ;文件控件: 一、DriveListBox控件:在程序的运行过程中,为用户提供一个选择有效的磁盘驱动器的功能,该控件可以用来显示用户系统中所有有效磁盘驱动器的列表。Drive属性,可以在程序的运行阶段通过设置Drive属性的值来改变DriveListBox控件的缺省驱动器。 例: ?1、添加控件如图;设置属性:ToolTipText:DriveListBox控件的应用 ;3、运行程序: ;3、运行程序: ;2、添加代码: Private Sub Dir1_Change()          MsgBox Dir1.List(-2)         End Sub Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub Private Sub Form_Load() Drive1.Enabled = True Dir1.Enabled = True Drive1.Drive = e:\ End Sub 3、运行程序: ; ListCount属性:返回控件的列表部分工程的个数,对DirListBox 控件而言,ListCount属性中存储着当前目录中子目录的个数。 例:1、添加代码:Private Sub Dir1_Change()           MsgBox Dir1.ListCount          End Sub   2、运行结果: ; 三、FileListBox控件:在程序的运行过程中,根据Path属性 指定的目录,将文件定位并列举出来。 例:1、界面设计:设置属性:Patteren:*.txt;*.exe ;3、运行程序: ;利用文件控件来处理文件 第一个示例:综合利用DriveListBox控件、DirListBox控件和          FileListBox控件的协调工作来处理文件。 ;Private Sub File1_Click() MsgBox File1.Path \ File1.FileName End Sub Private Sub Form_Load() Drive1.Enabled = True Dir1.Enabled = True File1.Enabled = True File1.Pattern = *.exe Drive1.Drive = c:\ End Sub ;第二个示例: 1、添加控件,设置属性 ;文件处理函数 ;;Name语句:重新命名一个文件、目录或文件夹,它的语法结构如下:    Name oldpathname As newpathname  其中包括以下两个部分: oldpathname 为字符串表达式,由它来指定已存在的文件名和位置, 在其中包含目录或文件夹以及驱动器。 newpathname也是字符串表达,它指定新的文件名和位置,同样要 包含目录或文件夹以及驱动器。 ;文件的访问语句和函数: ;  所谓的顺序文件,通常指的是普通的文本文件,文件中的字符 包括文本字符及控制字符,如“,”,“chr(14)”,“cr,lf” ,“chr(10)等。  由于这类型文件的信息是按照顺序从头到尾按顺序排列,而且 只提供第一条记录的存储位置,所

文档评论(0)

170****0532 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

版权声明书
用户编号:8015033021000003

1亿VIP精品文档

相关文档