试用型网站,安吉哪里做网站好,百度推广关键词价格查询,app手机端电子商务网站功能在VB编程中#xff0c;我们如何删除一个指定的文件#xff0c;或者文件夹呢#xff1f;本文#xff0c;介绍两种方法#xff0c;详细的介绍如何实现删除文件和文件夹#xff0c;并对两种方法的区别做一个说明。一、删除文件的方法方法1#xff1a;使用kill方法删除文件语… 在VB编程中我们如何删除一个指定的文件或者文件夹呢本文介绍两种方法详细的介绍如何实现删除文件和文件夹并对两种方法的区别做一个说明。一、删除文件的方法方法1使用kill方法删除文件语法kill filename说明filename为文件的路径方法2使用DeleteFile方法删除文件语法 Dim fs As Object Set fs CreateObject(Scripting.FileSystemObject) fs.DeleteFile filename说明filename为文件的路径使用以上两种方法删除文件时可以使用*和?通配符以实现批量删除有一定规律的文件。例如kill E:\test\*.txt上面这个代码可以删除E:\test文件夹下所有txt格式的文件。二、删除文件夹方法1使用RmDir方法删除文件夹语法RmDir folderName说明folderName为文件夹路径方法2使用deletefolder删除指定文件夹 Dim fs As Object Set fs CreateObject(Scripting.FileSystemObject) fs.deletefolder folderName说明folderName为文件夹路径使用方法1和方法2来删除文件夹时的区别在使用RmDir来删除文件夹时只能删除一个空的文件夹如果文件夹内有文件或者文件夹则删除会出错。而使用deletefolder删除文件夹时则不会存在上述问题。它将会连同文件夹内所有文件全部删除。删除文件和文件夹时注意事项当删除文件和文件夹时如果文件处于打开或者文件名不正确时删除可能会发生错误。此时可以使用on error go to语句来实现错误跳转。举例通过以下这个例子掌握删除文件和删除文件夹的方法以及两种方法的区别。界面如下所示代码如下所示Option ExplicitDim str$Private Sub Form_Load() 设置测试文件目录请根据自己的文件位置修改 str C:\Users\Administrator\Desktop\新建文件夹End Sub用kill删除指定文件Private Sub Command1_Click() 删除该目录下的test.txt文件 Kill str \新建文本文档.txtEnd Sub用kill删除所有文件Private Sub Command2_Click() 删除该目录下所有文件 Kill str *.*End Sub用deletefile删除指定文件Private Sub Command3_Click() Dim fs As Object Set fs CreateObject(Scripting.FileSystemObject) fs.DeleteFile str \新建文本文档.txtEnd Sub用deletefile删除所有文件Private Sub Command4_Click() Dim fs As Object Set fs CreateObject(Scripting.FileSystemObject) fs.DeleteFile str \*.*End Sub用kill删除指定文件夹Private Sub Command5_Click() RmDir str 注意此方法只能删除空的文件夹End Sub用deletefolder删除文件夹Private Sub Command6_Click() Dim fs As Object Set fs CreateObject(Scripting.FileSystemObject) fs.deletefolder str 注意此方法可以删除非空文件夹End Sub运行程序然后在相应的文件夹内放置文件或者文件夹再点击各按钮测试查看效果。
