MousePointer "Variable Not Defined"

[rbrook]

I have already used mousepointer in my software with no problems. Now, when I use it in a module, I'm getting a compile error "Variable Not Defined". My exact statement is "mousepointer = vbHourglass". Thoughts anyone? Thanks!

So sorry everyone...I thought I was on the Classic VB forum. Please excuse!

[Ecniv]

VBA.... no hourglass

MousePointer Property


Specifies the type of pointer displayed when the user positions the mouse over a particular object.

Syntax

object.MousePointer [=MousePointer]

The MousePointer property syntax has these parts:

Part Description
object Required. A valid object.
MousePointer Optional. The shape you want for the mouse pointer.


Settings

The settings for MousePointer are:

Value Description
0 Standard pointer. The image is determined by the object (default).
1 Arrow.
2 Cross-hair pointer.
3 I-beam.
6 Double arrow pointing northeast and southwest.
7 Double arrow pointing north and south.
8 Double arrow pointing northwest and southeast.
9 Double arrow pointing west and east.
10 Up arrow.
11 Hourglass.
12 "Not" symbol (circle with a diagonal line) on top of the object being dragged. Indicates an invalid drop target.
13 Arrow with an hourglass.
14 Arrow with a question mark.
15 Size all cursor (arrows pointing north, south, east, and west).
99 Uses the icon specified by the MouseIcon property.


Remarks

Use the MousePointer property when you want to indicate changes in functionality as the mouse pointer passes over controls on a form. For example, the hourglass setting (11) is useful to indicate that the user must wait for a process or operation to finish.

Some icons vary depending on system settings, such as the icons associated with desktop themes.

In access:

docmd.hourglass true|false

Vince

[RobDog888]

VBA...Yes hourgalss (Busy equilivalent). In any module or class
you can do a ...

Screen.MousePointer = 11

From Access VBA Help -

MousePointer Property

You can use the MousePointer property together with the Screen
object to specify or determine the type of mouse pointer currently
displayed. Read/write Integer.

expression.MousePointer
expression Required. An expression that returns one of
the objects in the Applies To list.

Remarks
The setting for the MousePointer property is an Integer value
representing one of the following pointers.

Setting Description
0 (Default) The shape is determined by Microsoft Access
1 Normal Select (Arrow)
3 Text Select (I-Beam)
7 Vertical Resize (Size N, S)
9 Horizontal Resize (Size E, W)
11 Busy (Hourglass)


Note Setting the MousePointer property to an integer other than
one that appears in the preceding table will cause the property
to be set to 0.

You can set the MousePointer property only by using Visual Basic.

The MousePointer property affects the appearance of the mouse
pointer over the entire screen. Some custom controls have a
MousePointer property that, if set, will specify how the mouse
pointer is displayed when it's positioned over the control.

You could use the MousePointer property to indicate that your
application is busy by setting the property to 11 to display an
hourglass icon. You can also read the MousePointer property to
determine what's being displayed. This could be useful if you
wanted to prevent a user from clicking a command button while
the mouse pointer is displaying an hourglass icon.

Setting the MousePointer property to 11 is the same as passing
the True (–1) argument to the Hourglass method of the DoCmd
object. Conversely, passing the True argument to the Hourglass
method also sets the MousePointer property to 11.




VB/Outlook Guru!