[VB6] Cursore "Mano" quando si passa sopra una Label

[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?