关键词：VB，文件，拖拽
接下来介绍的技术可以用于文件拖拽。
文件拖拽的例子很多，比如你用QQ的时候，将文件拖拽到聊天窗口就进入了文件传输的窗口
现在开始：
接收对象
1.配置ListBox
| 属性 | 值 |
|---|---|
| OLEDragMode | 0 - Manual |
| OLEDropMode | 1 - Manual |
2.创建事件处理
Private Sub List1_OLEDragDrop(Data As DataObject,Effect As Long,Button As Integer,Shift As Integer,X As Single,Y As Single)
List1.AddItem Data.Files(1)
End Sub
这样，我们就完成了文件的拖拽，ListBox中显示的是文件的路径。
聪明如你，相信会知道如何使用了吧。
举一反三应该易如反掌了吧。