OLE 为什么无法获得特殊图标?
我设置 FORM 为 OLE 后,可以得到任何文件的信息,但是如果把“我的电脑”、“我的文档”等图标拖到我程序的窗体就无法识别,提示错误是“数据格式不匹配”。
请问这些特殊的图标该怎么获得数据?
代码如下:
Private Sub Form_OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer)
If Data.GetFormat(vbCFText) Then
Text1.Text = Data.GetData(vbCFText)
Else
For i1 = 1 To Data.Files.Count
Text1.Text = Data.Files(i1)
Next
End If
End Sub