Me.MousePointer = 11
程序代码
Me.MousePointer = 0
END Sub为什么当我按钮按下的时候鼠标变成漏斗,但是动一下又变回去了
怎么使漏斗在程序执行玩才变回普通形状
程序代码
Me.MousePointer = 0
END Sub为什么当我按钮按下的时候鼠标变成漏斗,但是动一下又变回去了
怎么使漏斗在程序执行玩才变回普通形状
解决方案 »
- 大家看看我这段代码那里错了?? 提示语法错误。帮我看看那里错了
- VB实现自动开机问题!!!!
- vb 安装文件安装时发生错误,显示为Setup.List的问题,请高树帮忙解决。
- 如何求相减后的日期
- 怎样才能最好的做到这几步:
- 按扭加声音
- 希望得到该图像处理问题的完整解决方案[难题]
- vb xmlhttp 参数问题 网站获取参数是乱码 在线等待
- 如何用vb实现获取和识别当前屏幕指定区域的文字或者数字,如斗地主中扑克的牌面?多谢!
- 请教一个re.open查询会延时的问题
- 求一个flash缩略图的方法
- 有从事编程行业比较资深的人吗,小弟我大一马上大二,很喜欢编程,想将来从事编程行业,但很多人劝我改行学金融。。。诚求过来人意见与指导
程序代码
screen.mousepointer=vbdefault
返回或设置一个值,该值指示在运行时当鼠标移动到对象的一个特定部分时,被显示的鼠标指针的类型。语法object.MousePointer [= value]MousePointer 属性语法包含下面部分:部分 描述
object 对象表达式,其值是“应用于”列表中的一个对象。
value 整数,按照设置值中的描述指定被显示的鼠标指针类型。
设置值value 的设置值为:常数 值 描述
vbDefault 0 (缺省值)形状由对象决定。
VbArrow 1 箭头。
VbCrosshair 2 十字线(crosshair 指针)。
VbIbeam 3 I 型
VbIconPointer 4 图标(矩形内的小矩形)。
VbSizePointer 5 尺寸线(指向东、南、西和北四方向的箭头)。
VbSizeNESW 6 右上-左下尺寸线(指向东北和西南方向的双箭头)。
VbSizeNS 7 垂-直尺寸线(指向南和北的双箭头)。
VbSizeNWSE 8 左上-右下尺寸线(指向东南和西北方向的双箭头)。
VbSizeWE 9 水-平尺寸线(指向东和西两个方向的双箭头)。
VbUpArrow 10 向上的箭头。
VbHourglass 11 沙漏(表示等待状态)。
VbNoDrop 12 不允许放下。
VbArrowHourglass 13 箭头和沙漏。
VbArrowQuestion 14 箭头和问号。
VbSizeAll 15 四向尺寸线。
VbCustom 99 通过 MouseIcon 属性所指定的自定义图标。
说明在鼠标指针越过窗体或对话框上的控件时,为了指出功能上的改变,可以使用该属性。沙漏标形状设置值 (11) 是很有用的,用来指示用户需要等待过程或操作的完成。注意 如果应用程序调用 DoEvents,那么 MousePointer 属性在经过 ActiveX 部件时可能暂时地改变。