vb中如何设置鼠标光标的形状和颜色(vb设置光标位置)

导语：VB中如何设置鼠标光标的形状

VB中如何设置鼠标光标的形状呢，下面就来简单介绍：

MousePointer属性

鼠标光标的形状通过MousePointer属性来设置，该属性可以在属性窗口中设置，也可以在程序代码中设置。

MousePointer的属性是一个整数，可以取0～15之间的数值。当某个对象的MousePointer属性被设置为某个值时，鼠标光标在该对象内就以相应的形状显示。

设置鼠标光标形状

MousePointer属性可以通过代码设置，也可以通过属性窗口设置。

代码中设置MousePointer属性

在程序代码中设置MousePointer属性的一般格式为：

对象. MousePointer=设置值

在属性窗口中设置MousePointer属性

单击属性窗口的MousePointer属性条，然后单击设置框右端向下的箭头，将下拉显示MousePointer的16个属性值。如果把MousePointer属性设置为99，则可以通过MouseIcon属性定义自己的鼠标光标。有以下两种方法。

（1）在属性窗口中定义，可首先选择所需要的对象，再把MousePointer属性设置为"99-Custom"，然后设置MouseIcon属性，把一个图标文件赋给该属性（与设置Picture属性的方法相同）。

（2）如果用程序代码设置，则可先把MousePointer属性值设置为99，然后再用LoadPicture函数把一个图标文件赋给MouseIcon属性。

鼠标光标形状的使用

在Windows中，鼠标光标的应用有一些约定俗成的规则。为了与Windows环境相适应，在应用程序中应遵守这些规则，主要有：

（1）表示用户当前可用的功能，如"I"形鼠标光标（属性值3）表示插入文本；十字形状（属性2）表示画线或圆，或者表示选择可视对象以进行复制或存取。

（2）表示程序状态的用户可视线索，如沙漏鼠标（属性值11）表示程序忙，一段时间后将权力交给用户。

（3）当坐标（X，Y）值为0时，改变鼠标光标形状。

拖放与拖放有关的属性、事件和方法

拖放的属性

有两个属性与拖放有关，即DragMode和DragIcon。

拖放的事件

与拖放有关的事件是DragDrop和DragOver。

拖放的方法

与拖放有关的方法有Move和Drag。其中Move方法已比较熟悉，下面介绍Drag方法。Drag方法的格式为：

控件.Drag 整数

不管控件的DragMode属性如何设置，都可以用Drag方法来人工启动或停止一个拖放过程。

"整数"的取值为0、1或2，其含义分别为：

0-取消指定控件拖放。

1-当Drag方法出现在控件的事件过程中时，允许拖放指定的控件。

2-结束控件的拖动，并发出一个DragDrop事件。

本文内容由小森整理编辑！