５．エクスプローラーからファイル名をドラッグ・アンド・ドロップで取得する

１．エクスプローラーからファイル名をドラッグ・アンド・ドロップで取得する ２．　 ３．　 ４．　 ５．　 ６．

下記プログラムコードに関する補足・注意事項　 動作確認：Windows Vista・Windows 7 (32bit) / VB6.0(SP6) Option　：[Option Explicit] 参照設定：　　　　　　　　　　　　　　　　　　参照設定方法参照 使用 API： その他　： 　　　　：

１．エクスプローラーからファイル名をドラッグ・アンド・ドロップで取得する

Option Explicit Private Sub Form_Load() 'プログラム内ですべての OLE ドロップ操作を処理できます。 　　Text1.OLEDropMode = vbOLEDropManual ' 1 End Sub Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, _ 　　　　　Button As Integer, Shift As Integer, X As Single, Y As Single) 'ドラッグしたファイル名をテキストボックスにドロップ 　　Dim i As Integer 　 ' Text1.Text = Data.Files(1)　　 '個別の場合 　　For i = 1 To Data.Files.Count 　　　　Text1.Text = Text1.Text & Data.Files(i) & vbCrLf　　'複数のファイルに対応 　　Next i End Sub エクスプローラーからファイルをドラッグし、テキストボックスにドロップすればそのパスを含んだファイル名が取得できます。

２．

３．

４．

５．

６．

検索キーワード及びサンプルコードの別名(機能名)