MouseIcon

<< Click to Display Table of Contents >>

 

MouseIcon

Picture This property sets an image to the mouse pointer whenever it moves over an object. This property is valid only when the MousePointer property is defined as 99 - fmMousePointerCustom.

An image file can be selected to use as a mouse pointer by using the Properties List (.cur or .ico extensions) or via scripts, by using the LoadPicture method to specify a file path and name containing a customized icon (.cur extension only), according to the next example.

Sub CommandButton1_Click()
  ' Setting the 99 - fmMousePointerCustom item to this property
  ' so that it accepts mouse icon customization
  Screen.Item("CheckBox1").MousePointer = 99
  Screen.Item("CheckBox1").MouseIcon = LoadPicture("c:\a.cur")
End Sub

Was this page useful?