VB.NET用户控件中Cursors.Hand未适配系统鼠标配置的问题求助

嘿，这个问题我之前做VB.NET控件开发时也踩过坑！你现在用的Cursors.Hand其实是个静态预定义光标对象，它指向的是Windows默认的手型光标资源，不会随着用户在系统设置里更改的自定义光标样式更新——这就是为什么箭头光标能正常跟随系统设置，手型光标却不行。

不用去读注册表那么麻烦，.NET框架里已经提供了更简便的方法：

核心解决方案：使用SystemInformation.HandCursor #

直接把你的光标赋值代码替换成下面这样就行：

' 替换原来的 Cursors.Hand
Me.Parent.Control.Cursor = SystemInformation.HandCursor

SystemInformation.HandCursor是动态获取的属性，每次访问它都会返回当前系统配置的手型光标（包括用户自定义的样式），完美解决你的问题。

可选：监听系统光标设置变化（实时更新） #

如果需要在用户运行控件时更改系统光标设置也能实时更新控件的光标，你可以添加系统偏好变化的监听事件：

Imports Microsoft.Win32

Public Class YourCustomControl
    Public Sub New()
        InitializeComponent()
        ' 注册系统偏好变化事件
        AddHandler SystemEvents.UserPreferenceChanged, AddressOf OnCursorPreferenceChanged
    End Sub

    Private Sub OnCursorPreferenceChanged(sender As Object, e As UserPreferenceChangedEventArgs)
        ' 只在光标类别设置变化时更新
        If e.Category = UserPreferenceCategory.Cursor Then
            Me.Parent.Control.Cursor = SystemInformation.HandCursor
        End If
    End Sub

    ' 记得在控件销毁时移除事件处理，避免内存泄漏
    Protected Overrides Sub Dispose(disposing As Boolean)
        If disposing Then
            RemoveHandler SystemEvents.UserPreferenceChanged, AddressOf OnCursorPreferenceChanged
            components?.Dispose()
        End If
        MyBase.Dispose(disposing)
    End Sub
End Class

为什么Cursors.Hand不行？ #

简单来说，Cursors.Hand是Cursor类的静态成员，它指向的是Windows系统默认的手型光标资源（固定的系统句柄），不会主动感知用户对系统光标自定义的修改。而SystemInformation.HandCursor内部会调用Windows API去获取当前生效的手型光标，所以能始终和系统设置保持一致。

内容的提问来源于stack exchange，提问作者Paul Evans