怎样实现listview控件中图标项向一个picture框中拖拽

Question

现在的问题就是在listview中的mouse_down事件不能确定选中了那个item项（带图标）

Answer 1

Private Sub ListView1_DragDrop(Source As Control, x As Single, y As Single)End SubPrivate Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)End Sub

Answer 2

还有，把dragmode设置为1
然后在picture里有
Private Sub Picture1_DragDrop(Source As Control, X As Single, Y As Single)End Sub

Answer 3

ListView1_ItemClick 事件中不能产生VBBeginDrag方法，可是在mouse_down事件中不能选中item
   怎么办呢？