VB程序设计基础第12章.pptVIP

第12章 文 件;12.1 文件的基本概念 ;12.2 常用的文件操作语句和函数;;2．ChDir语句 格式：ChDir 路径名 功能：改变缺省的目录。 路径名：一个字符串表达式，表示将成为新的缺省目录的名称。;3．ChDrive语句 格式：ChDrive 驱动器 功能：改变当前的驱动器。 驱动器：一个字符串表达式，指定一个存在的驱动器。 例如，使用ChDrive 语句将当前的驱动器改为“D”： ChDrive D ;;5．RmDir语句 格式：RmDir 路径名 功能：删除一个存在的目录。 路径名：一个字符串表达式，指定要删除的目录。如果想要使用RmDir来删除一个含有文件的文件夹或目录，则会发生错误。在试图删除文件夹之前，必须先使用Kill语句来删除此目录下的所有文件。 例如：删除C驱动器下的目录MyDir RmDir C:\MyDir ;6．Dir函数 格式：Dir [(路径名 [,属性])] 功能：返回一个 String类型的字符串，用来表示一个文件或目录名称。 路径名：一个字符串表达式，是可选参数，用来指定文件或目录的名称。 属性：用来指定文件、目录或文件夹的属性。 0 (或vbNormal )：(缺省) 指定没有属性的文件。 1 (或vbReadOnly): 指定无属性的只读文件. 2 (或vbHidden) : 指定无属性的隐藏文件 4 (或VbSystem): 指定无属性的系统文件 8 (或vbVolume) : 指定卷标文件；如果指定了其它属性，则忽略vbVolume 16 (vbDirectory): 指定无属性文件及其路径和文件夹。;例如： ① MyFile = Dir(C:\Windows\Win.ini) 表示查找C:\Windows\Win.ini是否存在，如果该文件存在，返回“Win.ini”。 ②MyFile = Dir(C:\Windows\*.ini) 表示查找C:\Windows\下所有后缀是“.ini”的文件是否存在。如果有多个 “.ini” 文件存在，Dir函数将返回满足条件的第一个匹配的文件名。 若再次调用Dir函数，但不带任何参数： MyFile = Dir 则返回同一目录下的下一个“.ini” 文件。;③ MyFile = Dir(“test.txt”, vbHidden+vbReadOnly) 表示返回属性为隐藏的只读文件test.txt的名称 ④ MyPath = c:\winnt Print Dir(MyPath,vbDirectory) 表示如果文件夹winnt存在，则显示其名称。;1. FileCopy语句 格式???FileCopy 源文件名, 目标文件名 功能：复制文件。 源文件名: 一个字符串表达式，用来表示要被复制的源文件名。源文件名可以包含目录及驱动器。 目标文件名：一个字符串表达式，用来指定要复制的目标文件名。目标文件名可以包含目录及驱动器。 ;例如，将源文件srcfile.txt复制到D盘且目标文件名为destfile.txt Dim sFile, dFile sFile = srcfile.txt 指定源文件名 dFile = d:\destfile.txt 指定目标文件名 FileCopy sFile, dFile ;2．Kill语句 格式：Kill 路径名 功能：删除指定的文件。 路径名：一个字符串表达式，用来指定被删除的文件。路径名可以包含目录及驱动器。 Kill支持多字符(*)和单字符(?)的通配符来指定多个文件，使用时一定要慎重！;3．Name 语句 格式：Name 原路径名 As 新路径名 功能：重新命名文件、目录或文件夹的名称。 原路径名：一个字符串表达式，表示已存在的文件名、目录或文件夹，可以包含目录及驱动器。 新路径名：一个字符串表达式，表示新的文件名、目录或文件夹，可以包含目录及驱动器。;注意： Name语句能重新命名文件并可将其移动到一个不同的目录或文件夹中。Name也可在不同的驱动器间移动文件。 在一个已打开的文件上使用Name语句，将会产生错误。在改变名称之前，必须先关闭打开的文件。 Name语句参数不能包括多字符(*)和单字符(?)的统配符。;例如： 将oldfile.txt更名为newfile.txt Name oldfile.txt As newfile.txt 将C:\MyDir\OldFile更名为C:\NewDir\NewFile OldName = C:\MyDir\OldFile