1º Or paste that =SSF_DsplyMouseCursor( "Hand") in the event line
Or
Simply use the 2ª option
Private Sub Label16_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim HCur As Long ' receives handle to the loaded cursor
Dim holdcursor As Long ' receives handle to...