listview怎样实现右键选中listitem(当view属性是lvwreport的时候)。

[龙之吻-2017]

我用listview控件显示图片，实现不了以下功能：
1.右键选中不了图片
　2.当鼠标移到每一张图片的时候，读取一些介绍性的内容(内容我从数据库取)。
请各位高手帮忙解决一下！

[abc10]

到一些网站下些实例
http://www.sijiqing.com/vbgood/code/index.asp?action=read&id=1084

[golden24kcn]

1的,我不知道
2的,你可以用

dim Litem as ListItem

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
set litem = livstview1.HitTest(x,y)
End Sub

这样Litem就是当前鼠标指向的item了,接下来就可以
sql="select * from 表 where name='"& litem.text &"'"

:)

[golden24kcn]

对不起,有一个地方错了,不是Form_MouseMove,是Listview1_mousemove

[suonety]

右健选择图片

Private Sub livstview1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)

livstview1.SelectedItem.Selected = False
Set livstview1.DropHighlight = livstview1.HitTest(x, y)

End Sub