软件介绍:1、首先将窗体的OLEDropMode属性设抄为12、在袭窗体的OLEDragDrop事件中获得文件路径，例如：zdPrivate Sub Form_OLEDr...
1、首先将窗体的OLEDropMode属性设抄为1
2、在袭窗体的OLEDragDrop事件中获得文件路径，例如：zd
Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
For Each file In Data.Files
s1 = s1 & file & vbCrLf
Next
MsgBox s1
End Sub
上面代码中的窗体 可以是 FOTM 也可以是其他控件