怎么实现啊!高手请进!!

Question

如何实现一拖即存中那样读取文字的效果呀!谢谢!!!即从.exe格式的E书中提取文本，怎么实现啊!用api吗？WM_GETTEXT不行啊!!万分火急，再次感谢。回头请吃饭，呵呵!^_^

Answer 1

用oleDragDrop事件
例如
Private Sub Form1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, x As Single, y As Single)
On Error Resume Next
    
        If Data.GetFormat(vbCFText) Then
            Form1.text1.Text = Data.GetData(vbCFText)
            ...
        End If
    
End Sub