Private Declare Function LoadCursorFromFile Lib "user32" Alias "LoadCursorFromFileA" (ByVal lpFileName As String) As Long
Private Declare Function SetClassLong Lib "user32" Alias "SetClassLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Private Const GCL_HCURSOR = (-12)
Private hOldCursor As Long

Private Sub Form_Load()
Dim hNewCursor As Long
hNewCursor = LoadCursorFromFile("C:\Sword.ani")
hOldCursor = SetClassLong(hwnd, GCL_HCURSOR, hNewCursor)
End Sub
'----------------------------------------------
Private Sub Form_Unload(Cancel As Integer)
hOldCursor = SetClassLong(hwnd, GCL_HCURSOR, hOldCursor)

End Sub


VB中使用ANI鼠标指针,当鼠标移动到控件中无法显示其光标．除Label控可显示．．．．．
什么原因呢？

移动到控件?
Form_
不是主窗口？

硬件研究、软件交流 （VB、C语言、PS）、网络技术、 网页制作。。只要懂一种，可以加入此群：69975132 、、、一起交流、探讨、（非实误扰）

说清楚些。要更改什么的鼠标指针。