以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  listview请教  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=69875)
--  作者：hbhb
--  发布时间：2015/6/12 9:54:00
--  listview请教
大师：好！
请问如何设置让鼠标经过listview中的图片时有效果显示？
--  作者：大红袍
--  发布时间：2015/6/12 10:03:00
--  

全局代码

 

Public pitem As Object
Public Sub ListView1_ItemMouseHover(sender As Object, e As Windows.Forms.ListViewItemMouseHoverEventArgs)
    If pitem IsNot Nothing Then pitem.backColor = Color.White
    e.Item.backColor = Color.Red
    pitem = e.Item
End Sub 

 

 

绑定事件

 

Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
Dim blvw As Windows.Forms.Listview = lvw.BaseControl
addHandler blvw.ItemMouseHover, addressof ListView1_ItemMouseHover
--  作者：hbhb
--  发布时间：2015/6/12 10:28:00
--  
谢谢！谢谢。绑定事件写在afterload吗，反应好像有点迟钝，快一点就好了！
--  作者：大红袍
--  发布时间：2015/6/12 10:37:00
--  
 没办法，没有对应的事件的。
--  作者：hbhb
--  发布时间：2015/6/12 10:47:00
--  
您的水平进阶就如同今年的股市！