技巧 1 删除指定的文件使用 Kill 方法删除指定的文件, 如下面的代码所示。 Sub KillFile( )Dim myFile As String myFile =ThisWorkb &"\ "If Dir(myFil e) <> "" Then Kill myFile End Sub 代码解析: KillFile 过程使用 Kill 方法示例文件所在文件夹中的“ ”文件。第 3 行代码指定所要删除文件的路径和文件名称。第 4 行代码使用 Dir 函数返回指定文件名,( 关于 Dir 函数请参阅技巧 173 ) 如果存在该文件则使用 Kill 语句删除。 Kill 语句从磁盘中删除文件, 语法如下: Kill pathname 参 数 pathname 是必需的, 用来指定一个文件名的字符串表达式,可以包含目录或文件夹、以及驱动器。在 Microsoft Windows 中, Kill 方法支持多字符(*)和单字符(?) 的统配符来指定多重文件, 如需要删除当前目录下所有*. Xls 文件可以使用下面的代码:Kill "*. xls " 注意使用 Kill 方法不能删除已打开的文件, 否则会产生错误。
删除指定的文件 来自淘豆网m.daumloan.com转载请标明出处.
