怎样可以把硬盘中的文件直接拖放到窗体?解决方法

怎样可以把硬盘中的文件直接拖放到窗体?如一个记事本文件能被拖放到窗体的文本框控件中显示内容[解决办法]

怎样可以把硬盘中的文件直接拖放到窗体?
如一个记事本文件   能被拖放到窗体的文本框控件中   显示内容

[解决办法]
TextBox 允许 oleDropMode = 1 - Manual

然后通过


Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)

End Sub

Private Sub Text1_OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer)

End Sub