ドラッグ&ドロップしたファイルのフルパス取得 (ID:77887)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 早速の回答ありがとうございます！ 今回VBは初めての為初歩的な質問ですみませんでした。 一応以下のように最初確認はしたのですが、 同じようにOLEコントロールのイベントからDataObjectのFilesを 取得するにはどのタイミングでData.Files(0)に設定するのか・・・ 本当にすみませんが改めて宜しくお願い致します。 Private Sub lblFile_OLEDragDrop(Data As DataObject, ・・・) Dim sFilename As String sFilename = "" lblFile.Caption = "" lblFile.Caption = Data.Files(1) sFilename = trim(lblFile.Caption) If "" = Dir(sFilename, vbNormal) Then Else OLE1.CreateEmbed sFilename End If End Sub