*/ --------------------------------------------------------------------------------------
*/ 出自： 编程中国 http://www.bc-cn.net
*/ 作者： qqqq1231
*/ 时间： 2007-8-13 编程论坛首发
*/ 声明： 尊重作者劳动，转载请保留本段文字
*/ --------------------------------------------------------------------------------------

ListView控件源码示例，记录可按最近到最久的顺序排列，对于新手的学习有很大的帮助。
有一个问题没有解决，点击确定，在ListView控件显示出所有内容后，我没有选择记录，但系统默认选择了第一项，
因为本人也是新手，所以这一问题无法解决，望高手指点。

顶一下...合适新手

好样的！支持一下，网上的VB6.0代码不多啊

不是吧？

谢了，刚看一看，现有个问题：能用ListView查询出相关数据，如何解决当选中ListView中的数据前的复选框时并将自动修改这行中的一列的数据，也就是说选中第三行的复选框时自动修改第三行中的第五列数据。并同时自动刷新数据。请帮个忙看一看。

這個只要利用一下，起始行列與終止行列即可

学习

顶一下...合适新手

Private Sub ListView1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
    Dim itmX As ListItem
    Set itmX = ListView1.HitTest(x, y)
    If itmX Is Nothing Then
        Exit Sub
    Else
        
        If Button = 2 Then
            PopupMenu txm '右键,在此处可以加入弹出菜单
            Debug.Print "right key"
            
        End If
    End If
End Sub

[此贴子已经被作者于2020-12-4 13:40编辑过]