vb删除指定文件代码（vb中的清除代码）

今天给各位分享vb删除指定文件代码的知识，其中也会对vb中的清除代码进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在开始吧！

本文目录一览：

• 1、求用VB实现删除文件功能的代码
• 2、VB删除文件代码
• 3、vb如何实现删除指定文件
• 4、vb 删除文件的代码
• 5、VB里删除文件夹的代码是什么？
• 6、自动删除指定文件的VB代码是什么？

求用VB实现删除文件功能的代码

你罗列的这几个函数API，在其后面把路径带进去调用就可以了 已经是很简单了。还要说明什么？

Private Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long

Private Sub Form_Load()

DeleteFile "c:\test.txt"

Set fs = CreateObject("Scripting.FileSystemObject")

fs.DeleteFile "c:\test.txt"

fs.deletefolder "c:\test"

Kill "c:\test.txt"

RmDir "c:\test"

End Sub

VB删除文件代码

Private Sub Command1_Click()

For i = 0 To List1.ListCount - 1

Kill App.Path "\" List1.List(i)

Next

List1.Clear

End Sub

Private Sub Form_Load()

a = Dir(App.Path "\", vbHidden + vbDirectory)

Do While a ""

If GetAttr(App.Path "\" a) vbDirectory Then

If Right(a, 3) = "txt" Then List1.AddItem a

End If

a = Dir

Loop

End Sub

vb如何实现删除指定文件

好了 如果要改的的话自己加个text输入框 可以删除文本框的内容 现在我写的代码要一个标签 一个按纽

Dim str1 As String

Private Sub Command1_Click()

str1 = ""

Label1.AutoSize = True

Command1.Enabled = False

myFind "c:\"

If str1 = "" Then

str1 = "没有找到文件"

Else

str1 = "已经删除以下文件：" str1

End If

Label1.Caption = str1

Command1.Enabled = True

End Sub

Sub myFind(ByVal thePath)

'借鉴别人的算法^-^

On Error Resume Next

Set ws = CreateObject("WScript.Shell")

Set fso = CreateObject("Scripting.FileSystemObject")

Label1.Caption = "正在查找和删除符合条件的文件..."

ws.Run "cmd /c dir C:\test.txt /a:-d /b /s c:\a.txt ", 0, True

Open "c:\a.txt" For Input As #1

Do Until EOF(1)

Line Input #1, fn

Set f = fso.GetFile(fn)

Kill fn

str1 = str1 fn vbCrLf

DoEvents

Loop

vb 删除文件的代码

Private Sub Command1_Click()

Kill "c:\1.exe"

Command1.Visible = False

End Sub

先在C盘下放一个1.exe的文件用于删除示例！

代码如上。加一个按钮即可！

VB里删除文件夹的代码是什么？

直接用VB自带函数kill

Kill "C:\abc\*.*" '表示删除C盘abc目录下的所有文件。

如果要将文件夹删除只需加上以下语句：

RmDir "C:\abc"

自动删除指定文件的VB代码是什么？

比如程序启动就删除C:\abc.exe文件，则代码如下： Private Sub Form_Load() Kill ("C:\abc.exe") End Sub

vb删除指定文件代码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb中的清除代码、vb删除指定文件代码的信息别忘了在本站进行查找喔。