VB6标签设置手形光标

标签 vb6

如何在 Visual Basic 6 中设置标签控件的手形光标

我的标签应该像链接按钮一样。

我将 ForeColor 更改为 vbBlue 、下划线样式等。

现在我必须为该标签设置手形光标..该怎么做?

最佳答案

您可以使用API​​调用来获取系统手形光标

将以下代码放入模块中

Public Const IDC_HAND = 32649&
Public Declare Function SetCursor Lib "user32" (ByVal hCursor As Long) As Long
Public Declare Function LoadCursor Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long

并在标签的MouseMove事件中,输入以下代码

SetCursor LoadCursor(0, IDC_HAND)

其他游标常量:http://msdn.microsoft.com/en-us/library/windows/desktop/ms648391%28v=vs.85%29.aspx

关于VB6标签设置手形光标,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/17189716/

相关文章:

VB6 类型别名 long

timer - VB6杀死定时器

visual-studio - Visual Studio 6 Windows 公共(public)控件 6.0 (sp6) Windows 7,64 位

vb.net - 有没有VB应用程序迁移到delphi?

vba - Call关键字在VB6中起什么作用?

vb6 - VB6中逻辑函数IMP和EQV的作用是什么?有人发现它们在现实世界中的用途吗?

string - 将 double 转换为字符串时在小数点前保留零

c# - 如何使用 C# 中的参数获取和设置 vb6 属性?

excel - 用VB6生成Excel文件

windows - 在窗口调整大小事件