鼠标指针 VbIconPointer 是什么？ - 编程论坛

#2

风吹过b2022-09-11 10:55

试了一下，vbIconPointer 确实变回箭头了，百度无结果，
但一篇文章 https://docs.(v=vs.90) 里
提了一句，这个设置值过期了，我猜测在 VB6 里这个设置已过期，只是为了兼容以前的程序而存在。

你看一下你的系统设置里的鼠标形状设置，看看有多少种，感觉没这种鼠标形状存在的图标了。

#3

yuma2022-09-11 11:06

在XP及以前的系统下测试看一下。

#4

风吹过b2022-09-11 11:21

我VM 里是用的是 XP ，这个属性也是无效的。
并且我测试时 XP 不支持定义真彩图标，比较奇怪。

#5

yuma2022-09-11 11:36

回复 4楼风吹过b

果然，度娘没有骗我。

参考：https://blog.

然后，当鼠标移到Command1上时，鼠标的形状变成了 “箭头+问号”了。

Windows 10 64位下测试通过。

只有本站会员才能查看附件，请登录

[此贴子已经被作者于2022-9-11 11:42编辑过]

#6

chenyucheng2022-09-11 21:09

回复 5楼 yuma

箭头+问号?

#7

yuma2022-09-11 21:15

回复 6楼 chenyucheng

窗体拖入控件: Command1，运行以下代码：

Private Sub Form_Load()
MousePointer = 11
Command1.MousePointer = vbArrowQuestion
End Sub

当鼠标在Command1控件上时，请看鼠标指针变化，如下图：

只有本站会员才能查看附件，请登录

#8

chenyucheng2022-09-11 21:23

回复 7楼 yuma

我明明说的是vbIconPointer(值为4)啊！

#9

yuma2022-09-11 22:00

MousePointer属性用来显示鼠标箭头的形状的。可在C:\WINDOWS\Cursors 找到这些形状。

C:\WINDOWS\Cursors文件夹可能没有MousePointer = 4 的图标，所以显示了默认图标。因为其它常数都能显示。

#10

apull2022-09-12 00:35

在最新的vba中已经没有vbIconPointer(4)了。可能如所说，已经过时被删了。
https://docs.

#11

yuma2022-09-12 01:50

不一定吧，或许VB5中还有呢？

[此贴子已经被作者于2022-9-12 01:53编辑过]

#12

apull2022-09-12 13:48

回复 11楼 yuma

那又有什么意义呢。
这年头还有人给win98写程序么？

#13

yuma2022-09-12 14:10

以前的老古董未必就没有意义，现在的PE文件还有DOS头呢。