VB 6 拖放文件，将文件名添加至列表框源代码实例

在这里小编给大家提供VB 6 拖放文件，将文件名添加至列表框源代码实例下载，都是比较常用和简单的。有需要学习相关编程的可以下载回去研究一下。
VB 6 拖放文件，将文件名添加至列表框，拖放打开文件的例子，将文件拖放至本实例窗口中，即将获取并显示出该文件的路径信息，这是以拖放方式打开文件的第一步，是一个比较实用的编程技巧。
　　Private Sub List1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
　　 Dim ThisFile As Variant
　　 For Each ThisFile In Data.Files
　　 List1.AddItem ThisFile
　　 Next
　　End Sub

关键词：拖放文件,列表框,