Drag and drop from VB to Photoshop

I have created an inventory of photos. I have am using a local database with 3 columns: image number, image description and file path. I am dragging and dropping the pictures into the file path textbox (DB is in detailed view) to get the file path. I also have a picture box linked to the file path that displays my pictures. What I would like to be able to do is drag my pictures into Photoshop from my inventory program. I have read that you can do this by using OLE and setting the dragmode to automatic. I am not sure how to work with OLE. Can someone please direct me on how to do this. Every post has been an eduction. Thanks to all who take the time to help out!

My drag and drop code for the file path is:

FilepathtextBox_DragDrop
Dim Files As String() = CType(e.Data.GetData(DataFormats.FileDrop), String())
For Each FileName As String In Files
FilepathtextBox.text=FileName
Next

FilepathtextBox_DragEnter
If e.Data.GetDataPresent(DataFormats.FileDrop)
Then
e.Effect = DragDropEffects.Copy
End If