by Rahul chaudari (1 Submission)
Category: Databases/Data Access/DAO/ADO
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 29th March 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Deleting the file without API
API Declarations
'Take the dirlistbox, drivelistbox, Filelistbox on the form with
' one commandbutton
Kill (File1.Path & "\" & File1.List(File1.ListIndex))
File1.Refresh
File1.Selected(1) = True
File1.SetFocus
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub Form_Load()
Form1.Top = 2200
End Sub