why isn't this code working?

[Blaster]

Private Sub Picture1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
If Data.GetFormat(vbCFBitmap) Then Picture1.Picture = LoadPicture(Data.Files(1))
End Sub

now it should display the file in Picture1.Picture but it doesn't what is up??