Originariamente inviato da warhammer89
mmm ho fatto cosi:

Private Sub Label5_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim hdl As Long
hdl = LoadCursor(0, HandCursor)
If hdl Then SetCursor hdl
End Sub

Funziona, ma per caso è pesante da gestire, dà problemi?
Come dicevo, mettendo del codice nella routine MouseMove, le istruzioni vengono eseguite in ogni istante in cui il mouse e' in movimento sulla label !

Mentre invece e' sufficiente che venga eseguito UNA volta.
Mettilo nella routine Form_Load.

Ciao.