![30759a83fabee7ed81d651ae883ce2d5.png](https://i-blog.csdnimg.cn/blog_migrate/c0e7f0b490959e9c452949e6527f72a3.jpeg)
大家好,我们今日继续讲解VBA代码解决方案的第105讲内容:窗体中的鼠标指针形状的自定义方法,我们在操作电脑时,鼠标是我们最常用的硬件,当移动鼠标时会在屏幕上留下痕迹,鼠标在屏幕上的形状并不是一成不变的,我们也可以改变它。
使用对象的MousePointer属性可以自定义鼠标掠过窗体控件时的指针类型,这个属性可以指定当用户把鼠标放到特定对象上时,所显示鼠标指针的类型,语法如下:
object.MousePointer [= fmMousePointer]
参数object是必须的,一个有效对象。
参数fmMousePointer是可选的,所需鼠标指针的形状。
fmMousePointerDefault 0 标准指针。根据对象来决定指针的图像(默认)
fmMousePointerArrow 1 箭头
fmMousePointerCross 2 十字线指针
fmMousePointerIBeam 3 I 形标
fmMousePointerSizeNESW 6 斜下的双箭头
fmMousePointerSizeNS 7 南北向的双箭头
mMousePointerSizeNWSE 8 斜上的双箭头
fmMousePointerSizeWE 9 东西向的双箭头
fmMousePointerUpArrow 10 向上键