VB右键选定listview控件中的某一行

ASP/Visual Basic代码
  1. Private Sub ListView1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)  
  2. If Button = 2 then  
  3. ListView1.SelectedItem = ListView1.HitTest(x,y)  
  4. End If  
  5. End Sub  

右键点击空白不弹出菜单

ASP/Visual Basic代码
  1. If ( Button = 2) and (not ListView1.SelectedItem is nothing) then  
  2. popupmenu menu...  
  3. end if   


上一篇: VB中HitTest的用法
下一篇: 不允许百度保存其快照
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags: vb
相关日志:
评论: 0 | 引用: 0 | 查看次数: 2539
发表评论
昵 称:
密 码: 游客发言不需要密码.
邮 箱: 邮件地址支持Gravatar头像,邮箱地址不会公开.
网 址: 输入网址便于回访.
内 容:
验证码:
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.
字数限制 1000 字 | UBB代码 开启 | [img]标签 关闭

 广告位

↑返回顶部↑