Here is a small code snippet to get file name of any file(s) dragged and dropped on to your form. After getting the file names, you can do anything with it – copy, move, delete, or something else..Simply add a form, Insert this code, Run your program and drop some file(s) to the form. It will display list of all the files dropped!!
Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim txt As String
Dim fname As Variant
For Each fname In Data.Files
txt = txt & fname & vbCrLf
' Indicate we did nothing with the files.
Effect = vbDropEffectNone