vb.net - 防止 ListView 取消选择

Question

目标

如果 ListView 中有 1 个或多个项目，并且用户在 ListView 的空白处单击，则所选项目应保持选中状态。

换句话说，如果一个项目被选中，它应该保持选中状态，除非另一个项目被选中。

现状

我将 ListView 的属性 HideSelection 设置为 false，这将使所选的 ListViewItem 在控件失去焦点时保持选中状态。但是，当我单击 ListView 的空白区域时，这并不能解决问题。

有什么建议吗？

Answer 1

您可以通过子类化 ListView 来实现:

Public Class UIListView
    Inherits ListView

    Private Sub WmLButtonDown(ByRef m As Message)
        Dim pt As Point = New Point(m.LParam.ToInt32())
        Dim ht As ListViewHitTestInfo = Me.HitTest(pt)
        If (ht.Item Is Nothing) Then
            m.Result = IntPtr.Zero
        Else
            MyBase.WndProc(m)
        End If
    End Sub

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        Select Case m.Msg
            Case WM_LBUTTONDOWN
                Me.WmLButtonDown(m)
                Exit Select
            Case Else
                MyBase.WndProc(m)
                Exit Select
        End Select
    End Sub

    Private Const WM_LBUTTONDOWN As Integer = &H201

End Class