如何将文件拖放到VB6应用程序上？

我正在尝试创建一个VB应用程序，可以从PC上安装android apk。这样，当我想安装apk时，我更喜欢将apk从浏览器放到应用程序中。但我不知道怎么做。我是VB6新手。请帮帮我

要捕获表单上要删除的文件的文件名，可以使用以下代码：

Private Sub Form_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
  Dim intFile As Integer
  With Data
    For intFile = 1 To .Files.Count
      Print Data.Files.Item(intFile)
    Next intFile
  End With 'Data
End Sub

这将打印表单上文件的文件名。只需将Print语句更改为您自己的代码即可安装apk

[编辑]

---

我忘了提到您必须将表单的OLEDropMode设置为1-Manual，否则您不能在表单上删除任何内容

请原谅，陛下！没有密码！谢谢。这个问题不是很清楚。这意味着你不能，你不知道如何去做，你正在完全摆脱对它的思考。我同意OP的观点：问题很清楚，尽管可能没有想象的那么花哨for@CodyGray：有时，您必须在字里行间阅读，并注意这是一个新的vb用户。他询问如何捕获正在表单上删除的文件的文件名。从他的问题中可以清楚地看出这一点。他没有发布任何代码，但可能他不知道要使用哪个事件，甚至不知道他可以使用一个事件。如果我发布了这个问题（与OP的知识相同），那么我会使用更多的单词，可能会包括两张图片来显示拖放，而且可能不会关闭。。你对这个问题所做的努力是对的：）谢谢你的回答！我对VB非常陌生。我的问题是无法在表单上删除文件！鼠标指针状态为（）不允许在窗体上拖放文件！请帮帮我。。谢谢你的好意！非常感谢。这么多，这段代码就是我想要的我忘了提到表单的OLEDropMode应该设置为1（手动）是的，但我做到了。非常感谢你，先生！你真有本事D