１．マウスのドラッグ・アンド・ドロップでファイル名取得

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

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

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

Option Explicit　　 'SampleNo=105　 2002.05.19 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) 'ドラッグしたファイル名をテキストボックスにドロップ 　　Text1.Text = Data.Files(1) End Sub これだけのコードで、エクスプローラーからファイル名をドラッグしてテキストボックスに表示する事ができます。 ファイルリストボックスからも同様にドラッグして取得する事もできますし、同時に複数のファイルを取得する事もできますので、挑戦して見て下さい。

２．

３．

４．

５．

６．

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

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