画像をデスクトップからドラッグしてキャンバスに表示させたい。
Me.AcceptPictureDrop
Me.AcceptFileDrop("image/x-pict")

If Obj.PictureAvailable then
Canvas1.Backdrop=Obj.Picture
Elseif Obj.FolderItemAvailable then
Canvas1.Backdrop=Obj.FolderItem.OpenAsPicture
End if
と、ユーザーズガイドの通りにやったけど動かない。
何か宣言とか必要？？？