by Khai (1 Submission)
Category: Windows System Services
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 23rd September 2006
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Delete a file
Public Function Delete(FilePath As String)
Kill FilePath
End Function
Private Sub Command1_Click()
With CommonDialog1
.CancelError = False
.ShowOpen
End With
Text1.Text = CommonDialog1.Filename
End Sub
Private Sub Command2_Click()
Delete Text1.Text
End Sub