Screen.MousePointer = hand in VB 6.0

Here's a quick tip demonstrating how to use the hand cursor in Visual Basic 6.0 using API calls.

API references and constants to include in a Module
 
  Public Const HandCursor = 32649&
  Public Declare Function SetCursor Lib "user32" (ByVal hCursor As Long) As Long
  Public Declare Function LoadCursor Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long,
                 ByVal lpCursorName As Long) As Long
Sample Code for MouseMove event of the desired control
  
  Dim lHandle As Long
  lHandle = LoadCursor(0, HandCursor)
  If (lHandle > 0) Then SetCursor lHandle
By Robbe Morris   Popularity  (4367 Views)
Picture
Biography - Robbe Morris
Robbe has been a Microsoft MVP in C# since 2004. He is also the co-founder of NullSkull.com which provides .NET articles, book reviews, software reviews, and software download and purchase advice.  Robbe also loves to scuba dive and go deep sea fishing in the Florida Keys or off the coast of Daytona Beach. Microsoft MVP