vb.net - VB.netのMouseHoverイベントでリストビューアイテムを強調表示するにはどうすればよいですか？

Question

Windowsエクスプローラーのように、VB.netのイベントでListviewアイテムを強調表示するにはどうすればよいですか？MouseHover

Answer 1

コントロールのHoverSelectionプロパティをに設定します。ただし、すぐに選択したい場合は、手動で実装できます。たとえば、次のようなことを試すことができます。ListViewTrue

Private Sub ListView1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ListView1.MouseMove
    Dim currentItem As ListViewItem = ListView1.GetItemAt(e.X, e.Y)
    For Each item As ListViewItem In ListView1.Items
        item.Selected = False
    Next
    If currentItem IsNot Nothing Then
        currentItem.Selected = True
    End If
End Sub

ただし、コントロールのHideSelectionプロパティがに設定されていることを確認してください。設定されていない場合、リストにフォーカスがない限り、選択は表示されません。ListViewFalse

Answer 2

ちらつきなし：

Private Sub ListView1_MouseMove(sender As Object, e As MouseEventArgs) Handles ListView1.MouseMove
    Dim currentItem As ListViewItem = ListView1.GetItemAt(e.X, e.Y)
    For Each item As ListViewItem In ListView1.Items
        If currentItem IsNot Nothing Then
            currentItem.Selected = True
        Else
            item.Selected = False
        End If
    Next
End Sub